[VBA Excel] comment.cellule récup presse-pap Fermé

Question

Bonjour.

Quelqu'un peut-il me dire pourquoi cette instruction (en gras) ...

With ActiveCell.AddComment
.Visible = False
.Text	GetFromClipboard
End With

... ne marche pas (Erreur d'exécution 1004 : La méthode 'Text' de l'objet 'Comment' a échoué) ?

Utilisateur anonyme · Answer

Bonjour,

suggestion :


Option Explicit

Dim MaDonnee As DataObject
'

Sub CaptureDonnees()

    Dim Commentaires As String

    Set MaDonnee = New DataObject

    MaDonnee.GetFromClipboard
    Commentaires = MaDonnee.GetText(1)
    With ActiveCell.AddComment(Commentaires)
        .Visible = False
    End With

End Sub
'


Lupin

[VBA Excel] comment.cellule récup presse-pap

1 réponse

Discussions similaires