Private Sub UserForm_Initialize()
TextBox1.Value = Format(Sheets("base").Range("d3"), "00.00%")
' !!!!!! le format en VBa est de style US : le point est le séparateur décimal, la virgule le séparateur de milliers
End Sub
Bonjour Modeste GEEDEE
peut-être une question de paramétrage pc mais
format "00.00" en vba
affiche 00,00 chez moi
Heu ???TextBox1.Value = Format(sheets("Base").Range("D3").Value, "00.00 %")
Bonjour
peut-être
TextBox1.Value = Format(Range("D3").Value, "00.00 %")
j'ai collé ton code dans mon fichier original , mais cela ne fonctionne pas
TextBox1.Value = Format(sheets("Base").Range("D3").Value, "00.00 %")