Remplacer la colonne A par la colonne B

Résolu
manu37 -  
 manu37 -
Bonjour,

Je voudrai savoir comment on peut remplacer une colonne A par une colonne B.
En gros, prendre les données de la colonne A et les mettre dans la colonne B.
Merci d'avance :)
A voir également:

4 réponses

yannpl7 Messages postés 1514 Date d'inscription   Statut Membre Dernière intervention   304
 
Salut

Voici une méthode

Sub remplacement()

derlig = Range("B" & Rows.Count).End(xlUp).Row

    For i = 1 To derlig
        Cells(i, 1) = Cells(i, 2)
    Next i

End Sub

0
manu37
 
merci beaucouup :) cela fonctionne tres bien ;)
0
yannpl7 Messages postés 1514 Date d'inscription   Statut Membre Dernière intervention   304
 
De rien.

Voici une autre solution plus rapide si vous avez beaucoup d'information
Sub remplcement2()

    Columns("B:B").Select
    Selection.Copy
    Columns("A:A").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Application.CutCopyMode = False
    Range("A1").Select
    
End Sub


celui qui détient le savoir détient le pouvoir
0
manu37
 
merci ca fonctionne bien aussi :)
0