Discussion :

[forca]

Bonjour j'utilise le code de da99 pour un projet, je l'ai seulement un peu modifié le voici.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
   Sub CopieFichier()
'Workbooks.Open Filename:=pat
Workbooks.Open Filename:="H:\DATA\SQL Server Management Studio\Projects\Analytics\googsochaux.csv"
Cells.Select
Selection.Copy
ThisWorkbook.Sheets("temp").Activate
Cells.Select
ActiveSheet.Paste
Application.CutCopyMode = False
'Workbooks(nomFichier).Close SaveChanges:=False
Workbooks("H:\DATA\SQL Server Management Studio\Projects\Analytics\test.xls").Close SaveChanges:=False
Range("A1").Select
 
 
End Sub

Seulement lorsque que je lançe la macro comme cela :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub Workbook_Open()
 
CopieFichier
End Sub

J'ai l'erreur runtime error 9 subscript out of range dont je ne comprend pas trop la signification bien que j'ai lue le help.
J'ai excel 2003 en anglais, je suis un peu débutant en macro vba excel.
J'ai placé copiefichier dans un module de temp. En esperant ne pas etre un boulet en postant ce message.
Merci

[ouskel'n'or]

Remplace tout ça

Cells.Select
Selection.Copy
ThisWorkbook.Sheets("temp").Activate
Cells.Select
ActiveSheet.Paste

par

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Cells.Copy ThisWorkbook.Sheets("temp").Range("A1")

Mais pourquoi ne déplaces-tu ou ne copies-tu pas simplement la feuille du csv dans ThisWorkbook ?

[forca]

Merci beaucoup ça marche, c'est vrai qu'il serait plus simple d'importer mais je ne sais pas comment faire car si j'importe, pourrai-je encore effectuer des macro dessus?


J'ai regardé pas mal de messages sur le forum dont celui ou il explique comment ouvrir un csv et à chaque fois ça ouvre le csv dans une nouvelle fenetre.

Peut etre il y a un bout de script à modifier du style local= true??

[ouskel'n'or]

Fais ça en enregistrant la macro :
- Ouverture du csv
- Sélection de l'onglet -> Clic droit -> Déplacer ou copier (tu valides) -> Sélection du classeur.xls -> Après ou Avant la feuille (tu choisis) et tu valides.
Tu auras ton code. Tu supprimes tous les selects et, si tu as une difficulté, mets-nous ton code brut, on te le simplifiera.
C'est comme ça qu'on apprend
A+ très bientôt