VBA SendTaster
VBA SendKeys -metoden bruges til at sende tastetryk til det aktive program:
| 1 | Application.SendKeys ("s") |
Ovenstående kode vil efterligne at trykke på “s” -tasten på tastaturet.
SendKeys -metoden tager to argumenter:
- Nøgler - Nøglerne, du vil sende til programmet som tekst.
- Vent (Valgfri)- Denne værdi kan enten være sand eller falsk. Hvis det er sandt, venter Excel på, at nøglerne først skal behandles, før den næste kodelinje køres. Hvis Falsk, fortsætter Excel med at køre proceduren uden at vente på, at nøglerne skal behandles.
SendKeys bruges normalt ved interaktion med andre applikationer, fordi det er en hurtig og nem måde at udføre opgaver på. Du kan f.eks. Bruge SendKeys, når du automatiserer Internet Explorer.
Du skal dog være yderst forsigtig, når du bruger SendKeys -metoden, da det kan have uventede resultater. Vi anbefaler kun at bruge SendKeys som en sidste udvej og/eller når fejl er acceptable (eller let påviselige).
VBA SendKeys -eksempler
Hver nøgle i form af bogstaver er repræsenteret ved deres karakter, for eksempel a er "a".
Hvis du gerne vil bruge nøgler i kombination med Ctrl, Shift eller Alt, skal du gå forud for nøglekoden med følgende:
| Nøgle | Kode |
|---|---|
| Ctrl | ^ |
| Flytte | + |
| Alt | % |
Følgende kode bruger SendKeys -metoden til at gemme projektmappen:
| 12345 | Sub UsingSendKeys ()Application.SendKeys ("^s")Afslut Sub |
Som vi nævnte før, skal du være ekstremt forsigtig, når du bruger SendKeys. Følgende kode angiver en ventetid på 10 sekunder, før teksten indtastes/sendes til Notesblok. Ved at vente 10 sekunder giver du Notesblok en chance for at åbne korrekt, hvilket reducerer chancen for en fejl.
Bemærk: Denne kode anvender Application.Wait -metoden.
| 1234567 | Sub UsingSendKeysWithWait ()Call Shell ("C: \ Windows \ system32 \ Notepad.Exe", vbNormalFocus)Application.Wait (Now () + TimeValue ("00:00:10"))Ring til SendKeys ("This is Some Text", True)Afslut Sub |
Resultatet efter 10 sekunders ventetid er:
SendKeys kan være en ekstremt hurtig og nem måde at udføre opgaver på. Risikoen for fejl er dog relativt høj. Brug kun SendKeys, når denne risiko er acceptabel!
