Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
480to484
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
480to484
480to484
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Textbox - Textfeld löschen

Textbox - Textfeld löschen
13.09.2004 11:24:41
Dirk
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) ?

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Textbox - Textfeld löschen
13.09.2004 12:05:12
tobias
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
AW: Textbox - Textfeld löschen
13.09.2004 12:48:50
Dirk
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
Anzeige
Problem GELÖST !!!
13.09.2004 13:51:34
Dirk
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

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige