Live-Forum - Die aktuellen Beiträge
Datum
Titel
08.05.2024 21:22:24
In vorhandener Formel Jahreszahl mit einbeziehen
08.05.2024 21:15:37
Koordinaten im XY-Diagramm per Cursor ändern.
08.05.2024 19:10:09
doppelte Zeile gem. mehrerer Bedingungen löschen?
08.05.2024 17:16:08
Randomize, RND, Timer() , (@Onur, Opawinni)
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1760to1764
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1760to1764
1760to1764
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Namensmanager in Addin definieren

Namensmanager in Addin definieren
05.06.2020 11:33:44
Sven001
Hallo
Ich habe eine Wertabelle in einem Addin-Blatt und über den Namensmanager dort verschiedene Bereiche definiert. Über eine VBA-Funktion wird das auslesen gesteuert. Leider sind die Namensdefinitionen in einer neuen Arbeitsmappe nicht bekannt, so dass die Auslesefunktion nicht funktioniert.
Hat jemand eine Idee wie sich das Problem lösen lässt.
Freundliche Grüsse
Sven

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Namensmanager in Addin definieren
05.06.2020 13:06:14
Luschi
Hallo Sven,
meine Excel-AddIn's installiere ich schon seit 20 Jahren nicht mehr, sondern öffne sie als normale Arbeitsmappe gezielt in den einzelnen Projekten.
Das sieht dann so aus: 

'im Klassenmodul 'DieseArbeitsmappe' des Excel-Projektes
Private Sub Workbook_Open()
Call Open_AddIn("F:\Daten\...\T_AddIn_01.xlam")
End Sub
'im normalen Modul des Excel-Projektes
Public X_AddIn As Workbook   '!!!
Sub Open_AddIn(xAddin As String)
Set X_AddIn = Workbooks.Open(xAddin)
End Sub
'Ansprechen der definierten Namen im AddIn
Sub test1()
Dim Rg_X1 As Range
Debug.Print X_AddIn.Names("_aha").RefersToRange.Address
Set Rg_X1 = X_AddIn.Names("_aha").RefersToRange
Debug.Print Rg_X1.Parent.Parent.Name, Rg_X1.Address
Set Rg_X1 = Nothing
End Sub
Dadurch:
- gib's weniger Probleme beim Austausch des AddIn's
- kein Deinstallieren erforderlich
- mit dem Netzwerk-Admin ist abgesprochen, daß bei Neulieferung
- und Neustart der User-PC's das AddIn im lokalen Arbeitsbereich der User ersetzt wird
- weniger Speicherbedarf, da keine Riesen-AddIn's im ständigen Excel-Gebrauch
  auch wenn Keines von meinen Excel-Projekten gerade aktiv ist
- und dieses so geöffnete AddIn verhält sich auch wie ein installiertes AddIn
Gruß von Luschi
aus klein-Paris
PS: Ergenis der Debug.Print-Befehle:
$E$4:$E$12
T_AddIn_01.xlam $E$4:$E$12
Anzeige
AW: Namensmanager in Addin definieren
05.06.2020 14:47:27
Sven001
Hallo Lutschi
Wenn ich das richtig verstehe, bedeutet dein Konzept aber das alle benutzten Excelmappen auf der Templatemappe basieren. Das sehe ich in meinem Fall leider nicht als realistisch möglich.
Gruss
Sven
AW: Namensmanager in Addin definieren
05.06.2020 18:26:20
Luschi
Hallo Sven,
mein Aufwand geht noch ein bißchen weiter. In der Projekt-xlsm-Datei gibt es ein Arbeitsblatt namens 'Config', im dem viele, viele Parameter festgelegt sind:
- u.a. den Pfad/Namen des entsprechenden AddIn's
- welches bei Öffnen der Projektdatei nachgeladen werden soll
- das AddIn wiederum kennt Infos, zu welchen Projektdateien es sich öffnen läßt
- versucht also ein nicht kompatibles Projekt das AddIn zu öffnen
  beendet es sich gleich wieder
- so habe ich als Vba'ler die Kontrolle
- und der User sieht die Makros des AddIn nicht (auch nicht per Alt+F8)
Das dies trotz Vba-KW-Schutz nicht die Allzweck-Waffe ist, muß man (ich) akzeptieren.
Wichtig ist mir dabei:
- es funktioniert
- und der Austausch des AddIn's muß problemlos auf mehreren/vielen PC's möglich sein
- und der User Händisch nicht auf die AddIn-Makros zugreifen kann.
Gruß von Luschi
aus klein-Paris
Anzeige
AW: Namensmanager in Addin definieren
09.06.2020 12:23:32
Sven001
Hallo Luschi
Vielen Dank für deine interessanten Erläuterungen. Nur leider hilft es mir in meiner Situation nicht weiter. Und auch die Frage ob und wie man in einer Addin-Mappe definierte Namen in allen anderen Excelmappen verfügbar machen kann, ist noch nicht beantwortet.
Gruß
Sven

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige