Blatt-Namen ermitteln..
12.11.2003 19:10:32
Marcel
ich habe eine Datei geöffnet und möchte nun zwischen den Blättern des ursprünglichen Dokuments und der neu geöffneten Datei wechseln. Dazu fehlt mir der Name des Blatts der geöffneten Datei.
..vielleicht einfacher nachzuvollziehen mit dem Code:
MsgBox "Bitte die Eingabedatei angeben:" & Chr(13) & "(Liste der Knotennamen)"
vAdr = Application.GetOpenFilename
..
Workbooks.Open Filename:=vAdr
..
Windows("Mappe1.xls").Activate ' Sprung zu ursprünglichen Datei
Range("A1").Select
..
Windows(" xxx ").Activate ' hier fehlt mir der Name?!
Range..
hat jemand eine Idee an welcher Stelle ich wie den Namen ermitteln kann?
bin verlegen um jeden Tip - Danke,
Marcel