Discussion :

[popsmelove]

Bonjour,

je rencontre un problème en saisissant un text dans une text box avec VBA : lorsque j'utilise vbTab (tabulation) ou vbClrf j'ai un carré qui se génère à l'affichage. J'ai essayé plusieurs choses mais sans succés, voici mon code qui s’intègre à l’évènement mousemove d’un graphique.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 With ActiveChart.Shapes("Text Box 1")
            .Visible = msoTrue
            .TextFrame.Characters.Text = _
                vbTab & "  " & Range("Graphe").Offset(Arg2, 0) & "  " & vbCrLf _
                & vbTab & "  Ret0Eqty : " & Format(Range("Graphe").Offset(Arg2, 3), "0.00%") & "  " & vbCrLf _
                & vbTab & "  Prc2Bk : " & Format(Range("Graphe").Offset(Arg2, 2), "0.00x") & "  " & vbCrLf _
                & vbTab & "  Quintile : " & Range("Graphe").Offset(Arg2, 1)
        End With

Merci d’avance

[Zetophe]

Bonjour,

as-tu essayer de remplacer vbtab par chr(9) ?

[popsmelove]

Salut,
yes ça fait la même chose, j'ai même essayé de passer par un str as string et de faire des replace mais sans succés...sniff

Thanks

[ucfoutu]

Bonjour,

va dans la fenêtre des propriétés et affecte donc la valeur True à la propriété Multiline de ta Textbox...

[popsmelove]

je sais pas si j'ai une version trop ancienne d'excel (version 2000) mais je n'ai pas cette propriété de disponible, je n'ai que la possibilité de verrouillé ou devrouiller le texte....sniffff

[ucfoutu]

Où se trouve ta textbox ?

Sur une feuille Excel ou dans un UserForm ?