Gruppen
- Top Gruppen
- Betriebsysteme
- Windows classik
- Linux
- BS-Sonstige
- Software
- Datenbanken
- Bildbearbeitung
- Audio/mp3/Video
- Security/Viren
- SW-Sonstige
- Hardware
- Mainboard/CPU
- Grafikkarten
- Peripherie
- Laptop/Notebook
- HW-Sonstiges
- Netzwerk
- Telefon,ISDN,Modem
- W-Lan
- NW-Sonstiges
- Programmierung
- PHP,ASP,Perl...
- Java,C++...
- Webseiten/HTML
- Sonstiges
- PC-Sonstiges
- Plauderecke
- SN Intern
- Test
/ Forum / Tabellenkalkulation
Tabellenkalkulation
Fragevon danielG vom 10.07.2019, 10:46 Options
Alternative Menüfunktionen
Hallo Forum,
ich habe in ein Arbeitsblatt in eigenes Menü eingebaut. Nun möchte ich beim Abrufen der Menüfunktion "Sortieren", in Abhängigkeit von dem jeweils aktiven Tabellenblatt, unterschiedliche Makros ausführen.
Das verwendete VBA-Makro, bei dessen Aufruf bisher immer das gleiche Makro aufgerufen wird, sieht u.a. so aus:
Was ich erreichen möchte ist, dass beim Abrufen der Menüfunktion "Sortieren"
bei aktivem "Tabellenblatt_1" das Makro Sortieren_1,
bei aktivem "Tabellenblatt_2" das Makro Sortieren_2
bei aktivem "Tabellenblatt_3" das Makro Sortieren_3 usw.
aufgerufen wird.
Kann man das in dem .OnAction-Parameter definieren oder
gibt es eine andere Lösungsmöglichkeit?
Danke für jede Hilfe
daniel
ich habe in ein Arbeitsblatt in eigenes Menü eingebaut. Nun möchte ich beim Abrufen der Menüfunktion "Sortieren", in Abhängigkeit von dem jeweils aktiven Tabellenblatt, unterschiedliche Makros ausführen.
Das verwendete VBA-Makro, bei dessen Aufruf bisher immer das gleiche Makro aufgerufen wird, sieht u.a. so aus:
With MB
.Caption = _
"Sortieren"
.OnAction = "Sortieren_1"
Was ich erreichen möchte ist, dass beim Abrufen der Menüfunktion "Sortieren"
bei aktivem "Tabellenblatt_1" das Makro Sortieren_1,
bei aktivem "Tabellenblatt_2" das Makro Sortieren_2
bei aktivem "Tabellenblatt_3" das Makro Sortieren_3 usw.
aufgerufen wird.
Kann man das in dem .OnAction-Parameter definieren oder
gibt es eine andere Lösungsmöglichkeit?
Danke für jede Hilfe
daniel
Antwort 1 von Arno_Nym vom 10.07.2019, 14:18 Options
Ich würde es andersrum angehen, nämlich nur ein Makro verwenden (OnAction zuweisen) und in diesem Makro dann mittels Abfrage der Tabelle verzweigen...
Also ungefähr so:
Arno
Also ungefähr so:
Sub Sortieren_Makro()
If ActiveSheet.Name = "Tabelle1" Then
blabla...
End If
If ActiveSheet.Name = "Tabelle2" Then
blabla...
End If
If ActiveSheet.Name = "Tabelle3" Then
blabla...
End If
End Sub
Arno
Antwort 2 von danielG vom 10.07.2019, 16:12 Options
@Arno,
danke für den Tip, hab's so gemacht wie vorgeschlagen und es läuft wie gewünscht.
Gruss
daniel
danke für den Tip, hab's so gemacht wie vorgeschlagen und es läuft wie gewünscht.
Gruss
daniel
Ähnliche Themen
PHP - Alternative zum echo() ???
php_freak90 01.03.2007 - 110 Hits - 2 Antworten
Freeware-Alternative zu Nero
lauflist 18.03.2007 - 270 Hits - 6 Antworten
Alternative zu Pagemaker
Schwabe 18.09.2007 - 118 Hits - 2 Antworten
Outlook Alternative
Lichtfudd 08.11.2007 - 154 Hits - 1 Antwort
dumeter alternative freeware
dumeter 02.05.2008 - 42 Hits - 3 Antworten
Hinweis
Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..
Neue Einträge
