Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 17:49:39
Bedingte Formatierung
25.04.2024 16:50:59
2 Zellen in 2 Blättern mit unterschiedlichen Bereichen vergl
25.04.2024 15:03:35
Unterschiedliche Dateien miteinander abgleichen lassen
25.04.2024 14:05:48
Makro in aktueller Zelle ausführen mit Doppelklick
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
900to904
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
900to904
900to904
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

SendKeys VBAProject schützen

SendKeys VBAProject schützen
05.09.2007 09:21:00
Joe
Hallo,
mit folgendem VBA Code kann ich das VBA Project für die Anzeige sperren (schützen). Ich möchte von Arbeitsmappe A den Code aufrufen und das VBAProject der Arbeitsmappe B sperren. Leider wird immer nur das VBAProject aus dem auch der Code aufgerufen wurde gesperrt. Hat jemand eine Idee, ich bekomme es nicht hin?
SendKeys "%XI{Tab 9}^{RIGHT}%A%K123456%S123456{ENTER}"
Gruß
Joe

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: SendKeys VBAProject schützen
05.09.2007 10:13:05
sergiesam
Hi,
du musst vorher das zu schützende Projekt aktivieren. Dazu solltest du einen anderen Namen für das Projekt als "VBAProject" nehmen. Markiere dazu im Projektbaum deine Excelmappe (z.B. VBAProjekt (Mappe1)) und drück F4 - damit bekommst du die Eigenschaften. Wähle hier als (Name) z.B. "MeinProjekt"
dann hat es bei meinem Projekt geklappt, wenn gleich man sagen muss, dass das Sendkeys-Objekt ein doch unzuverlässiges ist, da man nie weiß, ob die Tastenanschläge wirklich zur richtigen Zeit ausgeführt werden.
Im Code merke ich mir das aktuelle Modul, dann wechsle ich in das andere Modul, sperre das Projekt und kehre wieder zum aktuellen Modul zurück.
ich habe auch den WAIT-Parameter beim Sendkeys auf TRUE gesetzt, damit er mit den Tastenanschlägen wartet, bis das andere Projekt wirklich sichtbar ist. Hier kannst du ja experimentieren.

Sub test()
Dim activePane As Object
Set activePane = Application.VBE.ActiveCodePane
Application.VBE.VBProjects("MeinProjekt").VBComponents("Modul1").CodeModule.CodePane.Show
SendKeys "%XI{Tab 9}^{RIGHT}%A%K123456%S123456{ENTER}", True
activePane.Show
End Sub


lg,
Sam

Anzeige

41 Forumthreads zu ähnlichen Themen

Application.Sendkeys
Benoit

Hat jemand von euch die VBA-Funktion
Application.Sendkeys ("+{F9}", True)
erfolgreich implementiert?Ohne den "True" geht es! Aber ich brauche eben mit "True"Vielen dank für hilfeBenoitHintergrund:
diese Funktion simuliert das Tastatureingabe von
Shift + F9, das die Neuberech...
10.04.2002 17:41:02
Thread-ID: 112210
3 Beiträge
Anzeige
VBA Button finden im Internetexplorer + sendkeys
chris

Hallo VBA Experten,
ich benötige wieder einmal eure Hilfe. Würde mich sehr freuen wenn es eine Lösung für mich gibt ?!
Ich will mal wieder Excel VBA Missbrauchen für eine andere Anwendung.
Den InternetExplorer oder OPERA.
Ich will mit VBA z.b alle 15 Minuten einen Button drücken...
09.09.2010 20:56:24
Thread-ID: 1176503
3 Beiträge
Application.Sendkeys
Frank

Hallo Leute,
ich sende mit Application.SendKeys ("%+(BVWS)") den Befehl zum updaten der Verknüpfungen an Excel.
Obwohl ich das Makro mit Application.Screenupdating = false eingefasst habe, ist der Vorgang am Bildschirm zu sehen. Kann man das Abschalten?
VG,
Frank
PS: Ich bra...
18.02.2011 09:50:46
Thread-ID: 1201638
5 Beiträge
Anzeige
Application.SendKeys
Albert

Hallo zusammen,
kann mir jemand sagen, wie man mit SendKeys die Tastenkombination aus Alt und der Eins schicken kann?
Dank und Gruß
A.
25.03.2013 15:26:57
Thread-ID: 1305914
7 Beiträge
VBA-Spaltenvergleich in zwei Tabellen
Peter

Hallo,
ich vergleiche die Spalte 2 der Tab. „Bestand“ mit der Spalte 4 der Tab. „GesDaten“.
Bei Übereinstimmung werden die Werte in die Tab. „GesDaten“ übernommen und mit „Aktuell“ gekennzeichnet. –Funktioniert soweit-
Da die Tab. „Bestand“ Leerzeilen enthält werden diese mit in di...
06.08.2013 07:08:59
Thread-ID: 1325856
3 Beiträge
Aktivierung und Sendkeys bei Notepad per VBA-Excel
Markus

Hallo,ich möchte gerne eine Datei in Notepad öffnen. Anschließend diese aktivieren und per Sendkeys Tastaturbefehle absetzen. Danach sollte die Datei unter gleichem Namen gespeichert werden und die Anwendung notepad geschlossen.
Das ganz natürlich per VBA in Excel. Ich habe derzeit folgenden...
16.07.2002 09:11:34
Thread-ID: 136884
2 Beiträge
Excel VBA Combobox Inhalt aus anderer Tabelle
MaddyHa

Guten Tag,
ich habe da ein Problem und hoffe hier einige Experten zu finden, die mir helfen können :)
So, ich versuche nun mal es so genau wie möglich zu erklären:
Ich habe eine Userform mit einer ComboBox, welche ich mit Inhalt füllen möchte.
Diese Userform wird durch einen But...
26.08.2014 11:36:00
Thread-ID: 1378217
7 Beiträge
Tabelleninhalt mittels vba übertragen
Klet

Hallo,
ich komme mit meinem zusammengefrickelten Code nicht weiter.
Ich habe zwei Excel-Tabellen. In der liste.xlsx stehen die Werte, die in die stat.xlsm beim klick auf "Schaltfläche" ausgegben werden sollen.
Ich möchte allerdings, dass die Werte ab der nächsten freien Zelle einget...
03.12.2014 14:30:40
Thread-ID: 1395938
6 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
2
2
4
4
6
2
1
6
5
6
1
3
2
14
2
5
8
13
4
6
1
4
3
6