Quelle syntaxe pour ActiveCell.Offset...

[Christian0258]

Bonjour à tout le forum,
Je ne trouve pas la bonne syntaxe pour dire que ;

si je saisis en ligne 14 alors après validation je me déplace sur la ligne du dessous (même colonne)
que faut-il mettre devant : ActiveCell.Offset(1, 0).Select pour signifier la ligne 14...
(code actuel ci-dessous)

mais si je saisis en ligne 15 alors après validation je me déplace sur la ligne du dessus (+1 colonne)
que faut-il mettre devant : ActiveCell.Offset(-1, 1).Select pour signifier la ligne 15...

If Not Intersect([ChampMFC], Target) Is Nothing Then ' CODE DE J.B
Application.EnableEvents = False
On Error Resume Next
[couleurs].Find(Target, LookAt:=xlWhole).Copy
Target.PasteSpecial Paste:=xlPasteFormats
ActiveCell.Offset(1, 0).Select
Application.EnableEvents = True
End If


Merci pour votre aide si précieuse.
Cordialement,
Christian

 

[sousou]

Bonjour
En théorie oui pour ton activecell! Il faudrait avoir ton fichier

 

[Dranreb]

Bonjour.
Peut-être, si j'ai bien compris :

Target.Offset(29 - Target.Row * 2, Target.Row - 14).Select

 

[Christian0258]

Re, le forum, sousou, Dranreb,

Merci à vous pour votre aide.
C'est tout à fait ça , Dranreb, un grand merci à toi.
Bien amicalement,
Christian