Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
800to804
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
800to804
800to804
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Textbox mit Variablen

Textbox mit Variablen
13.09.2006 22:11:34
okmiko
Hallo,
ich möchte in 100 Textboxen die Durchnummeriert sind Box1 bis Box 100 jeweils Zellenwerte aus den Zeilen 1-100 übernehmen.
Ausschnitt:
For z = 1 To 100
ActiveCell.Offset(z, 0).Activate
userform."Box" & z.Value = Format(ActiveCell.Offset(0, 1).Value, "0.00")
Aber "Box" & z klappt nicht.
Wie muß ich das angehen?
Vielen Dank für jede Hilfe
Gruß
Michael

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Textbox mit Variablen
13.09.2006 22:15:43
Josef
Hallo Michael!
Und das "Activate" gewöhnen wir uns ganz schnell wieder ab ;-))
Dim intIndex As Integer

For intIndex = 1 To 100
  Userform1.Controls("TextBox" & intIndex) = Format(ActiveCell.Offset(intIndex, 1).Value, "0.00")
Next

Gruß Sepp

Anzeige
AW: Textbox mit Variablen
13.09.2006 22:52:42
okmiko
Hallo Josef,
vielen Dank, klappt super, Problem gelöst.
Gruß
Michael
AW: Textbox mit Variablen
13.09.2006 22:20:38
Uduuh
Hallo,
userform.Controls("box" &z)
das: ActiveCell.Offset(z, 0).Activate ist garantiert falsch. Durch das Activate wird der Offset zur ActiveCell.
Vermutlich eher so:
For z = 1 To 100
userform.Controls("Box" & z) = Format(ActiveCell.Offset(z, 1).Value, "0.00")
Gruß aus’m Pott
Udo

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige