Bonjour à tous!!!
 
Je cherche à copier une colonne d'une page Excel, en une ligne sur une autre page Excel...
 
Pour se faire sous VBA je fait comme suite :  
 
Sheets("Feuil2" ).Select
 Sheets("feuil2" ).Range("C1" ).Copy
 Sheets("Feuil1" ).Select
 Sheets("feuil1" ).Range("A3" ).Select
 ActiveSheet.
 
ça fois le nombre de cellule que je veux copier.. soit 53...
 
Je cherche à faire une boucle... mais jusqu'a présent je n'arrive qu'a bloquer Excel !! lol !!
Avec l'essai suivant...
 
'déclaration des entiers
Dim numligne1 As Integer
Dim numcolonne1 As Integer
Dim numligne2 As Integer
Dim numcolonne2 As Integer
 
'Déclaration de la valeur des entiers
 
numligne1 = 3
numcolonne1 = 1
numligne2 = 1
numcolonne2 = 3
 
Do While numligne2 = 53
 
        Sheets("Feuil2" ).Select
        Sheets("Feuil2" ).Cells((numligne2), 3).Copy
        Sheets("Feuil1" ).Select
        Sheets("Feuil1" ).Cells(3, (numcolonne1)).Select
        ActiveSheet.Paste
        Sheets("Feuil2" ).Select
        Sheets("Feuil2" ).Cells((numligne2 + 1), 3).Copy
        Sheets("Feuil1" ).Select
        Sheets("Feuil1" ).Cells(3, (numcolonne1 + 1)).Select
 
 
voilà ... si il y a des experts dans le coin !!! merci par avance de votre aide !!
 
Slider.