Anlistung der Namen
12.12.2003 15:50:06
Stefan
folgendes Problem habe ich:
ich möchte aus einer Datei mit mehreren Blättern die Namen von verschiedenen Zellen auflisten, und zwar mit dem Namen des Blattregisters.
Unter der ExcelHilfe habe ich folgendes Names-Auflistungsobjekt gefunden, das mir zwar eine Anlistung der Namen und Zellen auswirft, mir fehlt jedoch noch der Registername, in dem die Zelle steht:
Set nms = ActiveWorkbook.Names
Set wks = Worksheets(1)
For r = 1 To nms.Count
wks.Cells(r, 2).Value = nms(r).Name
wks.Cells(r, 3).Value = nms(r).RefersToRange.Address
Next
Hat jemand eine Idee?
Vielen Dank im voraus.
Stefan