Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
448to452
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
448to452
448to452
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
UserForm Eintrag in Zelle +1 wenn belegt
06.07.2004 15:53:31
Glen
Hallo liebe Leute
Ich habe ein kleines Voting in Excel erstellt und möchte im Code erreichen, dass wenn in Zelle A1 schon ein Eintrag existiert, der nächste Eintrag in A2 gemacht wird und beim nächsten Eintrag in A3 usw.
Das habe ich bis jetzt ertellt (bin in den Anfängen mit VBA) und brauche ein wenig Unterstützung zu diesem Vorhaben mit Zelle +1

Private Sub CommandButton1_Click()
[A1] = TextBox1.Text
Eingabe.Hide
MsgBox "Danke für Ihr Voting", vbInformation, "V O T I N G"
End Sub


Private Sub CommandButton2_Click()
Eingabe.Hide
MsgBox "Danke und bis bald", vbExclamation, "Bye"
End Sub

Danke und Gruss,
Glen

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

Betreff
Datum
Anwender
Anzeige
AW: UserForm Eintrag in Zelle +1 wenn belegt
Ulf

Private Sub CommandButton1_Click()
[A65536].end(xlup).offset(1,0) = TextBox1.Text
if [a1]= "" Then [A1].delete shift:=xlup
Eingabe.Hide
MsgBox "Danke für Ihr Voting", vbInformation, "V O T I N G"
End Sub

Ulf
Vielen Dank Ulf. o.T.
Glen
Herzlichen Dank Ulf. Funktioniert einwandfrei!
Anzeige

303 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige