Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1132to1136
1132to1136
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

AppActivate & Nummernblockphänomen

Forumthread: AppActivate & Nummernblockphänomen

AppActivate & Nummernblockphänomen
Mario
Guten Morgen,
vielleicht hat jemand ja einen Lösungsansatz / Erklärung für folgendes Problem.
Per Shell öffne ich ein Programm. Ist in der Zelle C11 ein Wert gesetzt, schließe ich das Programm direkt wieder per Sendkey (Alt+F4).
Hier der Auszug aus meinem code:
....
Status = Shell("C:\Programm.exe", 1)
If ActiveSheet.Range("C11").Value = True Then
AppActivate Status
SendKeys "%{F4}", True
End if
Gehen wir von True aus - die Bedingung ist also erfüllt und Programm.exe soll direkt wieder geschlossen werden.
Frage 1) wieso schaltet sich dann der Nummernblock nach Ausführen des Codes manchmal ein bzw. aus?
Frage 2) Excel ist deaktiviert und lässt sich nur per Mausklick wieder aktivieren. Kann ich die Task-Id der Arbeitsmappe welche meinen Code enthält irgendwie auslesen und dann per AppActivate wieder aktivieren? AppActivate ("Microsoft Excel") und ähnliche Versuche funktionieren nicht.
Vielen Dank!
mario
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
dies liegt an SendKeys ...
28.01.2010 08:47:44
Tino
Hallo,
versuch mal sowas.
Private Declare Function OpenProcess Lib "kernel32" ( _
ByVal dwDesiredAccess As Long, _
ByVal bInheritHandle As Long, _
ByVal dwProcessId As Long) As Long
Private Declare Function TerminateProcess Lib "kernel32" ( _
ByVal hProcess As Long, _
ByVal uExitCode As Long) As Long
Private Declare Function CloseHandle Lib "kernel32" ( _
ByVal hObject As Long) As Long
Sub test()
Dim lTaskID As Double
Dim lhwnd As Long, lResult As Long
lTaskID = Shell("C:\Windows\system32\notepad.exe", 1)
'Task beenden
lhwnd = OpenProcess(1&, 0&, CLng(lTaskID))
TerminateProcess lhwnd, 1&
lResult = CloseHandle(lhwnd)
If lResult = 1 Then MsgBox "Prog geschlossen"
End Sub
Gruß Tino
Anzeige
AW: dies liegt an SendKeys ...
28.01.2010 09:07:13
Mario
mann-oh-mann!
das klappt einfach PRIMA!!!! :-)
Vielen herzlichen Danke Tino!
mario
;

Forumthreads zu verwandten Themen

Lock-funktion funktioniert nicht :(
Riccardo

Hallo Leute,
ich habe einmal eine banale Frage. Ich habe einen Code geschrieben, der eine lock-funktion enthält. Im Normalfall hat das so auch immer funktioniert, aber aus irgendeinem Grund funktioniert das in folgendem Beispiel nicht:
If (Target.Address = "$H$6") Then If (ActiveSheet.R...
20.12.2012 10:33:29
Thread-ID: 1291659
13 Beiträge
Anzeige
NUM-Lock-Taste
Achim

Hallo Excel-Profi's
Gibt es in Excel eine möglichkeit, dass die NUM-lock Taste
immer eingeschaltet bleibt.
Habe nämlich ein Programm, das ich mit der NUM-Lock Taste
abfragen machen muss und daher immer hin und her wechsle.
Danke im vorraus
Achim

14.06.2002 09:55:05
Thread-ID: 128650
3 Beiträge
Anzeige
Seitenumbruch per Makro funktioniert leider nicht
claus

Ich möchte dass immer vor der Spalte in der "Hier" steht ein Seitenumbruch eingefügt wird. Der Wert "Hier" muss nur in der Zeile 1 gesucht werden.
Ich habe versucht diesen Makro zu erstellen. Habe es aber leider nicht hinbekommen.
Bitte beachte, dass es sich hier um Vertikale Seitenumb...
23.08.2013 15:44:08
Thread-ID: 1328158
2 Beiträge
IsNumeric funktioniert nicht
Wolfgang

Hallo,
was ist hiermit falsch?Set rng = ActiveWorkbook.Worksheets(1).Range("AK1:AV71")
For Each r In rng
If Not IsNumeric(r) Then r = ""
NextIch möchte im zugewiesenen Bereich alles löschen, bis auf die Zahlen. Habe ich einen Gedankenfehler?
Gruß
Wolfgang

26.02.2003 17:13:56
Thread-ID: 224666
5 Beiträge
zeilenumbruch funktioniert nicht mehr
dragon

Hallo,
ich habe eine Rechnungsvorlage erstellt und muss jetzt feststellen, das der Zeilenumbruch nicht funktioniert.
Der ist aber wichtig. Habe Blattschutz aktiviert damit nur die Zellen offen sind, in die etwas eingetragen werden muss.
Weiss jemand Rat für mich? :-(

15.06.2003 19:50:57
Thread-ID: 269040
23 Beiträge
NumLock Taste per VBA betätigen
Monika
Hallo liebe Excelfreunde,

wer kann mir sagen, wie ich die NumLocktaste mit einem
VBA-Befehl betätigen kann, so dass die Lampe auf der Tastatur
an und aus geht.

Vielen Dank und liebe Grüße
Monika
02.12.2003 13:45:10
Thread-ID: 346319
6 Beiträge
Nummerischen-Block deaktivieren
Frank-Roberto
Hallo Forum,
ich möchte, dass bei einer bestimmten Datei alle Tastatureingaben, unter anderem auch die über den Nummernblock nicht möglich sind.
Die Maus soll aber weiterhin aktiv sein.
Tastatur ist mir bekannt "Application.OnKey usw" jede Taste für sich ansprechen.
Aber wie kann ich...
15.04.2004 23:21:32
Thread-ID: 414203
11 Beiträge
Anzeige
Zeilenumbruch funktioniert nicht bei langen Texten
Jo

Liebe Experten,
ich stehe einfach an!
Wen ich einen längeren Text in eine Telle kopiere [egal ob manuell oder per Verweise durch =INDEX(INDIREKT(race);99)], dann wird ab einer gewissen Stelle nicht mehr umgebrochen, obwohl die Zelle mit "Zeilenumbruch" formatiert ist.
Das kann jederz...
19.01.2005 20:20:13
Thread-ID: 550695
5 Beiträge
NUMLOCK Nepumuk CODE an 64Bit Anpassen
Chris

Hallo VBA-Experten,
ein von mir sehr geschätzter "NUMLOCK" CODE von NEPUMUK (Danke nochmals!!!), als Abschluss von SendKeys Befehlen, funktioniert mit 32-Bit perfekt. Er sieht so aus: Option Explicit Private Declare Sub keybd_event Lib "user32.dll" ( _ ByVal bVk As Byte, _ ByVal bScan As B...
21.01.2021 21:25:26
Thread-ID: 1807425
9 Beiträge
Anzeige
Zeilenumbruch in VBA funktioniert nicht
Tobi
Hallo Leute .. ich möchte Werte (114 Stück) in eine Datenbank schreiben.
Allerdings bekomme ich den Zeilenumbruch nicht hin.
Egal wo ich das " _" einsetzte ensteht ein Fehler beim Kompelieren.
Kann mir jemand helfen?
Hier ein Beispiel der Formel ( die Namen sind nur Platzhalter ......
05.11.2021 23:30:33
Thread-ID: 1855288
4 Beiträge
rechte Maustaste funktioniert nicht immer
Jonathan

Hey,
auf meinem Rechner funktioniert die rechte Maustaste in Excel 2007 nicht immer. So z.B. nicht beim Rechtsklick auf die Zellenüberschriften. Ich habe im Internet zwar einen Code gefunden, zum Aktivieren, aber sobald ich Excel erneut öffne, funktioniert es wieder nicht.
Ich nutze kei...
24.06.2011 23:39:30
Thread-ID: 1219602
3 Beiträge
NUM-Lock-Taste
Achim

Hallo Excel-Profi's
Gibt es in Excel eine möglichkeit, dass die NUM-lock Taste
immer eingeschaltet bleibt.
Habe nämlich ein Programm, das ich mit der NUM-Lock Taste
abfragen machen muss und daher immer hin und her wechsle.
Danke im vorraus
Achim

14.06.2002 09:55:05
Thread-ID: 128650
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige