Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema Userform
BildScreenshot zu Userform Userform-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema Label
BildScreenshot zu Label Label-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema TextBox
BildScreenshot zu TextBox TextBox-Seite mit Beispielarbeitsmappe aufrufen

Textbox - Textfeld löschen

Betrifft: Textbox - Textfeld löschen von: Dirk L
Geschrieben am: 13.09.2004 11:24:41

Hallo,

ich versuche meine ganzen Textboxen in meiner Userform zu löschen.

Ich hab auch im Archiv 2 gute Varianten gefunden:

'Dim c As Control
'For Each c In Me.Controls
' If TypeName(c) Like "Text*" Then c.Value = ""
'Next c



'Dim ObCb As Object
'stopp = True
'For Each ObCb In Controls
' If TypeName(ObCb) = "TextBox" Then ObCb = ""
'Next ObCb
'stopp = False

Aber mein Problem liegt darin, dass ich in ein paar Textboxen schon Text vorgeschrieben bzw vorgefertigt habe (Daten: Text im Editor).
Wenn ich eines der zwei Programme ausfürhre, werden auch diese vorgegebenen Texte gelöscht.
Gibt es eine Möglichkeit, das zu verhindern ???

Schonmal Danke im Voraus für Eure Hilfe.
Gruß
Dirk

P.S.: kann man mit einem Befehl den Curser in eine bestimmte Textbox bringen (quasi gehe zu TabIndex Nr 2 oder so) ????

  


Betrifft: AW: Textbox - Textfeld löschen von: tobias
Geschrieben am: 13.09.2004 12:05:12

Hallo

1.
vielleicht so:

For zähler = 1 To 9
Select Case zähler
Case 2
Me.Controls("TextBox" & zähler) = "Text"
Case Else
Me.Controls("TextBox" & zähler) = ""
End Select
Next

2.
Mit .SetFocus

mfg tobias


  


Betrifft: AW: Textbox - Textfeld löschen von: Dirk
Geschrieben am: 13.09.2004 12:48:50

Hallo Tobias,

vielen Dank für Deine Antworten.
Dein Tip mit Set-Focus klappt hervorragend.

Das löschen der Textboxen klappt so nicht.
Aber Deine Idee war gut und event. bekomme ich mit dem Ansatz was hin,
falls nicht vorher noch jemand eine andere Idee hat.

Nochmals vielen Dank.
Gruß
Dirk


  


Betrifft: Problem GELÖST !!! von: Dirk
Geschrieben am: 13.09.2004 13:51:34

Hallo,

nochmals vielen Dank für alles.
Hab das Prblem so gelöst, dass ich einfach alle Textfelder gelöscht habe und danach den benötigten Feldern den festgesetzten Wert zugewiesen hab.

z.B.: TypBox12.Value = "KS"

Vielen Dank für Eure Hilfe
Gruß
Dirk


 

Beiträge aus den Excel-Beispielen zum Thema "Textbox - Textfeld löschen"