Hokus Pokus Fidibus ....
Tut mir leid,... Glaskugel arbeitet nicht.
Kannst du den Code mal zeigen und dann sagen wo es hängt ?
Dann finden wir sicher den Fehler.
Gruss Rainer
Sheet1.Cells(row, col).Interior.Color = RGB(200, 200, 200)
Sheet1.Cells(row, col) = RsNew.Fields(Str_Month)
also ich habe ein excel sheet "x" das ich als datenbank öffne.
die zeile aus dem sheet "x" wird in das sheet "y" an die stelle die oben angezeigt wird geschrieben.
dann wenn der fehler kommt ist in sheet "x" die zelle leer. nur kommen davor auch viele zellen die leer sind.
auch wenn ich eine 0 rein schreibe bringt das nichts!
danke für deine hilfe!
Tut mir leid, aber so wird das nichts.
Was hast du denn mit "RsNew" deklariert?
Mit "RsNew" wird, per Convention normalerweise ein neuer Datensatz angelegt. Ich weiss nicht was du damit machst.
Ich habe keine Ahnung was du mit Str_Month deklariert hast und welcher Wert darin steht.
Greifst du hier auf eine ACCESS-Datenbank zu ?
Wenn du auf Felder in einem RecordSet zugreifst, müssen diese in Anführungszeichen stehen, z.B. RsNew.Fields("" & Str_Month & "")
Das vielleicht als Ansatz.
Gruss Rainer