Blatt vorhanden - geschlossene Mappe
17.08.2007 12:24:00
Margarete
brauche mal wieder Eure Hilfe.
Ich möchte aus einer Liste von Dateien (Verzeichniss wird auch angegeben) herausfinden, ob es ein Blatt "GO TO PAGE" gibt. Es gibt diverse Dateien die nur verknüpft sind und andere mit Summenblättern. Die Dateien mit Summenblättern haben einen Hinweis auf dem 1. Blatt (GO TO PAGE) in Zelle G7. Dort steht in Worten "mit Summen". Wenn ich alle Dateien öffne und dann eine Verknüpfung auf diese Zelle mache, dauert das zu lange. Wie kann ich aus der geschlossenen Datei herausfinden, ob es das Blatt "GO TO PAGE" gibt? Gibt es das Blatt nicht, springt mein Makro raus. :-(
So sieht es im Moment aus:
Sub FormelEintragen()
intAnzahl = Cells(1, 2) + 1
Range(Cells(2, 3), Cells(intAnzahl, 3)).ClearContents
For intCounter = 2 To intAnzahl
strDir = Cells(intCounter, 1)
strFile = Cells(intCounter, 2)
On Error Resume Next
Cells(intCounter, 3).FormulaR1C1 = "='" & strDir & "[" & strFile & "]GO TO PAGE'!R3C7"
Application.StatusBar = intCounter & " - " & intAnzahl
Next intCounter
Application.StatusBar = ""
End Sub
Ich bitte um Eure Hilfe. Vielen Dank.
Gruß
Margrete
Anzeige