problème de mise en gras du texte de début de ligne

[grisan29]

bonjour a vous
dans le fichier joint, je voudrais lors de l'inscription de l'adresse du chantier se fasse comme ceci

adresse chantier: chez moi mais pas ici 29200 BREST

Hors je n'y arrive pas et "adresse chantier" reste tel que

Merci beaucoup de vos idées

Pascal

 

[Modeste geedee]

Re : problème de mise en gras du texte de début de ligne

Bonsour®
en adaptant la macro d'aprés l'enregistreur ...

Private Sub CommandButton1_Click()
With Sheets("feuil1")
        .Range("B9").Value = Me.TextBox1.Value & " " & Me.TextBox2.Value & " " & Me.TextBox3.Value & " " & Me.TextBox4.Value
        With .Range("B9").Characters(Start:=1, Length:=16).Font
                .FontStyle = "Gras italique"
                .Underline = xlUnderlineStyleSingle
        End With
        '-----------------------------------
        Me.TextBox1.Value = "adresse chantier :"
        Me.TextBox2.Value = ""
        Me.TextBox3.Value = ""
        Me.TextBox4.Value = ""
        Unload Me
End With
End Sub

 

[grisan29]

Re :RESOLU problème de mise en gras du texte de début de ligne

bonjour Modeste geedee😎

Merci beaucoup de ta solution 😎car j'avais déjà essayer d'enregistrer une macro mais sans succès car j'ai procédé sur la feuille pour le faire mais cela ne m'a pas donné le résultat escompté

c'est parfait comme d'habitude sur ce forum😎

Pascal