Discussion :

[mac4209]

Bonjour,

J'ai fait un petit programme VBA qui affiche du texte dans un FormFields en fonction de plusieurs conditions. Tout marche bien, le seul problème est qu'un caractère bizarre apparait en début de ligne. C'est un carré avec un point d'interrogation à l'intérieur. Je ne sais pas du tout ce que cela signifie. Quelqu'un a une idée ? Merci

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Private Sub TextBox1_Change()
 
End Sub
 
Private Sub valider_Click()
Dim ServiceA, ServiceB, ServiceC As CheckBox
Dim TextA, TextB, textC As String
 
FormFields("resultat").Result = ""
 
Set ServiceA = ActiveDocument.FormFields("ServiceA").CheckBox
Set ServiceB = ActiveDocument.FormFields("ServiceB").CheckBox
Set ServiceC = ActiveDocument.FormFields("ServiceC").CheckBox
 
If ServiceA.Value = True Then
 
    TextA = "service A est bon" & vbCrLf
 
End If
If ServiceB.Value = True Then
 
    TextB = "service B est ok" & vbCrLf
 
End If
If ServiceC.Value = True Then
 
    textC = "service C est bien"
 
End If
FormFields("resultat").Result = TextA & TextB & textC
End Sub

[mac4209]

J'ai finalement trouvé !
il faut juste noter "VbCr" au lieu de "VbCrLf".... Voilà voilà