Macro pour un copier-coller ligne active
Résolu/Fermé
A voir également:
- Macro pour un copier-coller ligne active
- Copier coller pdf - Guide
- Copier une vidéo youtube - Guide
- Hors ligne instagram - Guide
- Aller à la ligne excel - Guide
- Vente en ligne particulier - Guide
4 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 303
14 oct. 2009 à 17:29
14 oct. 2009 à 17:29
Bonjour
Sub copier_KversJ() Dim lig as long lig = Selection.Row Cells(lig, 10) = Cells(lig, 11) End Sub
Bonjour,
Il faut ituliser cette commande
Sub Macro1()
Range("K18").Select
Selection.Copy
Range("J18").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Application.CutCopyMode = False
Range("J18").Select
End Sub
Il faut ituliser cette commande
Sub Macro1()
Range("K18").Select
Selection.Copy
Range("J18").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Application.CutCopyMode = False
Range("J18").Select
End Sub
Re-bonjour,
On pourra maintenant mettre cette appli dans une boucle qui saute ligne par ligne. Est-ce que ça va de la ligne 18 à la 19 par exemple?
On pourra maintenant mettre cette appli dans une boucle qui saute ligne par ligne. Est-ce que ça va de la ligne 18 à la 19 par exemple?
14 oct. 2009 à 17:41
C'est tout à fait ce que je recherchais.