VBA-Forum - Das Forum zu Microsoft VBA

Ansicht des Beitrags:

Von: Holger	Datum: 14.12.2007 09:17:12	Views: 1159	Rating:	Antwort:
Thema: Aw:UserForm
Hallo Rainer, nachstehend ein Beispiel, wie du die Steuerelemente ansprechen und manipulieren kannst. Ich denke, dass du es in deinem Sinne abwandeln kannst. Dim a(6): For i = 0 To 6: a(i) = Trim(Str(i + 3)): Next i For Each StElem In UserForm1.Controls 'oder dein UserForm-Name For i = 0 To UBound(a) If InStr(StElem.Name, "Label" + a(i)) Then StElem.Caption = "Text" + a(i) End If Next i Next Viel Erfolg Holger Rainer schrieb am 13.12.2007 21:54:56: Ich möchte in einer UserForm mit 30 Labels zb. Label3 bis Label9 in einer Schleife (for next) beschriften. Für Tips bin ich dankbar

Ihre Antwort

Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema:		Name:		Email:

Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen