Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Copie Valeur dans Commentaire

  • Initiateur de la discussion Initiateur de la discussion Esox
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Esox

XLDnaute Occasionnel
Bonjour le forum,

Je souhaiterai faire un bouton avec une macro derriere qui lors de son activation, me copie le contenu de la cellule active, remplace le contenu de la cellule active par le mot "absence", et ensuite m'insère un commentaire toujours sur la cellule active, avec le contenu copié précédement collé dans le commentaire ?

Pourriez vous m'y aider ?

Merci à vous...
 
Re : Copie Valeur dans Commentaire

Bonjour Esox,

Teste avec ce code dans ton bouton:

Code:
    With ActiveCell
    
        .AddComment (.Value)
        .Value = "Absence"
    
    End With

Edit:
Pour éviter les erreurs


Code:
    With ActiveCell
        
        If .Value <> "Absence" And .Value <> "" Then
        
            .ClearComments
            .AddComment (.Value)
            .Value = "Absence"
            
        End If
       
    End With
Bonne journée !
 
Dernière édition:
Re : Copie Valeur dans Commentaire

Bonjour VDAVID,

Alors là chapeau.... j'étais parti dans des macros "usine à gaz" alors que ces 4 lignes suffisaient... Merci à toi pour ta rapidité...

Ca marche à la perfection...

Bonne journée...
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
12
Affichages
452
  • Question Question
Microsoft 365 affichage userform
Réponses
4
Affichages
522
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…