Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
208to212
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
208to212
208to212
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Inhalt als Zielenwert

Inhalt als Zielenwert
30.01.2003 09:30:56
Joerg
Morgen,

ich habe folgeden code geschrieben und möchte
mit dem Inhalt der Textbox als Zeilenzahl verwenden,
so das z.B. Wert 1 die 2 Zeile sein soll.

Dieser wWert soll an die Spalte angehangen werden.

der Code ist:

Dim Spalte As Variant
Spalte = TextBox1.Text + "1"
TextBox2.Value = Worksheets("Drucker").Range("B & Spalte").Text
TextBox3.Value = Worksheets("Drucker").Range("J & Spalte").Text
TextBox4.Value = Worksheets("Drucker").Range("C & Spalte").Text
TextBox5.Value = Worksheets("Drucker").Range("D & Spalte").Text
TextBox6.Value = Worksheets("Drucker").Range("E & Spalte").Text
TextBox7.Value = Worksheets("Drucker").Range("F & Spalte").Text
TextBox8.Value = Worksheets("Drucker").Range("G & Spalte").Text
TextBox9.Value = Worksheets("Drucker").Range("H & Spalte").Text

Das geht aber so nicht so ganz.
Ich bekomme ien Fehler im Range.

Gruß jörg

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

Betreff
Datum
Anwender
Anzeige
Re: Inhalt als Zielenwert
30.01.2003 09:52:15
Steffan




Re: Inhalt als Zielenwert
30.01.2003 09:53:53
Carsten

Hi Jörg,
zum Auslesen der Werte (z.B. über einen Commandbutton) aus dem Formular probiers mal hiermit...

Dim Spalte As Variant
Spalte = TextBox1.Value + 1
For x = 2 To 9
Worksheets("Drucker").Cells(2 + x, Spalte).Value = Controls("textbox" & x).Value
Next x

Gruß Carsten

Danke geht (Klasse)
30.01.2003 10:02:22
Joerg

Danke

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige