ouverture fichiers

2 réponses

JACK 43

05/03/2005 à 10:19

Je souhaiterais que vous m'aidiez pour une macro qui fasse les automatismes
suivants

-j'explique :

1 )j'ouvre mon fichier, c'est la feuille 1 qui est à l'écran , feuille
d'introduction.

2 ) un fichier son se déclanche en arrière plan sans que l'application (du
son) apparaisse à l'écran. (durée environ 8 à 10 secondes).

3) fermeture du fichier son puis de l'application de lecture du son.

4) au bout d'un certain temps (enviro 45 secondes) par rapport à
l'ouverture de la feuille 1, je souhaite macro qui passe à la feuille 2.

merci A+

2 réponses

Dude

05/03/2005 à 11:06

c'est faisable, mais beaucoup plus simple en Powerpoint...

"JACK 43" wrote in message
news:

Je souhaiterais que vous m'aidiez pour une macro qui fasse les
automatismes
suivants

-j'explique :

1 )j'ouvre mon fichier, c'est la feuille 1 qui est à l'écran , feuille
d'introduction.

2 ) un fichier son se déclanche en arrière plan sans que l'application (du
son) apparaisse à l'écran. (durée environ 8 à 10 secondes).

3) fermeture du fichier son puis de l'application de lecture du son.

4) au bout d'un certain temps (enviro 45 secondes) par rapport à
l'ouverture de la feuille 1, je souhaite macro qui passe à la feuille 2.

merci A+

LSteph

05/03/2005 à 11:16

;o)
Hello Jack change pas de ficelle
(Grâce à API GUIDE 3.7-92... et à JW)

'*****dans Thisworkbook
Private Sub Workbook_Open()
Worksheets("Feuil1").Activate
[a1].Select
litson
Application.OnTime Now + TimeValue("00:00:15"), "vazy"
End Sub

'***dans module1
Private Declare Function PlaySound _
Lib "winmm.dll" Alias "PlaySoundA" _
(ByVal lpszName As String, ByVal hModule As Long, _
ByVal dwFlags As Long) As Long
Const SND_SYNC = &H0
Const SND_ASYNC = &H1
Const SND_FILENAME = &H20000
Dim FileWav
Sub litson()

FileWav = "launch.wav"

FileWav = ThisWorkbook.Path & "" & FileWav
Call PlaySound(FileWav, 0&, SND_SYNC Or SND_FILENAME)
End Sub
Sub vazy()
Worksheets("Feuil2").Activate
End Sub
'****

'lSteph
"JACK 43" a écrit dans le message de
news:

Je souhaiterais que vous m'aidiez pour une macro qui fasse les
automatismes
suivants

-j'explique :

1 )j'ouvre mon fichier, c'est la feuille 1 qui est à l'écran , feuille
d'introduction.

2 ) un fichier son se déclanche en arrière plan sans que l'application (du
son) apparaisse à l'écran. (durée environ 8 à 10 secondes).

3) fermeture du fichier son puis de l'application de lecture du son.

4) au bout d'un certain temps (enviro 45 secondes) par rapport à
l'ouverture de la feuille 1, je souhaite macro qui passe à la feuille 2.

merci A+

ouverture fichiers

2 réponses

Veuillez sélectionner un problème