Hallo,
ich habe mehrere Felder in einer Spalte mit namen zb. "1";"1AB";"22Q" usw.
ich möchte einen sheets kopieren und den namen ändern laut die Felder in der Spalte.
-----------------------------------------------------------------
y = 1
x = 4
For zähler = 1 To 40
var = activesheets.Cells(y, x).Value
Sheets("layout").Select
Sheets("layout").Copy before:=Sheets("layout")
Sheets("layout (2)").Name = var
y=y+1
next zähler
----------------------------------------------------------------
die struktur "var = activesheets.Cells(y, x).Value" ist sicherlich faslch man müsste hier SET benutzen.
ich komme nicht drauf wie man den wert eines Feldes in eine Variable zuweisen.
danke
logo__3
peterson
