UF Initialisieren

Forumthread: UF Initialisieren
4 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: UF Initialisieren

UF Initialisieren

29.10.2007 09:08:00

Patrick

Morgen zusammen,
wenn ich mein UF starte, soll zum anfang direkt abgefragt werden ob in Sheets("werte") werte enthalten sind. Wenn ja sollen diese in in Textboxen im UF übernommen werden. Bsp.:
Sheets("werte").Activate
Range("A17").Select
If ActiveCell.Value "" Then
TextBox44.Value = ActiveCell.Value
End If
Berechnung. show
Leider funktionert es nicht ^^ muss ich den code an anderer stelle hinschreiben? Momentan steht er bei mir in Tabelle1 (Start).
Vielen dank für jede antwort.
gruß Patrick

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: UF Initialisieren

29.10.2007 09:23:00

Kawensmann
AW: UF Initialisieren

29.10.2007 09:26:04

Tino
vergesse meins u. nimm Kawensmann seins!

29.10.2007 09:46:48

Tino
funktioniert

29.10.2007 10:18:56

Patrick

AW: UF Initialisieren

29.10.2007 09:23:00

Kawensmann

Hallo,
der Code gehört sinnigerweise in die Prozedur für das "Initialize"-Ereignis der Userform und nicht ins Tabellenmodul.
Gruß
Kawensmann

AW: UF Initialisieren

29.10.2007 09:26:04

Tino

Hallo,
Sheets("werte").Activate
Range("A17").Select
Berechnung. show
If ActiveCell.Value "" Then
TextBox44.Value = ActiveCell.Value
End If
PS:
du solltest aber versuchen in deinen Programmen nach Möglichkeit ohne Select auszukommen.
Gruss
Tino

vergesse meins u. nimm Kawensmann seins!

29.10.2007 09:46:48

Tino

Gruss
Tino

funktioniert

29.10.2007 10:18:56

Patrick

Private Sub UserForm_Initialize() war gut versteckt, aber danach wunderbar.
thx Patrick