Hallo,
ich bin neu in diesem Forum und habe leider noch nicht viel Erfahrung mit VBA.
Zerbreche mir den Kopf über folgendes Problem:
So funktioniert es 1a:
Dim a As Double
a = 4500
Dim I As Integer
Dim B As Long
B = a
For I = 1 To B
Workbooks("Test des Auslesens").Sheets("Tabelle1").Range("Y" & I).Formula = Workbooks("Quatschdatei").Sheets("Tabelle1").Range("A" & I).Value + 273.15
Next I
So leider gar nicht und so möchte ich es ausdrücken:
Dim a As Double
a = 4500
Dim I As Integer
Dim B As Long
B = a
For I = 1 To B
Workbooks("Test des Auslesens").Sheets("Tabelle1").Range("Y" & I).Formula = Workbooks("Quatschdatei").Sheets("Tabelle1").Range(Cells(1, I)).Value + 273.15
Next I
Mir wird der Laufzeitfehler 1004 ausgegeben :-(
Wie muss ich die Adressbezeichnung für due cells wählen?
ich würde mich so freuen, wenn ich das Problem gelöst bekäme!
Viele Grüße Johanna