" , sanne
Application.Wait 900
SendKeys " ~ " , Sann
End sub
Dette programmet setter opp nettleseren til å motta keyboard input ved hjelp av AppActivate uttalelse. SendKeys uttalelse sender tastetrykkene av ditt passord til nettleseren , og Application.Wait uttalelse pauser for å tillate nettleseren din tid til å behandle tastetrykk . Den " ~" tegnet representerer " Enter"-tasten .
4
Type over merket ( dvs. " < >" ) teksten i programmet i trinn 3 med nettleseren og passord navn for å logge seg på nettsiden.
5
Klikk på en uttalelse i automateLogin programmet du skrev inn i trinn 3 , og klikk deretter på "Kjør" -menyen er " Run sub" element for å gjennomføre programmet . Excel vil aktivere leseren angitt i koden , og deretter sende tastetrykk til nettleseren. Disse tastetrykk stave ut passordet du skrev inn i trinn tre . Excel vil da kjøre programmet er " SendKeys '~ ' , Sann " statement , som vil sende tastetrykk for "Enter "-tasten til websiden . Denne handlingen vil sende inn login skjema for behandling , akkurat som om du manuelt trykket på " Enter"-tasten .
6
Skriv inn den øverste , nest siste cellen i Excel sin første regnearket navnet på nettleseren som du nettopp sendt et passord . Dette trinnet begynner en revisjon av login -programmet . Den reviderte programmet vil bruke informasjon som er lagret i et regneark , i stedet for opplysningene i programmets kildekode , for å logge inn på nettstedet . Denne tilnærmingen gjør det enklere å endre påloggingsinformasjon.
7
Type i cellen under ett som inneholder nettleseren navnet passordet du hardkodet i trinn tre .
8 < p> Trykk "Alt- F11 " for å oppgi VBA koding miljø . Deretter limer følgende reviderte programmet koden under automateLogin program .
Public Sub automateLoginWithStoredPassword ( )
Dim passord , browsername
browsername = ActiveSheet.Cells ( 1 , 1 ) . Verdi
passord = ActiveSheet.Cells ( 2 , 1 ) . Verdi
AppActivate browsername , Sann
SendKeys passord , Sann
Application.Wait 900
SendKeys "~" , Sann
End Sub
9
Tilbake nettleseren din til logg inn siden og kjøre den reviderte programmet ved hjelp Trinn 5 anvisninger. Excel vil sende passordet lagret i regnearket til innloggingssiden.