Ouvrir un fichier Excel (vba)

Ouvrir un fichier Excel (vba) - VB/VBA/VBS - Programmation

Marsh Posté le 13-09-2013 à 14:41:56    

Bonjour à tous,
 
Ca fait depuis ce matin que j'essaie de faire cette manipulation toute simple, d'ouvrir un fichier Excel à partir d'un classeur Excel. Je ne comprend pas pourquoi ca ne marche pas.  
Je désespère, si quelqun pourrait m'aider svp ! :)  
J'ai cherché sur les forums et tester plusieurs solutions mais j'ai toujours la même fenêtre d'erreur qui apparait "Erreur d'éxécution"
 
Merci d'avance.
 
Voila mon code :  
 

Code :
  1. Sub Ouvre()
  2. Dim wb As Workbook
  3. Dim ws As Worksheet
  4.        
  5. Set wb = Workbooks.Open("C:\Users\bws229\Desktop\Test\Classeur1.xls" )
  6. Set ws = wb.Worksheets("Répartition" )
  7. End Sub

Reply

Marsh Posté le 13-09-2013 à 14:41:56   

Reply

Marsh Posté le 13-09-2013 à 15:08:03    

 
           Bonjour,
           sans connaitre la ligne déclenchant l'erreur ni le message exact, cela revient à http://smileys.sur-la-toile.com/repository/Grands_Smileys/voyante-2943.gif
 
 
           A tester :

Code :
  1. Sub Ouvre()
  2. '    Dim wb As Workbook
  3.     Dim ws As Worksheet
  4.     Workbooks.Open ("C:\Users\bws229\Desktop\Test\Classeur1.xls" )
  5.     Set ws = ActiveWorkbook.Worksheets("Répartition" )
  6.     Set ws = Nothing
  7. End Sub


           Sinon l'Enregistreur de macros est un ami !
 

Reply

Marsh Posté le 13-09-2013 à 15:12:07    

Merci pour ton aide.  
Je viens juste de comprendre, mon fichier est protégé du coup, c'était impossible.  
 
Sinon le code marche bien.  
Problème résolu.

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed