Sendkeys für Sprung in Modulebene

25.11.2024 16:43:33

Dieter(Drummer)

Guten Tag an alle,

ich suche den Code zum aktivieren der Modulebene. Also vom Tabellenblatt Sprung in die Modulebene.
Das es mit den Tasten "Fn+Alt+F11" geht, ist mir bekannt. Ich suche aber die Möglichkeit per Sendkeys.

Mein Versuch mit :

Sub ModulEbene()

Application.SendKeys ("{FN)+{%)+{F11}")

End Sub

funktioniert leider nicht und bricht mit Fehler: "Laufzeitfehler 1004, Die Methode "Sendkeys für das Objekt Objekt '_Application' ist fehlgeschlagen.

Ich kann den Fehler nicht finden und bitte um Hilfe, für funktionierenden Code.

Gruß,
Dieter(Drummer)

AW: Sendkeys für Sprung in Modulebene

25.11.2024 16:48:33

Onur

"Sprung in Modulebene" ??? Was bitte soll das denn sein?

Also von Sendkeys...

25.11.2024 17:41:57

Case

Moin :-)

... rate ich - wenn möglich - in der Regel ab. :-)

Du kannst den VBA-Editor z. B. so aufrufen: ;-)

Application.CommandBars.FindControl(ID:=1695).Execute

Oder auch so: ;-)

Application.VBE.MainWindow.Visible = True

ThisWorkbook.VBProject.VBComponents("Modul1").CodeModule.CodePane.Show

'ThisWorkbook.VBProject.VBComponents("DieseArbeitsmappe").CodeModule.CodePane.Show

'ThisWorkbook.VBProject.VBComponents("Tabelle1").CodeModule.CodePane.Show

'ThisWorkbook.VBProject.VBComponents("UserForm1").CodeModule.CodePane.Show

Da landest du direkt bei "Modul1" - wenn es das gibt. ;-)

Durch die "auskommentierten" Codezeilen kommst du eben direkt zu z. B. Tabelle1, oder UserForm1. ;-)

Servus
Case

AW: Also von Sendkeys...

25.11.2024 17:53:02

Dieter(Drummer)

Danke Case,

für deine Infos und Codes. Damit kann ich auch etwas anfangen.

Gruß,
Dieter(Drummer)

AW: Also von Sendkeys...

25.11.2024 19:33:35

Luschi

Hallo Dieter,

mit 'Application.SendKeys' habe ich seit MS-Office 4.2 (1994) hantiert und eigentlich ging alles gut bis MS-Vista aufkam und man plötzlich auf API umsteigen mußte, um SendKeys für bestimmte Tastenkombinationen noch realisieren zu können.
Irgendwann machte Alt+F11 per Sendkeys nur noch Blödsinn und meine tollte Technologie:
- Vba-geschützte Dateien zu entschützen
- Module auszutauschen
- Vba-Kennwortschutz wieder setzen
- Datei speichern und alles war paletti
- dies Alles passierte beim Kunden vor Ort und nicht bei mir in klein-Paris

- diese Technologie läuft heute nur noch bis zum Entsperren des Vba-Kennwortschutzes
- dann ist Schluß!
- der dann eigentlich folgende Vba-Befehl aktiviert wieder den Vba-Kennwortschutz
- und alles ist im Eimer
- M$ tut also Einiges um die Tastenkombination Alt+F11 per Vba zu verhindern!

Gruß von Luschi
aus klein-Paris

AW: Also von Sendkeys...

26.11.2024 09:50:59

Dieter(Drummer)

Guten Morgen Luschi,

danke auch dir für deine Erläuterungen. Manchmal ist halt nicht sinnvoll, sich vermeintlich mit Sendkeys ein leichteres Handling zu ermöglichen.

Gruß und einen erfolgreichen Tag,
Dieter(Drummer)

AW: Sendkeys für Sprung in Modulebene

25.11.2024 16:54:51

Dieter(Drummer)

Danke Onur für Rückmeldung.

Modulebene ist für mir einfach der Bereich, wo ich Codes (Makros) eingeben kann.

Gruß,
Dieter(Drummer)

AW: Sendkeys für Sprung in Modulebene

25.11.2024 17:12:52

daniel

Hi
kannst du mal erklären, wie du auf die Idee gekommen bist, hier unterschiedliche Klammern zu kombinieren (Öffnen mit "{", Schließen mit ")") ?????
bei mir funktioniert das Öffnen des VBA-Editors mit diesem Code ("%" für ALT und dann die F-Taste):

Application.SendKeys "%{F11}"

beachte, dass du SendKeys nicht im Einzelstepmodus testen kannst, sondern nur in der normalen Ausführung und das Makro natürlich aus Excel heraus gestartet werden muss.

Gruß Daniel

AW: Sendkeys für Sprung in Modulebene

25.11.2024 17:28:23

Dieter(Drummer)

Danke Daniel,

dein Code funktioniert und wird natürlich aus Excel heraus gestartet.
Die unterschiedlichen Klammern waren ein blöder Versuch.

Warum der Code mit aktivieren der Alt Taste und F11 funktioniert und wenn ich es auf meinem Laptop nur mit FN+Alt+F11 geht, ist mir nicht bekannt aber nun auch nich mehr wichtig. Meien F11 Taste hat wohl 2 funktionen, eine mit Fn = F11 fintion und eine ohne Fn = Bildschirm Helligkeit weniger.

Danke und noch einen schönen Resttag.

Gruß,
Dieter(Drummer)

AW: Sendkeys für Sprung in Modulebene

25.11.2024 18:15:14

Yal

Hallo Dieter,

es liegt daran, dass auf deinem Laptop die Funktionstasten (F1-F12) doppelt allokiert sind und in "Laptop"-Zustand für die Komfortfunktion stehen: Mikro an/aus, Ton hoch/runter, usw. Wenn Du die "fn"-Taste drückst, verstellt Du nur den Tastatur in "Standard"-Zustand, um F11 als F11 zu haben. Die Aktion findet nur auf der Ebene der Tastatur-Elektronik. Aber intern wird dem Excel eine "Alt-F11" weitergeleitet, was zum Öffnen vom Visualbasic-Editor führt.

Du kannst aber auch den Editor so öffnen:

Sub test()

    Application.VBE.CodePanes(1).Show

End Sub

Und noch besser: Du kannst mit Alt+F8, dann "Optionen..." eine Tastenkombination diesem Makro zuweisen, um diese per Tastenkombi zu starten.
Diese muss mit "Strg" kombiniert werden. Man kann aber keine Funktionstaste zuweisen. Schade. Sonst hätte ich Dir empfohlen, "Strg+F11" zu verwenden. Natürlich müsstest Du auf deinem Laptop fn+Strg+F11 verwenden.

Aber diesmal im Ernst: irgendwelche Bastelei, weil man sich 2 Tastendruck sparen möchte, habe ich auch als Anfänger gemacht. Und dann irgendwann festgestellt, dass fn+Alt+F11 und anschliessend Strg+F1 ist extrem schnell gemacht und funktioniert auch auf Rechner, wo meine Makro nicht installiert waren.

VG
Yal

AW: Sendkeys für Sprung in Modulebene

26.11.2024 09:45:05

Dieter(Drummer)

Guten Morgen Yal.

Danke für deine ausführliche Erklärung. So kann ich mich damit beschäftigen.

Gruß,
Dieter(Drummer)

AW: Sendkeys für Sprung in Modulebene

25.11.2024 16:55:57

Onur

Das nennt sich "VBA-Editor".

AW: Sendkeys für Sprung in Modulebene

25.11.2024 16:59:54

Onur

Und wozu? Was genau hast du denn vor?

AW: Sendkeys für Sprung in Modulebene

25.11.2024 17:08:22

Dieter(Drummer)

Danke für Info ...

Ich möchte per Sendkeys dann direkt in die Option "Excel Hilfe", also in die Eingabe für den Suchbegriff zur Excel Hilfe gehen.

Gruß,
Dieter(Drummer)

Sendkeys für Sprung in Modulebene

Forumthread: Sendkeys für Sprung in Modulebene

13
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Sendkeys für Sprung in Modulebene

Forumthread: Sendkeys für Sprung in Modulebene

13 Beiträge zum Forumthread Beiträge zu diesem Forumthread

13
Beiträge zum Forumthread

Beiträge zu diesem Forumthread