Neues Thema erstellen

Excel-Makro, wenn Excel den Focus bekommt.?

Helfe beim Thema Excel-Makro, wenn Excel den Focus bekommt.? in Windows 10 Support um eine Lösung zu finden; Ich möchte also, dass das Makro sofort startet, wenn ich von einer anderen Anwendung mit <alt>+<tab> zu Excel wechsle.... Dieses Thema im Forum "Windows 10 Support" wurde erstellt von Dreieck002, 24. April 2020.

  1. Dreieck002
    Dreieck002 Gast

    Excel-Makro, wenn Excel den Focus bekommt.?


    Ich möchte also, dass das Makro sofort startet, wenn ich von einer anderen Anwendung mit <alt>+<tab> zu Excel wechsle.

    :)
     
    #1 Dreieck002, 24. April 2020
  2. Hobi Expert
    Willkommen,

    Versuche folgende Schritte abzuarbeiten:
  3. St3fan
    St3fan Neu hier
    Registriert seit:
    24. April 2020
    Beiträge:
    12
    Zustimmungen:
    0

    Hallo,

    über den Event-Handler (vermutlich Application-Objekt). Ist aber bei mir einfach zu lange her. Das solltest du in spezifischen Foren suchen.

    VG Stefan
     
    #2 St3fan, 24. April 2020
  4. Nepumuk
    Nepumuk Windows User
    Registriert seit:
    7. Dezember 2017
    Beiträge:
    679
    Zustimmungen:
    61
    Hallo,

    in ein Standardmodul:

    Option Explicit
    Option Private Module
    Private Declare PtrSafe Function SetTimer Lib "user32.dll" ( _
    ByVal hwnd As LongPtr, _
    ByVal nIDEvent As LongPtr, _
    ByVal uElapse As Long, _
    ByVal lpTimerFunc As LongPtr) As LongPtr
    Private Declare PtrSafe Function KillTimer Lib "user32.dll" ( _
    ByVal hwnd As LongPtr, _
    ByVal nIDEvent As LongPtr) As Long
    Private Declare PtrSafe Function GetParent Lib "user32.dll" ( _
    ByVal hwnd As LongPtr) As LongPtr
    Private Declare PtrSafe Function GetForegroundWindow Lib "user32.dll" () As LongPtr
    Public gblnActiv As Boolean
    Public Sub StartTimer()
    Call SetTimer(Application.hwnd, 0, 100&, AddressOf TimerProc)
    End Sub
    Public Sub StopTimer()
    Call KillTimer(Application.hwnd, 0)
    End Sub
    Private Sub TimerProc(ByVal pvlngptrHwnd As LongPtr, ByVal pvlngptrEventID As LongPtr, _
    ByVal pvlngElapse As Long, ByVal pvlngptrTimerFunction As LongPtr)
    Dim lngptrForegroundHwnd As LongPtr

    lngptrForegroundHwnd = GetForegroundWindow

    If lngptrForegroundHwnd = pvlngptrHwnd Or _
    GetParent(lngptrForegroundHwnd) = pvlngptrHwnd Then
    If Not gblnActiv Then
    gblnActiv = True
    Call Hallo
    End If
    Else
    gblnActiv = False
    End If
    End Sub
    Public Sub Hallo()
    Call MsgBox("Hallo", vbInformation, "Info")
    End Sub
     
    #3 Nepumuk, 25. April 2020
Auf dieses Thema antworten
Thema:

Excel-Makro, wenn Excel den Focus bekommt.?

Die Seite wird geladen...

Excel-Makro, wenn Excel den Focus bekommt.? - Ähnliche Themen - Excel Makro Excel

 Forum Datum

Excel

Excel: excel zahlenwert einer zelle in einer anderen zelle als text darstellen Weiterlesen...

 Windows 10 Support 21. Juli 2023

Excel

Excel: Hallo zusammen Da ich und Excel keine guten Freunde sind benötige ich eure Hilfe. Ich habe eine Vorlagetyp Mitarbeiter-Abwesenheitsplan von Excel zur Weiterbearbeitung ausgwählt und nun stecke ich fest. Bei der Tabellenauflistung unten, kann man die Monate sehen zusätzlich noch eine Tabelle mit...

 Windows 10 Support 4. Mai 2021

Excel fragen?

Excel fragen?: 1.In welche vier Gruppen kann die Titelleiste der Excel Arbeitsoberfläche unterteilt werden? 2.Nenne 3 beliebige mathematische Berechnungen die Sie mit Excel durchführen können. 3.Was sind kontextbezogene Registerkarten in Excel https://www.gutefrage.net/frage/excel-fragen-2

 Windows 10 Support 25. Februar 2021

Excel

Excel: Hallo, ich habe letztens ein Funktionsupdate für Windows 10, Version 2004 durchgeführt. Nun wollte ich mit Excel arbeiten, dort bekomme ich nun folgende Meldung:Microsoft Office kann die Lizenz für dieses Produkt nicht überprüfen. Reparieren Sie das Office-Programmüber die Systemsteuerung. In...

 Windows 10 Support 26. Juni 2020

Excel Suche?

Excel Suche?: Hallo, Ist es in Excel möglich ein Suchfeld zur erstellen, bei dem man mehrere Werte aus einer Tabelle suchen kann (z.B. Namen) und nach der Eingabe der Werte nur noch die Zeilen angezeigt werden nach denen gesucht wurde? https://www.gutefrage.net/frage/excel-suche-2

 Windows 10 Support 13. Juni 2020

Excel solver

Excel solver: Hallo zusammen, ich wollte soeben den Solver unter Excel 2010 aktivieren und musste ihn dazu zunächst installieren, was ich auch getan habe, indem ich den Anweisungen gefolgt bin. Ich habe nun aber das Problem, dass der Solver anscheinend nicht funktioniert. Im Abschnitt Daten wird mir der...

 Windows 10 Support 26. Oktober 2018

Excel 2016 erscheint nicht als Standardapp?

Excel 2016 erscheint nicht als Standardapp?: Hallo, nach einer Online-Installation von Microsoft Office 2016 Professional konnte ich alle Anwendungen (word, outlook, powerpoint etc) als Standardprogramme festlegen. Nur Excel erscheint nicht in der Auswahl der Programme und auch eine Zuordnung über die Dateiformate klappt nicht...

 Windows 10 Fehler und Bluescreens 12. Mai 2016

Word und Excel

Word und Excel: Ich habe einen neuen PC gekauft und möchte nun die Windowsprogramme Excel und Word, welche ich mit meinem alten (5-jährigen) PC legal erworben habe Wie gehe ich vor?auf den neuen PC herunterladen. Besten Dank im Voraus für Ihre geschätzte Hilfe. Gruss aus Tagelswangen Weiterlesen...

 Windows 10 Support 21. November 2015

Excel-Makro, wenn Excel den Focus bekommt.? [gelöst]

  1. Diese Seite verwendet Cookies. Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies.
    Auf dieser Website werden Cookies für die Zugriffsanalyse und Anzeigenmessung verwendet.
    Accept Weitere Informationen
    Information ausblenden