Makro bei UserForm Start

Forumthread: Makro bei UserForm Start
6 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Makro bei UserForm Start

25.10.2004 13:32:01

Henri Brumme

Hallo,
ich möchte beim Starten meiner UserForm den Labeltext aus einer Zelle meines Tabellenblattes beziehen (oder wenn der nicht gleich der Zelle ist diesen ändern).
Ich habe es so versucht, leider hat aber nichts funktioniert:


Private Sub frmEinstellungen_Initialize()
frmEinstellungen.Label5.Caption = Sheets("Grundeinstellungen").Range("A5")
End Sub

oder


Private Sub frmEinstellungen_Initialize()
frmEinstellungen.Label5.Caption = Sheets("Grundeinstellungen").Cells(5, 1).Value
End Sub

Was mache ich denn falsch???
Grüße
Henri

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Makro bei UserForm Start

25.10.2004 13:34:00

Ulf
AW: Makro bei UserForm Start

25.10.2004 14:59:11

Henri Brumme
AW: Makro bei UserForm Start

25.10.2004 15:38:06

Ulf
AW: Makro bei UserForm Start

25.10.2004 16:24:06

Henri Brumme
AW: Makro bei UserForm Start

25.10.2004 16:45:42

Henri Brumme
AW: Makro bei UserForm Start

25.10.2004 19:08:36

AW: Makro bei UserForm Start

25.10.2004 13:34:00

Ulf

Du darfst den Namen der Prozedur nicht ändern!
Falsch:
Private Sub frmEinstellungen_Initialize()
Richtig:
Private Sub UserForm_Initialize()
Ulf

AW: Makro bei UserForm Start

25.10.2004 14:59:11

Henri Brumme

Hallo Ulf,
danke für die Antwort, das funktioniert schon mal.
Ich habe aber noch ein kleines Problem.
In Zelle A9 steht meine Wochenarbeitszeit im Format 40:00.
Im Caption wird aber 1,6666 angezeigt. Wie bekomme ich das denn richtig??
Danke
Henri

AW: Makro bei UserForm Start

25.10.2004 15:38:06

Ulf

.Label5 = Format(Sheets("Grundeinstellungen").Range("A5"),"hh:mm")
Ulf

AW: Makro bei UserForm Start

25.10.2004 16:24:06

Henri Brumme

Vielen Dank Ulf.
Henri

AW: Makro bei UserForm Start

25.10.2004 16:45:42

Henri Brumme

Hallo Ulf,
ich muss noch einmal nerven.
Was mache ich denn bei einer Wöchentlichen Arbeitszeit von 40:00 Stunden??
Leider funktioniert diese Schreibweise nicht:
Format(Sheets("Grundeinstellungen").Range("A9"), "[hh]:mm")

AW: Makro bei UserForm Start

25.10.2004 19:08:36

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!