VBA-Verbindungseigenschafte/Befehlstext
21.10.2016 12:10:02
Fred
mal wieder so eine Frage!
Meine Basis:
Meine betreffende Arbeitsmappe ist mit 6 weiteren Excel-Arbeitsmappen verbunden. Die verbundenen Mappen haben alle den gleichen Struktur-Aufbau,- also gleiche Blattanzahl und gleiche Blattnamen mit identischen Spaltenüberschriften.
Die (für meine Anfrage hier im Forum) wohl relevanten Verbindungseigenschaften meiner 6 Verknüpfungen lauten;
Verbindungsname: 1Jahr, Befehlstext: D1$
Verbindungsname: 2Jahre, Befehlstext: D1$
Verbindungsname: 3Jahre, Befehlstext: D1$
Verbindungsname: 4Jahre, Befehlstext: D1$
Verbindungsname: 5Jahre, Befehlstext: D1$
Verbindungsname: Aktuell, Befehlstext: D1$
Will ich z.B. das Tabellenblatt mit dem Namen E1 durch meine Verbindungen aufrufen, ist meine bisherige Vorgehensweise so, daß ich jede einzelne Verbindungseigenschaft aufrufe und händisch den Befehlstext in E1$ ändere. Bei öfteren wechseln ist das natürlich schon mit Aufwand und Zeit verbunden, dementsprechend auch mit Fehleranfälligkeit.
Meine Wunschlösung:
Ich habe in meiner betreffenden Arbeitsmappe das Tabellenblatt Auswahl.
In A1 steht z.B. F1$ und durch Klick auf eine Befehlsschaltfläche sollen die Befehlstexte in den Verbindungseigenschaften / Definitionen entsprechend geändert werden.
Oder zumindest eine Definition und dann eben 6 Schaltflächen und Klicks
Meine Frage ist folglich, ob diese Änderung in den Verbindungseigenschaften mit VBA überhaupt möglich ist und wenn ja, ob mir jemand diesen Syntax schreiben kann.
freundliche Grüße
Fred