ich habe eine Arbeitsmappe die mit dem Hinweis "Fehler beim Speichern von ... Durch entfernen oder reparieren einiger Features kann die datei von Microsoft Excel ..." nicht gespeichert werden kann.
Ursache dafür scheint folgendes Makro zu sein:
Sub Verfahrensart()
' Verfahrensart Makro
' Ermitteln der Verfahrensart
' Tastenkombination: Strg+Umschalt+V
Dim strX As String
Range("Q4").Select
ActiveCell.FormulaR1C1 = _
"=IF(RC[-1]="""",""-"",IF(RC[-3]="""",""V"",IF(RC[-4]="""",""PG"",""PF"")))"
strX = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
Selection.AutoFill Destination:=Range("Q4:Q" & strX)
Range("Q4:Q" & strX).Select
End Sub
Die Vorlage soll auch von anderen eingesetzt werden, so dass "Hilfskrücken" nicht die Option sind.
Für Hilfe wäre ich sehr dankbar.
Marko