Bonjour Chaef, le Forum
Pour les Raccourcis Windows, je ne suis pas certain, mais sinon tu peux faire un mini VBScrit sur ton bureau avec le NotePad (BlocNote) sauvé avec l'extension '*.vbs' comme ceci :
Dim xl
on error resume next
Set xl = GetObject(, 'Excel.Application')
xl.Workbooks.Open 'I:\\MC_DEV\\Key_Projects\\VBS_Test\\Test.xls'
xl.WorkBooks('Test.xls').WorkSheets('Sheet2').Activate
xl.Visible = True
Set Xl = Nothing
Ceci, si Excel est déjà Ouvert, sinon on crée une nouvelle instance
Set xl = CreateObject('Excel.application')
Le reste étant idem.
Mais avec les Raccourcis Windows, je ne me souviens plus, il y avait des barbatrucs avec Windows 3.11, mais wouarf LOL
Bon App
@+Thierry
Message édité par: _Thierry, à: 22/03/2005 13:38