Office: bestimmte Tastenkombi per Makro aufzeichnen

Tach zusammen, ich hab mich grad erstmals mit den Makros und sowas :lol: beschäftigt, also nOOb.

Vll. kann mir wer helfen, ich zeichne ein neues Makro auf, welche folgende Aktionen enthalten soll:

Vom derzeitigen Abeitsblatt zu einem anderen - Klick B2 - ALT gedrückt+PfeiltasteHoch - POS1 - Pfeiltaste(Runter;1-8x) - ENTER - zurück zum Ausgangs-Arbeitsblatt.

Das Makro zeichnet die die ALT-Taste nicht mit auf und wird auch nicht mit geschrieben, wenn man sich das in VB anguckt, dann wird alles nach B2 gecutted.

Code:

    Sheets("Seite 1").Select
    Range("B1").Select
    Sheets("Seite 9").Select
End Sub

Vielen Dank für mögliche Tips :-)

 

Hallo!

Tastenkombis kannst du mit dem VBA-Befehl "SendKeys" programmieren.
Allerdings ist eine direkte VBA-Programmierung immer besser als die Aufzeichnungen des Makro-Rekorders, da dieser auch sehr viele unnötige Sachen mit aufzeichnet.

 

Danke.

Das hab ich zwischenzeitlich in der Hilfe auch gefunden und ausprobiert, funzt aber nicht richtig

Mir ist aber aufgefallen das es wohl daran liegt, das nach dem Klick auf B2, nicht die Zelle "gemeint" ist, sondern scheinbar das Fenster (Kontextmenü oben links geht auf, mit Wiederherstellen, schliessen usw.)

Ich hatte vergessen zu erwähnen, das sich hinter B2 eine Gültigkeit mit Dropdown verbirgt. Dieses sollte eben per Makro ausgewählt werden.

Ich bin schon ganz froh, das ich das soweit hinbekommen habe, vba kann ich nicht, das schnall ich nicht alles.

 

Hallo!

Ich glaube, einen bestimmten Eintrag aus einem Gültigkeitsdropdown kann man per VBA nicht ansteuern...
Aber warum schreibst du den gewünschten Begriff nicht einfach auf direktem Wege in die Zelle?

Sheets("MeinBlatt").Range("B2") = "Begriff"

 

Hm, verstehe nicht was du meinst???

Die Gültigkeit beihaltet Tabellenseiten von 1-9. Je nachdem welche ausgewählt wird, wird in Bezug genommen auf die darunterliegende Hilfstabelle, die zur Berechnung von Werten auf der jeweils ausgewählten Seite steht.
Somit brauchte ich nicht 9 Tabellen anlegen, ich muss sie halt auswählen. Und da dachte ich, das ich das per makro ansteuern kann, um nicht jedesmal selbst das Blatt wählen muss, ich führe zB. auf Blatt1 das makro aus und es wird dann aus dem Dropdown der Eintrag von Blatt1 gewählt.
Und für die anderen Blätter .

 

Hallo!

Du möchtest in die Zelle B2 den Namen des aktiven Blatts schreiben?

Code:

Sub irgendwas()
Sheets("Blattname").Range("B2") = ActiveSheet.Name
End Sub

Rufst du das Makro aus "Tabelle3" heraus auf, dann steht danach in Blattname!B2 "Tabelle3".

 

Ich glaube nein, zumindest so, wie ich dich jetzt verstanden habe.

Achso, bin grad am probieren, ich glaub das geht :shock: :-)

Muss mal eben ein bischen weiter testen.

Ich poste nochmal, wenn ich es mit Sicherheit weiss! :-)

 

*logischedenkblockade*

das klappt 1A

ich danke dir schatzi :-)