I vissa situationer kanske du vill öppna en andra Windows-program samtidigt som fortfarande är i drift i ett annat program , t.ex. Excel . VBA , kort för Visual Basic for Applications , ger en metod med några rader kod för att uppmana ett annat program , t.ex. Microsoft Word när du arbetar med Excel . Även om du kan göra samma sak genom att bara använda " Start " för att öppna den andra ansökan , med VBA gör det andra programmet körs asynkront . Det vill säga , återgår styrningen omedelbart till Excel , som fortsätter utföra beräkningar utan att ändra till det andra programmet manuellt. Instruktioner
1
Öppna en ny arbetsbok i Microsoft Excel . Klicka på " Utvecklare " fliken i översta menyn . Om du inte ser det här alternativet klickar du på " Office " -knappen i det övre vänstra hörnet av Excel . Välj " Excel-alternativ " från fönstret och klicka på rutan bredvid " Visa fliken Utvecklare i menyfliksområdet . " Klicka på " OK . "
2
Klicka på " Visual Basic " fliken nu synliga i rad av Utvecklaralternativ . Detta öppnar ett Visual Basic for Applications ( VBA ) utveckling fönster .
3
Klicka på " Visa " i menyn längst upp listan på utvecklingen fönstret . Klicka på " Code " från listrutan
Skriv följande kod : .
Private Sub CommandButton1_Click ( ) Dim AppName Som String'The nästa rad sätter upp ett sätt för dig att välja Windows app'AppName = InputBox ( " Ange sökväg och körbara namnet på programmet " ) " Nästa rad visar hur du måste ange sökväg och körbara filen namn för app'AppName = " C: \\ Program Files ( x86 ) \\ Microsoft Office \\ Office12 \\ winword.exe " ' Om App är i normala vägen som Word , Anteckningar , Excel IE och andra Microsoft- standarder " är , då du inte behöver den fullständiga sökvägen . Ange bara själva programmet körbara som du see.AppName = " winword.exe " Shell AppName , vbNormalFocusEnd Sub
Anmärkning : . Raderna som börjar med apostrofer inte köra
4
återgå till kalkylbladet skärmen , delvis dold bakom de kodande fönstren . Klicka på den nedåtpekande ikonen i " Infoga " -fliken i Developer -menyn . Dubbelklicka på " Command Button " ikonen i " ActiveX Controls " avsnittet . Härigenom läggs knappen till Excel med standardnamnet " CommandButton1 . " Dra denna knapp med musen till en out-of - the-way plats på kalkylbladet . Dubbelklicka på knappen för att kontrollera att koden du angav i steg 3 visas upp . Om den inte gör det , kontrollera koden skärmen , särskilt för att se namnet på Sub ( subrutin ) ovan stämmer överens med namnet på kommandoknappen .
5
Spara kalkylbladet som makroaktiverat version . Stäng kalkylbladsfilen . Öppnar det igen , och då varnade om att köra makron , välj " Aktivera makron " alternativet .
6
Klicka på " Home " på översta menyn . Klicka på knappen som du skapade i kalkylbladet och Microsoft Word öppnas . Återgå till VBA-kod sektionen och ändra koden rader matcha vilka program du vill köra . Ta bort apostrofen i raden som börjar " ' AppName = Input Box " för att göra den körbar . Du kommer då att bli tillfrågad om en ansökan . Ta bort rader som börjar med " AppName = " winword.exe " och" AppName = . " C: \\ Program Files " så att du kan köra alla program som du vill Addera
