Hvordan ryddes indholdet af tekstboksen, når der klikkes på i Excel?
Normalt, for at rydde gammelt indhold af en tekstboks (ActiveX Control), skal du komme ind i tekstboksen, vælge hele indholdet og derefter trykke på Backspace- eller Delete-tasten. Hvordan rydder alt indhold hurtigt i en tekstboks? Denne artikel viser dig en VBA-metode til hurtigt at rydde indholdet af en tekstboks, når du bare dobbeltklikker på den.
Ryd indholdet af tekstboksen, når der klikkes med VBA-kode
Ryd indholdet af tekstboksen, når der klikkes med VBA-kode
Følgende VBA-kode kan hjælpe dig med hurtigt at rydde indholdet af en tekstboks, når du dobbeltklikker på den. Gør venligst som følger.
1. Hvis en tekstboks allerede har eksisteret i regnearket, skal du aktivere Design Mode ved at klikke Udvikler > Design Mode. Se skærmbillede:
Eller du kan også indsætte en tekstboks ved at klikke på Udvikler > indsatte > Tekstboks (ActiveX-kontrol). Se skærmbillede:
2. Højreklik på tekstboksen, og klik Vis kode fra genvejsmenuen. Se skærmbillede:
3. I åbningen Microsoft Visual Basic til applikationer vindue, skal du udskifte den originale VBA-kode i kodevinduet med nedenstående VBA-kode.
VBA-kode: Ryd indholdet af en tekstboks, når du dobbeltklikker på den
Private Sub TextBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
If Not iGblInhibitTextBoxEvents Then
TextBox1.Value = ""
End If
End Sub
Bemærk: I koden er TextBox1 navnet på den tekstboks, du vil rydde indholdet fra. Venligst ændre den til din egen.
4. Tryk på andre + Q taster for at afslutte Microsoft Visual Basic til applikationer vindue.
5. Sluk for designtilstand.
Fra nu af, når du dobbeltklikker på en tekstboks, vil dens indhold blive ryddet med det samme.
Relaterede artikler:
- Hvordan vælges tekst automatisk i en tekstboks, når den er valgt i Excel?
- Hvordan udfyldes en tekstboks automatisk, når du skriver i Excel?
- Hvordan sammenkædes tekster fra flere celler i en tekstboks i Excel?
- Hvordan deaktiveres redigering i tekstboks for at forhindre brugerinput i Excel?
- Hvordan formateres en tekstboks i procent i Excel?
Bedste kontorproduktivitetsværktøjer
Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid. Klik her for at få den funktion, du har mest brug for...
Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere
- Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
- Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
- Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!