counter in variable erhöhen in VBA

Dieses Thema counter in variable erhöhen in VBA im Forum "Windows XP Forum" wurde erstellt von claudia24, 23. Dez. 2008.

Thema: counter in variable erhöhen in VBA hi, ich zerbrech mir jetzt schon seit einiger zeit den Kopf. statt diesem hier: Private Sub UserForm_Initialize()...

  1. hi,

    ich zerbrech mir jetzt schon seit einiger zeit den Kopf.

    statt diesem hier:

    Private Sub UserForm_Initialize()
    TextBox1.Value = Cells(1, 2).Value
    TextBox2.Value = Cells(2, 2).Value
    TextBox3.Value = Cells(3, 2).Value
    usw.
    End Sub

    will ich das so abkürzen:

    Dim TextBox(250) As String
    Dim i As Integer
    For i = 1 To 250
    TextBox (i).Value = Cells(i, 2).Value
    Next


    so klappts aber nicht.
    würde mich freuen, wenn jemand eine antwort hat.
     
  2. hab die lösung schon wo anders bekommen:

    Hallo

    Private Sub UserForm_Initialize()
    Dim i As Integer
    For i = 1 To 250
    Me.Controls(TextBox & i).Value = Cells(i, 2).Value
    Next i
    End Sub

    Wenn deine Form keine 250 Textboxen mit Namen von TextBox1 bis
    TextBox250 hat, tritt ein Fehler auf, sobald ein adressiertes
    Control nicht gefunden wird. Und wenn deine Arbeitsmappe mehrere
    Tabellen hat, werden die Werte vom gerade aktiven Blatt genommen.
    Ggf. musst du die Tabelle angeben, z. B.

    Me.Controls(TextBox & i).Value = Worksheets(Tabelle1). _
    Cells(i, 2).Value

    Gruß
     
Die Seite wird geladen...

counter in variable erhöhen in VBA - Ähnliche Themen

Forum Datum
Counter Strike Source Update Windows XP Forum 5. Juni 2010
Win 7 neu aufgesetzt und nicht beanspruchbare spiele wie counterstrike source usw. laggen. Hardware 8. Feb. 2010
SetPoint 6.50: An invalid argument was encountered Windows XP Forum 4. Dez. 2012
batch, counter (in txt dokoument einfügen) Windows XP Forum 19. Juli 2011
problem mit counter strike nach neukaufes einer grafikkarte geforce 6200 256mb Windows XP Forum 8. Dez. 2007