Hello
Oula oula oula...!!!
Pas besoin de créer un objet IE...
Tu ouvres betement ton fichier Excel, et tu copies ce que tu veux...
Code :
- Workbooks.Open Filename:="http://.../fichier.xls"
- With ActiveWorkbook
- .ActiveSheet.Cells.Select
- Selection.Copy
- End With
|
Ou tu peux directement enregistrer le dit fichier ailleurs.
Code :
- Workbooks.Open Filename:="http://.../fichier.xls"
- With ActiveWorkbook
- .ActiveSheet.Cells.Select
- Selection.Copy
- NouvFichier = Application.GetSaveAsFilename(.Name, "Fichiers Excel (*.xls;*.xlsx), *.xls;*.xlsx", , "Enregistrement" )
- .SaveAs NouvFichier
- End With
|
Message édité par SuppotDeSaTante le 27-05-2010 à 15:50:56
---------------
Soyez malin, louez entre voisins !