Makro ändern
11.10.2005 17:16:35
Oliver
Unten steht der Code für ein Makro, welches eine Exportdatei aus der Buchhaltung aufarbeitet.
Hierfür wird bei Spalte H eine Spalte eingefügt und dann mit Formeln versehen "Hx=Fx-Gx"
Nun wurde die Buchhaltungssoftware geupdated und dabei die Exportdatei im Aufbau verändert.
Und jetzt funktioniert die Formel nicht mehr. Statt die Formel in die neue Spalte H einzufügen, fügt er auch eine Formel in der Spalte I. Und da stehen die Kostenstellen. Was läuft falsch?
Danke
OP
_____
Sub BOGExportaufbereiten()
' BOGExportaufbereiten Makro
' Bereitet die Dateien aus dem BogExport auf!
'Spalte für Saldo einfügen
Range("h2").EntireColumn.Insert
Range("h1") = "Saldo"
'Mit Formeln versehen
Range(Cells(2, 8), Cells(2, 8).End(xlDown).Offset(0, 1)).FormulaR1C1 = "=rc[-2]-rc[-1]"
Columns("c:c").Select
Columns("a:a").EntireColumn.AutoFit
Columns("d:d").EntireColumn.AutoFit
Columns("e:e").EntireColumn.AutoFit
Columns("f:f").EntireColumn.AutoFit
Columns("g:g").EntireColumn.AutoFit
Range("A1").Select
Selection.AutoFilter
End Sub