Que préciser pour que le commentaire soit en gras ... ? [RéSoLu]

  • Initiateur de la discussion Initiateur de la discussion anthoYS
  • 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 !

anthoYS

XLDnaute Barbatruc
Bonjour,

VB:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)With Target
    If .Column = 3 Then
        Cancel = True
        If .Comment Is Nothing Then
            .AddComment
            .Comment.Shape.Width = 48
            .Comment.Shape.Height = 12
        End If
        SendKeys "%im"
    End If
End With
If Not Application.Intersect(Target, Range("A:A")) Is Nothing And IsEmpty(Target) Then
Calendrier.Show
End If
End Sub

Merci
à+
 

Pièces jointes

Dernière édition:
Re : Que préciser pour que le commentaire soit en gras quand je le saisirais directem

Bonjour,

À voir si c'est bon :
Code:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column = 3 Then
  With Target
  Cancel = True
  If .Comment Is Nothing Then
     .AddComment
     .Comment.Shape.Width = 48
     .Comment.Shape.Height = 12
     .Comment.Shape.TextFrame.Characters.Font.Bold = True
        
     SendKeys "%im"
  End If

  End With
End If
End Sub


Jecherche
 
Dernière modification par un modérateur:
- 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
2
Affichages
157
  • Question Question
Microsoft 365 worksheet_change
Réponses
29
Affichages
500
Réponses
4
Affichages
228
Réponses
4
Affichages
466
Retour