Re : copier a droite de la cellule active vers une autre feuille
Bonjour A tous
J'ai trouvé comme ca
Sub copie()
Sheets("form").Range("f4") = ActiveCell.Value
ActiveCell.Offset(0, 3).Activate 'j'avance de 3 cellules
Sheets("form").Range("B4") = ActiveCell.Value
End Sub
Olive323