Macro dans excel 2011

Résolu/Fermé

irettigam - 12 juil. 2015 à 17:01
Utilisateur anonyme - 13 juil. 2015 à 09:15

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

A voir également:

Macro dans excel 2011
Liste déroulante excel - Guide
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Formule excel - Guide
Macro word - Guide
Si et excel - Guide

1 réponse

Réponse 1 / 1

ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
12 juil. 2015 à 17:35

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

Utilisateur anonyme
13 juil. 2015 à 09:15

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

Discussions similaires

Transformer un chiffre en lettres dans excel sans macro

Discussions similaires

Newsletters