Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1152to1156
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
CommandButton startet UserForm nicht
Holger
Guten Morgen an Alle,
ich habe ein "UserForm1" mit einigen Feldern. Wenn ich die UserForm aus dem VB-Editor starte läuft alles fehlerfrei.
Wenn ich allerdings die UserForm1 über einen CommandButton in Tabelle1 starten will, bekomme ich immer den Laufzeitfehler '1004' - Anwendungs- oder objektdefinierter Fehler.
Der ganz einfache Code in Tabelle 1 lautet:
Private Sub CommandButton1_Click()
UserForm1.Show
End Sub
Der Code in der UserForm1 lautet dann (zum Fehlertesten Verkürzt):
Private Sub UserForm_Initialize()
Dim rng As Range
With Sheets("Vorgaben")
For Each rng In .Range(Cells(1000, 1).End(xlUp).Offset(0, 0), Cells(2, 1))
UserForm1.ComboBox1.AddItem rng
Next
For Each rng In .Range(Cells(1000, 2).End(xlUp).Offset(0, 0), Cells(2, 2))
UserForm1.ComboBox2.AddItem rng
Next
For Each rng In .Range(Cells(1000, 3).End(xlUp).Offset(0, 0), Cells(2, 3))
UserForm1.ComboBox3.AddItem rng
Next
For Each rng In .Range(Cells(1000, 4).End(xlUp).Offset(0, 0), Cells(2, 4))
UserForm1.ComboBox4.AddItem rng
Next
End With
End Sub
Ich bin am verzweifeln, da ich einfach keinen Fehler finde. Die Onlinesuche hat auch keine Lösung gebracht.
Kann mir jemand hier aus dem Forum helfen?
Schöne Grüße
Holger

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

Betreff
Benutzer
Anzeige
AW: CommandButton startet UserForm nicht
28.04.2010 09:33:11
Hajo_Zi
Hallo Holger,
es fehlen die Punkte vor Cells.

Danke!
28.04.2010 09:40:52
Holger
Darauf wäre ich nie gekommen.
Jetzt funktioniert es.
Danke!
Schönen Gruß
Holger
Anzeige

301 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige