Macro dans excel 2011
Résolu
irettigam
-
Utilisateur anonyme -
Utilisateur anonyme -
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
A voir également:
- Macro dans excel 2011
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Déplacer colonne excel - Guide
- Si ou excel - Guide
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.
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
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