Ich speichere täglich (mindestens) eine bestimmte Tabelle aus einer Datei "Master.xls" als neues Worksheet mit einem klar vorgegebenen Namen ab.
Namenskonvention NAXJJJJMMTT_BF, für heute wäre das
NAX20051230.xls
Diese Namen trage ich in der Ursprungsdatei "Master.xls" in einer Tabelle namens "Log" in der Spalte C fortlaufend ein.
Nun kann es sein, dass ich diese Tabelle am gleichen Tag wiederholt bearbeiten muss und neu abspeichern muss. Wenn dies der Fall ist, soll der Dateiname mit einer "2" ergänzt werden (Beispiel heute: "NAX20051230_BF2"), sollte eine dritte nötig sein, mit einer "3" (Beispiel heute: "NAX20051230_BF3").
Ich möchte nun in der Routine, die die Datei speichert, in der Spalte nachschauen, ob der Eintrag bereits besteht und wenn ja, den neuen Dateinamen entsprechend wählen.
Code heute:
...
SavePath = Application.ActiveWorkbook.path
File = ActiveSheet.Name
File = "NAX" & Jahr & File & "BF"
ActiveSheet.Copy
With ActiveWorkbook
.SaveAs SavePath & "\" & File
End With
...
Kann mir jemand einen Hinweis geben, wie eine Abfrage auf Spalte C in Tabelle "Log" lauten kann?
Besten Dank!
Peter