Office: Zelleninhalt in UserForm einlesen

Hi,

ich bin hier echt am verzweifeln. Wollte einfach nur den Inhalt einer Zelle in ein Textfeld einer UserForm einlesen, wenn die UserForm angezeigt wird. Habs so versucht:

Private Sub FormatTest_onload()
textfeld1.Value = [R2]
End Sub

Aber es funltioniert nicht.

Hat jemand einen Tipp?
Angela

:)

 

Hallo Angela,

so sollte es gehen:

Private Sub UserForm_Initialize()
Textbox1 = Cells(2, 18)
End Sub

Es handelt sich da um sogenannte Objekte, die alle einen bestimmten Namen haben. Dieser muß dann auch angesprochen werden. Wenn deine Textbox also nicht TextBox1 heißt, wird das Beispiel auch nicht funktionieren. Den Namen erfährst du, wenn du das Objekt im Entwurfsmodus selektierst, und dann auf die rechte Maustaste klickst. Im sich öffnenden Fenster wählst du Code anzeigen, dann kommst du in den Bereich zum Quelltext anlegen, dort steht der gültige Name.

 

Danke Klaus-Dieter!

Hat funktioniert. wenn ich jetzt gleichzeitig noch ein zweites Feld einlesen möchte, schreib ich das dann unter die erste Zeile?

Angela

 

Hallo Angela,

ja, das geht.

 

Mh, ich hab das probiert, doch es geht nicht. Muss man die beiden Zeilen irgendwie durch ein Zeichen verknüpfen?

 

Hallo erstmal!

Willst Du den Wert aus der zweiten Zelle in die leiche TextBox einlesen lassen?

Gruss
Stephen

 

Moin, Angela,

hast Du die Eigenschaft MultiLine für das Textfeld auf True gesetzt?

Ansonsten könntest Du es per folgendem Code versuchen - hier werden die Werte aus R2 und R3 eingelesen:

Code:

 

Das hilft mir nicht wirklich weiter. Also ich möchte die Zellen G2, R2, S4 und F33 in eine UserForm einlesen...

 

Hallo Angela,

ich denke, Du solltest Deine Frage nochmal präzisieren, damit Dir geholfen werden kann.

Wo sollen die Werte der Zellen denn hin auf der Userform?
Jeder in eine eigene Textbox, dann gilt das Vorgehen von Klaus-Dieter,
nur für Textbox1 schreibst Du Textbox2 usw.
wenn alle in eine Textbox sollen, dann nimm den Code von Jinx, der setzt die Zellinhalte zusammen und schreibt den zusammegsetzten String in die Textbox.

André

 

Sorry, dass ich Euch hier so beschäftige. Also es soll jeweils ein Zelleninhalt immer in ein anderes Textfeld.

Habe es mit der Version von Klaus-Dieter probiert. Textfeld2 halt unter das andere, doch er liest immer nur das erste Textfeld ein.

Private Sub UserForm_Initialize()
Textbox1 = Cells(2, 18)
Textbox2 = Cells(4, 20)
End Sub

Viele Grüße und Danke für Eure Hilfe und Geduld
Angela

 

Moin, Angela,

hast Du einmal die Übereinstimmung der Namen Deiner Textboxen mit den Angaben im Code überprüft? Wenn diese stimmen, klappt auch das Laden der Werte aus den verschiedenen Bereichen...