Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
928to932
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
928to932
928to932
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Wenn Textbox leer nicht Überschreiben
21.11.2007 08:20:27
Heinz
Hallo Leute
Ich habe verschiedene Textboxen deren Wert in Zellen eingetragen werden.
Ich hätte aber gerne wenn eine TextBox leer ist, das dann der Wert der schon in der Zelle eingetragen wurde nicht Überschrieben wird.
Also wenn Textbox leer, dann nicht "" eintragen sondern bestehenden Wert belassen,nur wenn Wert in Textbox dann eintragen.
Könnte mir bitte jemand weiterhelfen.
Gruß Heinz
Option Explicit

Private Sub CmdAbrechen_Click()
Unload Me
End Sub



Private Sub cmdUebertragen_Click()
'

Private Sub UserForm_Activate()
[B3].Value = txtA.Value 'Name
[A3].Value = txtB.Value 'PersNummer
[F1].Value = TextBox17.Value 'Beginn Stundenliste
[B101].Value = txtD.Value 'Montag Arb.Beginn
Unload Me
End Sub



Private Sub UserForm_Initialize()
Dim Ctl As Control
For Each Ctl In Me.Controls
If Left(Ctl.Name, 7) = "TextBox" Or Left(Ctl.Name, 3) = "txt" Then Ctl.Value = ""
Next
End Sub


2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wenn Textbox leer nicht Überschreiben
21.11.2007 09:01:00
selli
hallo heinz,
das kannst du mit einer normalen if then abfrage realisieren
if textbox1.value "" then
cells(1,1).value=textbox1.value
end if
gruß selli

AW: Wenn Textbox leer nicht Überschreiben
21.11.2007 09:11:27
Heinz
Hallo Selli
Recht herzlichen Dank.
Funkt. Genau so wie ich wollte.
Gruß Heinz
Anzeige

309 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige