Macro dans excel 2011
Résolu
irettigam
-
irettigam -
irettigam -
Bonjour à tous. Voici ma macro (excel 2011 sur mac)
sub macro()
if Range("C2")=Range("K1")and Range("K2")=("A") then
Range("F2")="Abs"
end if
If Range("C2")=Range("K1")and Range("K2")=("") then
Range("F2")=""
end if
end sub
Fonctionne très bien sur clic d'un bouton ou lancement manuel MAIS impossible qu'elle se lance automatiquement malgré de très nombreux essais glanés sur le net !
MERCI beaucoup pour votre aide
sub macro()
if Range("C2")=Range("K1")and Range("K2")=("A") then
Range("F2")="Abs"
end if
If Range("C2")=Range("K1")and Range("K2")=("") then
Range("F2")=""
end if
end sub
Fonctionne très bien sur clic d'un bouton ou lancement manuel MAIS impossible qu'elle se lance automatiquement malgré de très nombreux essais glanés sur le net !
MERCI beaucoup pour votre aide
1 réponse
-
Bonjour Irettigam, bonjour le forum,
Il te faudrait l'associer a une macro événementielle dans l'onglet, Change serait je pense l'idéal.
Private Sub Worksheet_Change(ByVal Target As Range) Dim PL As Range Set PL = Range("C2,K1:K2") If Application.Intersect(Target, PL) Is Nothing Then Exit Sub If Range("C2") = Range("K1") And Range("K2") = "A" Then Range("F2") = "Abs" Else Range("F2") = "" If Range("C2") = Range("K1") And Range("K2") = "" Then Range("F2") = "" End Sub
-
Merci beaucoup ça fonctionne mais en modifiant Range("C2,K1:K2") par Range("C2").
Mon écriture de la macro est très lourde, est il possible de faire plus court ?
Il vous serait plus comprehensible en envoyant mon planning mais je ne sais pas comment faire ?
Si vous voulez continuer avec moi je vous remercie par avance
-
