Computerwissen

Dies ist ein Begrüßungstext, der immer auf der QuA Landingpage (qa/index) angezeigt wird.

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
Geschrieben in: Excel 21:11, 10. September 2019
Beitrag teilen:

Akzeptierte Antwort

klemke
VIP
klemke
offline
12:08, 11. September 2019
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.
google icon

Wunderbar, dass Ihnen weiter geholfen werden konnte!

Wir würden uns sehr freuen, wenn Sie uns eine Bewertung auf Google hinterlassen:
Jetzt bewerten

Die Antwort ist derzeit minimiert Show
Antworten (1)
  • Akzeptierte Antwort

    19:50, 02. Oktober 2019
    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
    google icon

    Wunderbar, dass Ihnen weiter geholfen werden konnte!

    Wir würden uns sehr freuen, wenn Sie uns eine Bewertung auf Google hinterlassen:
    Jetzt bewerten

    Die Antwort ist derzeit minimiert Show
Login Bild

Bitte melden Sie sich an um eine Antwort zu verfassen

Sie müssen angemeldet sein um eine Antwort zu verfassen. Sie können hierfür das Anmeldeformular rechts nutzen oder sich registrieren.

Hier registrieren »