Hallo,
es gibt ein fatales Problem bei der Zuweisung eines Namens zu einem Bereich per VBA-Makro in EXCEL (Office 2010). Alles Weitere ist im Anhang beschrieben.
Vielen Dank für alle Mühe im Voraus!
Dieter Schramm / 10.09.2019 – 21:10
Sehr geehrter Herr Schramm,
also so einfach ist das Problem gar nicht. Es handelt sich offenbar um einen Bug, der erst beim Zuordnen des Kommentars auftritt.
(Sie können z.B. einem manuell eingefügten Namen, der intakt ist, per VBA einen Kommentar zuordnen. Bei dieser Zuordnung wird der Name zerschossen.)
Glücklicherweise gibt es einen Workaround zu dem Problem (was wären wir ohne unsere Amerikaner?)
https://stackoverflow.com/questions/42292762/adding-comments-to-name-in-excel
In Ihrem konkreten Fall sieht das so aus:
Dim ref As String
Set aw = Workbooks(mapAD) ´mapAD = Name der Arbeitsmappe
Set A = aw.Worksheets(ADblattName) ´ADblattName = „STAMM“
aze = 2234 ´Nummer der letzten Zeile
ase = 33 ´Nummer der letzten Spalte AG
t = „ADDATEN“
Set ADDATEN = A.Range(A.Cells(1, 1), A.Cells(aze, ase))
ref = „=´STAMM´!“ & ADDATEN.Address
aw.Names.Add Name:=t, _
RefersTo:=ref
aw.Names(t).Comment = „Anlage “ & dheute
aw.Names(t).RefersTo = ref
D.h. die Namensreferenz muss nach der Zerstörung durch die Kommentarzuordnung noch einmal zugewiesen werden.
Mit freundlichen Grüßen
Dieter Klemke
Anmerkung:
Bitte setzen Sie jeweils vor Cells den Bezug auf das Tabellenblatt A. Anderenfalls gibt es ein Problem, wenn bei der Ausführung des Programms das Blatt A nicht aktiv ist.
Schön, dass Ihre Frage beantwortet wurde!
Um weiterhin auf dem Laufenden zum Thema Technik und PC zu bleiben, nehmen Sie doch kostenlos teil an unseren monatlichen LIVE-Webinaren: hier klicken für Registrierungsseite. Bei diesen Online-Shows können Sie uns all Ihre Fragen rund um das Thema Computer stellen und lernen jeden Monat etwas Neues.
Hallo Herr Klemke,
mittlerweile hat Ihr Supertipp beides wiederhergestellt: meine zerschossenen Bereichsnamen und mit ihnen auch meine Nerven in ganz ähnlichem Zustand! Ich habe schon fast bzgl. meiner Vereinssoftware das Ende meiner VBA-Karriere befürchtet, weil ein Grossteil des Programms seine Spalten- und Zeilennummern aus den Adressbezügen der Namen entnimmt. Mit nicht-vorhandenen Namen ging natürlich nichts mehr. Ihr Tipp war für mich von größtem Wert. Sie haben mir aus einer schweren Verlegenheit elegant herausgeholfen. Haben Sie herzlichen Dank für Ihre sehr kompetente und prompte Hilfe! Was für Sie Ihre Amerikaner sind, das sind z.B. für verzweifelte Rentner ihre CW-Experten! Also denn bis zum nächsten Crash.
Viel Erfolg und alles Gute —– Ihr Dieter Schramm