Excel UserForm mit Werten aus Zellinhalt füllen. Werte stehen in anderem Blatt

Computer: Software & Programmierung Office Software
#1

Hallo

Ich habe noch nie eine Userform geschríeben und habe nichts passendes im Forum gefunden.
Deshalb bitte ich um Hilfe:

Ich habe eine Userform mit 20 Textboxen erstellt.
In einem Tabellenblatt („Büro“) erstelle ich meinen Speiseplan für 5 Bereiche mit jeweils eigenem Plan.
Zusätzlich habe ich für jeden Wochentag ein Tabellenblatt („Montag“;„Dienstag“ usw.) in der alles für den Tag zusammengefast ist.
Dort schreibe ich auch die Mitarbeiter ein, die an dem Tag arbeiten.
Nun möchte ich, das diese Mitarbeiter in der UserForm angezeigt werden.
Mein Code (sehr bescheidener Code) sieht so aus und soll aus Blatt „Büro“ gestartet werden:

Sub UserForm_Activate()
UserForm1.Show
’ hier sollte ich die Werte einlesen, weiß aber nicht wie!?!
'TextBox1:Value = Blatt"Montag"; Zelle: C28
'TextBox2.Value = Blatt"Montag";Zelle:C29 usw
End Sub

Kann mir jemand helfen?

#2

Hallo Monchar,

Zusätzlich habe ich für jeden Wochentag ein Tabellenblatt
(„Montag“;„Dienstag“ usw.) in der alles für den Tag
zusammengefast ist.
Dort schreibe ich auch die Mitarbeiter ein, die an dem Tag
arbeiten.
Nun möchte ich, das diese Mitarbeiter in der UserForm
angezeigt werden.
Mein Code (sehr bescheidener Code) sieht so aus und soll aus
Blatt „Büro“ gestartet werden:

dann starte in „Büro“ so einen Code:

Sub Starten()
Userform1.show
End Sub

Im Modul der Userform dann:

Sub UserForm\_Activate()
with worksheets("Montag")
 TextBox1:Value = .Range("C28").value
 TextBox2:Value = .Range("C29").value
 TextBox3:Value = .Range("C30").value
 '... 
 '...
 '...
 TextBox20:Value = .Range("C47").value
End with
End Sub

Ist beides forlaufend, also der Index der Textboxen von 1 bis 20 und die Zeile in C von 28 bis 47 so kann man auch eine For-Next-Schleife benutzen.

Gruß
Reinhard