Code vba

Fermé
gerardo - 19 nov. 2014 à 10:34
 Maurice - 19 nov. 2014 à 11:30
Bonjour Mr
je cherche des codes vba sous excel qui m'aideront à effectuer les tâches suivantes:
-copier les éléments non vide de la colonne B et les mettre à la suite des éléments non vide de la colonne A
-copier les éléments non vide de la colonne C et les mettre à la suite des éléments non vide de la colonne A (en prenant en compte la modification de la colonne A)
-copier les éléments non vide de la colonne D et les mettre à la suite des éléments non vide de la colonne A (en prenant en compte la modification de la colonne A)
-Ainsi de suite pour les autres colonnes E,F,G,H,.....................,Z.
Cordialement,

SINGO Gérard.
A voir également:

2 réponses

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 310
19 nov. 2014 à 10:59
Bonjour,
Ca sent les devoirs scolaires....
0
Bonjour

tien si tu veux jouer

Sub CopyLigne()
Application.ScreenUpdating = False
Feuil1.Select
Nlig = Range("A" & Rows.Count).End(xlUp).Row
For C = 2 To 7
For L = 2 To Nlig
If Cells(L, C).Value <> "" Then
Derlig = Feuil2.Range("A" & Rows.Count).End(xlUp).Row + 1
Rows(L).Copy
Feuil2.Range("A" & Derlig).PasteSpecial xlPasteValues
End If
Next
Next
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub


A+
Maurice
-1