Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1996to2000
1996to2000
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

Browserverlauf löschen per Sendkeys

Forumthread: Browserverlauf löschen per Sendkeys

Browserverlauf löschen per Sendkeys
06.12.2024 15:49:55
Dieter(Drummer)
Guten Tag an alle und eine schönen Nikolaustag.

Mit Sendkeys möchte ich per Code den Browserverlauf löschen. Per Tasten funktioniert es mit: "Strg+Alt+CLL"

Mein jetziger Sendkey Versuch funktioniert nicht und ich finde den Fehler nicht: 
Sub Browser_loeschen()

Application.SendKeys "^%CLL}"

End Sub

Fehleranzeige "Laufzeitfehler 1004, Die Methode Sendkeys für das Objekt _Application ist fehlgeschlagen".

Mit der Bitte um Hilfe für richtigen Code, grüßt
Dieter(Drummer)
Anzeige

15
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Browserverlauf löschen per Sendkeys
06.12.2024 16:31:17
volti
Hallo Dieter,

vielleicht so? 
Application.SendKeys "^%(CLL)"


Zumindest muss zu einer geschlossenen Klammer ein öffende vorausgehen.

Gruß KH
AW: Browserverlauf löschen per Sendkeys
08.12.2024 23:27:22
Ulf
Hi,
da du nicht angibst, welchen Browserverlauf du löschen willst, hier mal Code ohne SendKeys.
Wenn es automatisiert laufen soll nimm besser AutoHotKey, SendKeys ist so lala 


Public Sub clearHistory()

    Dim strCmd As String

    strCmd = Chr(34) & "RunDll32.exe" & Chr(34) & " " & "InetCpl.cpl,ClearMyTracksByProcess 255"

    Shell strCmd

End Sub

hth
Ulf
Anzeige
AW: Geht perfekt
09.12.2024 09:48:13
Dieter(Drummer)
Guten Morgen Ulf,

dein Code funktioniert perfekt. Werde mich damit beschäftigen.

Gruß und Danke,
Dieter(Drummer)
AW: Browserverlauf löschen per Sendkeys
06.12.2024 16:40:51
Dieter(Drummer)
Danke Volti, KH, für Rückmeldung.

Mit deinem Code passiert auch garnichts.
Hast du oder noch jemand eine Idee?

Gruß, Dieter(Drummer)
AW: Browserverlauf löschen per Sendkeys
06.12.2024 17:39:24
RPP63
Moin!
Ich verstehe nicht, was Du vorhast!
Die Application ist Excel.
Wenn Du VBA aufrufst ist Excel auch aktiv.
Und jetzt soll Excel den Verlauf eines (welches) Browsers mittels Tastenkombi löschen?
Ich wüsste nicht wie dies funktionierewn soll.

Gruß Ralf, der offen lässt
Anzeige
AW: Browserverlauf löschen per Sendkeys
06.12.2024 18:00:54
Dieter(Drummer)
Danke Ralf fürRückmeldung und Info.

Wenn ich aus Excel heraus, mit Sendkey, wenn es der richtige wäre, den Browserverlauf löschen möchte. müsste es eigemtlich funktionieren.
Denn, wenn ich bei geöfnetem Excel, mit den Tasten Strg+Alt+C+L+L, den Browser löschen möchte, geh es probemlos. Als müsste es auch mit einem korrekten Sendkey gehen.

Eventuell hat ja noch jemand eine Lösung.

Gruß,
Dieter)Drummer)


Anzeige
AW: Browserverlauf löschen per Sendkeys
06.12.2024 18:19:49
Volti
Hallo,
Zur Erklärung, SendKeys und auch die entsprechende API-Funktion senden immer an die Vordergrundapplikation.
Der Browser muss also aktiv sein.
Ob Excel geöffnet ist, ist hierbei egal.
Bei Makrostart wird Excel aktiv sein, so dass m.E. erst der Browser wieder aktiviert werden muss, sonst werden die Tastenanschläge an Excel gesendet. Ggf. per VBA aktivieren.
Gruß Karl-Heinz
Anzeige
AW: Browserverlauf löschen per Sendkeys
06.12.2024 18:29:58
Dieter(Drummer)
Danke Karl-Heinz für Anmerkungen.

Wenn ich aus aktiviertem Excel mit den Tasten Strg+Alt+C+L+L geht es ja problemlos, egal ob ich mich auf dem Tabellenblatt oder im VBA Editor befinde.
Also müsste es auch mit richtigem Sendkeys funktionieren.

Eventuell hat ja noch jemand eine Lösung.

Gruß,
Dieter(Drumme)

Anzeige
AW: Browserverlauf löschen per Sendkeys
06.12.2024 20:30:19
RPP63
Mal zwei Nachfragen:
• Um welchen Browser handelt es sich?
• Strg+Alt+C+L+L bedeutet, dass man alle Tasten gleichzeitig drückt.
Wie schaffst Du es, die Taste L gleichzeitig doppelt zu drücken?
Kläre uns doch mal exakt auf!
AW: Browserverlauf löschen per Sendkeys
06.12.2024 20:45:09
Dieter(Drummer)
Hallo Ralf,

der Browser ist "Eigenschaften im Internet".
Die Tasten "L+L" werden einzeln aktiviert, nachdem die Tasten "Strg+Alt+C" losgelassen wurden.
Da muss dann wohl entsprechend Sendkeys dies wohl im Code haben, nur wie?

Hast du da noch eine Lösung?

Gruß, Dieter(Drummer)
Anzeige
AW: Habe Teil geschafft ...
07.12.2024 10:06:30
Dieter(Drummer)
Guten Mirgen an alle.

...und es wird der der erste Teil aktiviert: 
Sub Browser_loeschen()

Application.SendKeys ("^%c")

End Sub

Es fehlt nur noch Sendkey, dass 2x die Taste L drückt.

Evtl. kann mir da jemand helfen.

Mt Gruß und einen erfolgreichen Tag,
Dieter(Drummer)
Anzeige
AW: Habe Teil geschafft ...
08.12.2024 23:04:01
daniel
Hi
Wahrscheinlich musst das ganze in zwei Sendkeys teilen.
Im ersten Sendkeys aktivierst du den Browser und im zweiten schickst du die Zeichen für den Browser.

beim ersten Sendkeys musst du wahrscheinlich noch ein TRUE anhängen.

https://learn.microsoft.com/de-de/office/vba/api/excel.application.sendkeys

Gruß Daniel
Anzeige
AW: Habe Teil geschafft ...
09.12.2024 09:45:09
Dieter(Drummer)
Guten Morgen Daniel.

Das habe ich auch schon versucht und ergab aber keinen Erfolg: 
Sub Browser_loeschen()

Application.SendKeys("^%c").true

Application.SendKeys ("{76}") 'L

End Sub

Bricht in erster Zeile ab mit: Fehler beim kompilieren.

Mit dem Code von Ulf funktioniert es perfekt.
Würde natürlich dennoch gerne meine Version zum fuktionieren bringen.

Danke und Gruß,
Dieter(Drummer)

Anzeige
AW: Habe Teil geschafft ...
09.12.2024 11:17:23
daniel
eigentlich müsste der der Code lauten:

Application.SendKeys "^%c", true
AW: Habe Teil geschafft ...
09.12.2024 13:45:16
Dieter(Drummer)
Hallo Daniel,

Danke für Korrektur. Mit Kommata vor True wird jetzt der Explorer aufgerufen, aber 2x L funktiniert nicht. Das L wird in Zelle geschrieben.
Evtl. hast du ja noch die Idde, wie ich nach Aufruf des Explorers 2x L akivieret bekomme.

Mit Gruß,
Dieter(Drummer)
Jetziger Code: 
Sub Browser_loeschen()

Application.SendKeys ("^%c"), True

Application.SendKeys ("{LL}") 'L

End Sub
Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum