also ich habe eine mappe Muster.xls
und darin drei Tabellen: Auto und Lkw und Pkw
in der Tabelle Auto steht z. b. in zelle B14 Lkw
folgenden code hab ich nun probiert:
dim namenszelle as string
namenszelle = "B14"------------da steht >Lkw
With Sheets("Auto").Range(namenszelle)---Mit diesem code funktioniert das Makro nicht ?
Rem With Sheets("Lkw")(mit diesem code funktioniert das Makro)
Do
aktzeileliste = aktzeileliste + 1
Loop While .Cells(aktzeileliste, datumsspalte) <> ""
.Cells(aktzeileliste, datumsspalte) = Range(datumszelle)
.Cells(aktzeileliste, datumsspalte + 1) = Range("C4")
.Cells(aktzeileliste, datumsspalte + 2) = Range("C5")
End With
komischer weise kommt keine fhelermeldung
aber es werden keine daten in Tabelle Lkw eingetragen
mit der anweisung With Sheets("Lkw")geht das aber
in der zelle B14 kann nun aber z.B pkw stehn dann sollen die daten in die Tabelle pkw eingetragen werden
hoffentlich habe mit meiner frageakrobatik so formuliert dass die problematik richtig erkannt werden kann.
danke erst mal
roland