OVH Cloud OVH Cloud

Pour en finir avec mes caractères de début et de fin...

1 réponse
Avatar
Serge Hipontoise
Grâce à Circé et Rémi, je peux maintenant ajoute rmes parenthèses au début
et à la fin de mes paragraphes :

Sub InsertionEntreParentheses()
If Selection.Paragraphs.First.Range.Characters.First <> "(" Then
Selection.Paragraphs.First.Range.InsertBefore "("
Selection.Paragraphs.First.Range.Characters.Last.InsertBefore ")"
End If
end sub()

Mais comment puis-je fgaire pour les retirer si le besoin s'en fait sentir ?
J'ai tenté les "delete" et "remove" de l'aide vb, mais sans succès.
Merci
Serge

1 réponse

Avatar
Circé
Re... re...

Serge, le mieux est de rester dans le même fil, sinon, on y perd son grec
!!!
Je viens de te faire une réponse dans le premier fil.

Circé

Serge Hipontoise wrote:
|| Grâce à Circé et Rémi, je peux maintenant ajoute rmes parenthèses au
|| début et à la fin de mes paragraphes :
||
|| Sub InsertionEntreParentheses()
|| If Selection.Paragraphs.First.Range.Characters.First <> "(" Then
|| Selection.Paragraphs.First.Range.InsertBefore "("
|| Selection.Paragraphs.First.Range.Characters.Last.InsertBefore ")"
|| End If
|| end sub()
||
|| Mais comment puis-je fgaire pour les retirer si le besoin s'en fait
|| sentir ? J'ai tenté les "delete" et "remove" de l'aide vb, mais sans
|| succès.
|| Merci
|| Serge