XL 2013 Formaté Textbox

maval · 14 Mai 2016

Bonjour

Je cherche a modifier mon TextBox et j'ai mis comme code ceci mais a toute évidence il doit y avoir une erreur au niveau de "Selection.Font"

Code:

Private Sub TextBox5_Change()
 If TextBox5 = "DCD" Then
 TextBox5.ForeColor = RGB(255, 0, 0)

With Selection.Font
 .Name = "Arial"
 .Size = 20
 .Bold = True
 End With
End If
End Sub

Je vous remercie d'avance

phlaurent55 · 14 Mai 2016

Re : Formaté Textbox

Bonjour Max,

Code:

Private Sub TextBox5_Change()
If TextBox5 = "DCD" Then
TextBox5.ForeColor = RGB(255, 0, 0)
With TextBox5.Font
 .Name = "Arial"
 .Size = 20
 .Bold = True
 End With
End If
End Sub

à+
Philippe

maval · 14 Mai 2016

Re : Formaté Textbox

Bonjour Philippe

Je te remercie et te souhaite un bon WE

XL 2013 Formaté Textbox

maval

XLDnaute Barbatruc

phlaurent55

Nous a quittés en 2020

maval

XLDnaute Barbatruc

Discussions similaires