XL 2016 ne pas exécuter code si

[Usine à gaz]

Bonsoir à toutes et à tous,

Je n'arrive pas à coder l'action suivante :
Ne pas exécuter "blocage"si numéro de ligne active = numéro de ligne de cellule active

If Not Intersect(R, Range("a7:v10000")) Is Nothing Then
    If Active.Row <> ActiveCells.Row And [T3] <> "OK" And ActiveCell <> "" Then
    'If activeRows <> ActiveCells.Row And [T3] <> "OK" And ActiveCell <> "" Then
     Blocage
    End If
    End If
end sub

J'ai beau chercher, je ne trouve pas.
Auriez-vous le bon code ?
Un grand merci par avance 🙂
Bonne fin de soirée,
amicalement,
arthour973,

 

[Staple1600]

Bonsoir

ActiveCells.Row n'existe pas en natif dans VBA.
Et on ne connait pas le code VBA contenu dans la macro Blocage

 

[Usine à gaz]

Bonjour JM, le Forum,

Merci pour m'avoir répondu JM 🙂
"ActiveCells.Row n'existe pas en natif dans VBA. "

"Ne pas exécuter "blocage"si numéro de ligne active = numéro de ligne de cellule active"
Il ne me semble pas indispensable de connaître le contenu de la macro Blocage.

l'important étant que le code passe direct à "end if".

Aurais-tu le bon code ?

Avec mes remerciement,
amicalement,
arthour9973

 

[Efgé]

Bonjour arthour973, Salut Staple1600 🙂

numéro de ligne active = numéro de ligne de cellule active

Je ne comprends pas quelque chose: Comment la ligne active peux être différente de la ligne de la cellule active🙄

Cordialement

 

[eriiic]

Bonjour,

Active.Row n'existe pas non plus.
Et ce n'est pas ActiveCells.Row mais ActiveCell.Row
eric

 

[Usine à gaz]

Bonjour Efgé,
Merci pour m'avoir répondu.

Effectivement, en y réfléchissant, c'est forcément la même ligne.
Merci d'avoir mis "le doigt" dessus.
Je revois ma copie LOL
amicalement,
arthour 973.

 

[Usine à gaz]

Bonjour eriiiic,

Merci de m'avoir signaler ..... mon erreur de frappe 🙂
amicalement,
arhour973

 

[eriiic]

Active.Row ce n'est plus une erreur de frappe... ;-)