Nous souhaiterions que ce script soit lancé automatiquement
à chaque ouverture d'un fichier excel toto.xls.
MERCI
--
@+
David
Sub Exemple_vbs1
Set oShell = CreateObject("Wscript.Shell")
Set oEnv = oShell.Environment("PROCESS")
If oEnv("OS") = "Windows_NT" Then
MsgBox "OS is WinNT/Win2k/WinXP"
Else
MsgBox "OS is Win9x/Me"
End If
End Sub
MP
"CLAIRE" <jn.c...@epsmr.org> a écrit dans le message de news:
3c8701c26067$57d21940$35ef2ecf@TKMSFTNGXA11...