Přidat otázku mezi oblíbenéZasílat nové odpovědi e-mailemVyřešeno PowerPoint - spustenie EXE suboru...

Dle google:

1. open your powerpint presentation
2. show the toolbox through view | toolbox
3. drag a button to the slide
4. doubleclick the button
5. the resulting eventhandler looks like

Private Sub CommandButton1_Click()

End Sub

6. add your lines to make it look like

Private Sub CommandButton1_Click()
  Dim RetVal
  RetVal = Shell("C:\marta.exe", 1)
End Sub

7. change the path to your exe, eg this line

"C:\myfile.exe"

8. close the vb editor
9. run the presentation and click the button

//---------------------Případně:
Private Sub CommandButton1_Click()
Dim RetVal
Application.DisplayAlerts = False
RetVal = Shell("C:\Program Files\IrfanView\i_view32.exe", 1)
Application.DisplayAlerts = True
End Sub

Reakce na odpověď

1 Zadajte svou přezdívku:
2 Napište svou odpověď:
3 Pokud chcete dostat ban, zadejte libovolný text:

Zpět do poradny