Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
2986 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  copier dans différentes colonnes a la suite

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

copier dans différentes colonnes a la suite

n°1910273
clairev
prenom.n
Posté le 30-07-2009 à 14:02:02  profilanswer
 

Bonjour,
j'ai ce code pour copier des colonnes de différents fichiers sorties sur une meme feuille, mais il y a une erreur (erreur définie par l'application ou l'objet) au niveau de range (cells...).  
Que faudrait il que je change? merci
 
Dim i, j As Integer
For i = 1 To 5
j = i + 1
Workbooks.Open "C:\A" & i & ".csv"
Workbooks("A" & i & ".csv" ).Sheets("A" & i).Range("AS2:AS366" ).Copy (Workbooks("RESULTAT.xls" ).Sheets("Resultat" ).Range(Cells(3, j), Cells(367, j)))
Workbooks("A" & i & ".csv" ).Close
Next i

mood
Publicité
Posté le 30-07-2009 à 14:02:02  profilanswer
 

n°1910298
SuppotDeSa​Tante
Aka dje69r
Posté le 30-07-2009 à 14:54:45  profilanswer
 

Bonjour
 
Je ne vois pas trop ce qui pose souci, le message exacte et le n° d'erreur c'est quoi ?
 
Cordialement
 
 
[edit]
Essaie cela a la place :

Code :
  1. Dim i, j As Integer
  2. For i = 1 To 5
  3. j = i + 1
  4. Workbooks.Open "C:\A" & i & ".csv"
  5. Workbooks("A" & i & ".csv" ).Sheets("A" & i).Range("A1:A366" ).Copy Workbooks("RESULTAT.xls" ).Sheets("Resultat" ).Cells(3, j)
  6. Workbooks("A" & i & ".csv" ).Close
  7. Next i

 
[/edit]

Message cité 1 fois
Message édité par SuppotDeSaTante le 30-07-2009 à 15:00:36

---------------
Soyez malin, louez entre voisins !
n°1910883
otobox
Maison fondée en 2005
Posté le 01-08-2009 à 10:46:57  profilanswer
 

SuppotDeSaTante a écrit :


 
[edit]
Essaie cela a la place :

Code :
  1. Dim i  As Integer, j As Integer
  2. For i = 1 To 5
  3. j = i + 1
  4. Workbooks.Open "C:\A" & i & ".csv"
  5. Workbooks("A" & i & ".csv" ).Sheets("A" & i).Range("A1:A366" ).Copy Workbooks("RESULTAT.xls" ).Sheets("Resultat" ).Cells(3, j)
  6. Workbooks("A" & i & ".csv" ).Close
  7. Next i

 
[/edit]


 
 [:cbrs]  


---------------
OtObOxBlOg - - - Etre seul à avoir tort  c'est plus difficile, mais c'est bien plus beau que d'avoir raison avec une bande de cons

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  copier dans différentes colonnes a la suite

 

Sujets relatifs
[RESOLU] [VBS] copier uniquement les lignes filtrées sous ExcelCopier données d'une feuille dans un classeur donné.
[MySQL] Requete avec JOIN : infos dans des bases différentesgros fichier excel copier et inserer des lignes
VBS Copier le nom d'un fichier[Eclipse RCP] Affecter différentes données à plusieurs instances d'
Suite de test avec JUnit[résolu]tableau avec 3 colonnes dont celle du milieu toujours centrée
Erreur suite à la création d'une DLL 
Plus de sujets relatifs à : copier dans différentes colonnes a la suite


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR