ecrire dans un commentaire depuis une textbox

pascal21 · 11 Novembre 2010

bonjour le forum
j'aimerais savoir si il est possible de créer un commentaire en écrivant dans une textbox depuis un usf
je vous mets le bout de code qui sélectionne la cellulee désirée (intersection)
et qui donne le caption du label4

PHP:

On Error Resume Next
    Col = [3:3].Find(Me.listBox1.Value).Column
    lig = [B:B].Find(CDate(Me.listbox2)).Row

Cells(lig, Col) = Me.Label4.Caption

c'a doit être un truc du genre
Cells(lig, Col).comments.value = textbox1.value

JNP · 11 Novembre 2010

Re : ecrire dans un commentaire depuis une textbox

Salut Pascal 🙂,
En remplaçant "Test" par ton label et Range("A1") par ta cellule de destination

Code:

With Range("A1")
If .Comment Is Nothing Then
    .AddComment
    .Comment.Visible = False
    .Comment.Text Text:="Test"
Else
    Réponse = MsgBox("La cellule contient déjà le commentaire :" & vbCrLf _
        & .Comment.Text & vbCrLf & "Voulez-vous le remplacer ?", _
        vbOKCancel + vbCritical, "Attention !")
    If Réponse = vbOK Then .Comment.Text Text:="Test"
End If
End With

Bonne journée 😎

pascal21 · 11 Novembre 2010

Re : ecrire dans un commentaire depuis une textbox

bonjour JPN
je viens de finir et ça fonctionne
j'ai trouvé la réponse en cherchant dans le forum et tu avais déja donné une reponse identique que j'ai adapté
merci 2 fois pour ton aide

ecrire dans un commentaire depuis une textbox

pascal21

XLDnaute Barbatruc

JNP

XLDnaute Barbatruc

pascal21

XLDnaute Barbatruc

Discussions similaires

ecrire dans un commentaire depuis une textbox

pascal21

XLDnaute Barbatruc

JNP

XLDnaute Barbatruc

pascal21

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency