for next schleife
29.01.2008 10:30:27
marco
habe eine schleife gebastelt.
ziel ist es alle werte in eine andere arbeitsmappe zu übertragen.
wenn ich die befehlszeilen for und next weglasse. funktioniert es. aber mit diesen befehlszeilen funktioniert es nicht mehr.
dim d,f
For f = 1 To 29
ActiveCell.Offset(1, 0).Select
d = ActiveCell.Value
Workbooks("KW 051").Activate
ActiveCell.Offset(1, 0).Select
ActiveCell.Value = d
Next f
grüße
marco