Selection multiple et opie avec Activecell.offset

[FredV]

Bonjour à tous,
J'aimerai savoir s'il est possible de sélectionner plusieurs cellules non-adjacentes à l'aide de la fonction activecell.offset().
Par ailleurs, est-il possible de coller cette sélection, toujours à l'aide de la fonction activecell.offset (sachant que je souhaite opérer avec un collage spécial blanc non compris)
Voici la ligne de code qui ne fonctionne pas :
Sheets("feuil1").ActiveCell.Offset(0, 1).Copy Destination:=sheets("feuil2").ActiveCell.Offset(0, 2)
Merci de votre aide

 

[Staple1600]

Re : Selection multiple et opie avec Activecell.offset

Bonjour

Tu ne peux pas avoir deux ActiveCell en même temps

Essaye cette macro
Sub test()
Dim Ligne As Long
Ligne = ActiveCell.Row
ActiveCell.Offset(0, 1).Copy Sheets("Feuil2").Cells(Ligne, 2)
End Sub

 

[FredV]

Re : Selection multiple et opie avec Activecell.offset

Merci.
Et pour la sélection multiple ?

 

[skoobi]

Re : Selection multiple et opie avec Activecell.offset

Bonsoir le fil,

comme ça par exemple:

Selection.Copy Sheets("Feuil2").Range("A1")