Hallo Leute,
ich habe soeben mich dazu entschieden mit VBA anzufangen. Vorrangig geht es mir aber um folgendes:
Ich habe mehrere Gruppierungen vor mir liegen und würde gerne bei Aktivieren der darüberliegenden Zelle und Betätigen einer Tastenkombination die Gruppe, die unter der aktivierten Zelle liegt, auf bzw. Zuklappen. Ich habe das schon mal gesehen wusste aber damals nicht wie das gemacht wurde usw.
Ich bekomme folgendes hin:
1. mit ActiveSheet.Outline.ShowLevels RowLevels:=X schaffe ich es alle vorhandenen Gruppierungen auf bzw. zuzuklappen, auch mit Tastenkombi!
2. mit Rows(2).ShowDetail = True schaffe ich es nur eine Gruppe aufzuklappen. Problem an dieser ganzen Geschichte ist, dass meine Tastenkombi aber nicht will! Für die Tastenkombi verwende ich folgenden Code: Application.OnKey "^%{PGUP}" . Weiterhin klappen die Gruppen komischerweise auf wenn ich auf die erste Zelle A1 klicke wenn ich Rows(12).ShowDetail = True eingebe, dann öffnet sich zwar die zweite Gruppe, aber auch nur wenn ich die aller erste Zelle A1 anklicke. Ich verstehe das Null komma Null was da vor sich geht.
Warum wird das Makro bei Anklicken der ersten Zelle aktiviert, obwohl als Tastenkombination Strg+Alt+BILDHOCH programmiert wurde.?
Ich habe mir dann eigentlich gedacht, dass man ne if schleife bastelt. Also wenn Tastenkombi XY gedrückt wird dann kalppt er die Gruppierung auf, aber nur die bei der aktiven Zelle. Aber das übersteigt meine derzeitigen VBA Kentnisse. Eventuell kann mir da jemand helfen bzw. auch ein gutes Buch/ Link etc. vorschlagen, damit ich mich da mal reinlesen kann. Ist nämlich ziemlich frustierend.
http://imageshack.com/a/img921/9287/ikDmRS.png
Das ist meine Testmappe. Wie oben Beschrieben sollte das Ziele sein bei Aktivieren der Zellen A1, B1, C1, D1 oder A11, B11, C11, D11 durch die Tastenkombination nur die jweilige darunterliegende Gruppierung auf- oder zuzuklappen. Falls ich es zu dämlich formuliert habe dann sagt einfach Bescheid.
Viele Grüße
Marcel
|