zellinhalt bei userformaufruf importieren

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
UserForm TextBox


Excel-Version: 97
nach unten

Betrifft: zellinhalt bei userformaufruf importieren
von: florian
Geschrieben am: 22.05.2002 - 10:23:06

hallo,

ich habe in einer tabelle in spalte a die textbox-namen (txt_*) und in spalte b die werte der jeweiligen textbox.

nun möchte ich bei aufruf der userform (initialize) alle werte den jeweiligen textboxen zuordnen. wie geht das am einfachsten???

gruß & dank
florian


nach oben   nach unten

Re: zellinhalt bei userformaufruf importieren
von: Andreas
Geschrieben am: 22.05.2002 - 11:12:49

Hallo Florian,

hier mal der Code:

Private Sub UserForm_Initialize()
Dim txtBox As Control, rngZelle As Range

For Each txtBox In UserForm1.Controls
    If UCase(TypeName(txtBox)) = "TEXTBOX" Then
        For Each rngZelle In Worksheets("Daten").Range("A1:A30")
            If rngZelle.Value = txtBox.Name Then
                txtBox.Value = rngZelle.Offset(0, 1).Value
                Exit For
            End If
        Next rngZelle
    End If
Next txtBox
End Sub


Du mußt nur noch Worksheets("Daten").Range("A1:A30") so anpassen, dass er auf Deine richtige Daten zugreift!
Viel Spaß,
Andreas
 nach oben

Beiträge aus den Excel-Beispielen zum Thema "zellinhalt bei userformaufruf importieren"