OVH Cloud OVH Cloud

[HS] Longueur d'une ligne de message

7 réponses
Avatar
garnote
Bonsoir,

Est-ce possible de faire en sorte que les lignes d'une macro
collée dans un message ne soient pas tronquées quand
ladite macro vous parvient ?

Serge

7 réponses

Avatar
garnote
Je crois avoir trouvé ( pas chur ) ;-)
Je fais un test :
Sub Arrondir_Coins()
For Each C In Selection
L = C.Left
T = C.Top
W = C.Width
H = C.Height
ActiveSheet.Shapes.AddShape(msoShapeRoundedRectangle, L, T, W, H).Fill.Visible = msoFalse
End With
Next C
End Sub

Moé

"garnote" a écrit dans le message de news: a4YOg.97044$
Bonsoir,

Est-ce possible de faire en sorte que les lignes d'une macro
collée dans un message ne soient pas tronquées quand
ladite macro vous parvient ?

Serge



Avatar
garnote
Yep, ça marche dedans mon chez-moi ;-)
Et vous, la ligne débutant par ActiveSheet est-elle tronquée ?

Serge

"garnote" a écrit dans le message de news: VTYOg.70738$
Je crois avoir trouvé ( pas chur ) ;-)
Je fais un test :
Sub Arrondir_Coins()
For Each C In Selection
L = C.Left
T = C.Top
W = C.Width
H = C.Height
ActiveSheet.Shapes.AddShape(msoShapeRoundedRectangle, L, T, W, H).Fill.Visible = msoFalse
End With
Next C
End Sub

Moé

"garnote" a écrit dans le message de news: a4YOg.97044$
Bonsoir,

Est-ce possible de faire en sorte que les lignes d'une macro
collée dans un message ne soient pas tronquées quand
ladite macro vous parvient ?

Serge







Avatar
FxM
Non m'sieur, elle est entière !

@+
FxM


Yep, ça marche dedans mon chez-moi ;-)
Et vous, la ligne débutant par ActiveSheet est-elle tronquée ?

Serge

"garnote" a écrit dans le message de news: VTYOg.70738$
Je crois avoir trouvé ( pas chur ) ;-)
Je fais un test :
Sub Arrondir_Coins()
For Each C In Selection
L = C.Left
T = C.Top
W = C.Width
H = C.Height
ActiveSheet.Shapes.AddShape(msoShapeRoundedRectangle, L, T, W, H).Fill.Visible = msoFalse
End With
Next C
End Sub

Moé

"garnote" a écrit dans le message de news: a4YOg.97044$
Bonsoir,

Est-ce possible de faire en sorte que les lignes d'une macro
collée dans un message ne soient pas tronquées quand
ladite macro vous parvient ?

Serge










Avatar
lSteph
Bonsoir Serge,

C'est parfait chez moi itou!

@+

lSteph

"garnote" a écrit dans le message de news:
lYYOg.70739$
Yep, ça marche dedans mon chez-moi ;-)
Et vous, la ligne débutant par ActiveSheet est-elle tronquée ?

Serge

"garnote" a écrit dans le message de news:
VTYOg.70738$
Je crois avoir trouvé ( pas chur ) ;-)
Je fais un test :
Sub Arrondir_Coins()
For Each C In Selection
L = C.Left
T = C.Top
W = C.Width
H = C.Height
ActiveSheet.Shapes.AddShape(msoShapeRoundedRectangle, L, T, W,
H).Fill.Visible = msoFalse
End With
Next C
End Sub

Moé

"garnote" a écrit dans le message de news:
a4YOg.97044$
Bonsoir,

Est-ce possible de faire en sorte que les lignes d'une macro
collée dans un message ne soient pas tronquées quand
ladite macro vous parvient ?

Serge











Avatar
Pierre Fauconnier
Salut Serge,

Elle est entière. C'est quoi la recette?


--
Pierre Fauconnier () (Skype:
pierre_fauconnier)
"Le bonheur n'est pas au bout du chemin. Le bonheur EST le chemin ( proverbe
zen )
Remplacez nospam.nospam par pfi.be pour répondre. Merci

"FxM" a écrit dans le message de news:

Non m'sieur, elle est entière !

@+
FxM


Yep, ça marche dedans mon chez-moi ;-)
Et vous, la ligne débutant par ActiveSheet est-elle tronquée ?

Serge

"garnote" a écrit dans le message de news:
VTYOg.70738$
Je crois avoir trouvé ( pas chur ) ;-)
Je fais un test :
Sub Arrondir_Coins()
For Each C In Selection
L = C.Left
T = C.Top
W = C.Width
H = C.Height
ActiveSheet.Shapes.AddShape(msoShapeRoundedRectangle, L, T, W,
H).Fill.Visible = msoFalse
End With
Next C
End Sub

Moé

"garnote" a écrit dans le message de news:
a4YOg.97044$
Bonsoir,

Est-ce possible de faire en sorte que les lignes d'une macro
collée dans un message ne soient pas tronquées quand
ladite macro vous parvient ?

Serge











Avatar
FxM
Bonjour Pierre,

Salut Serge,
Non, moi c'est François-Xavier :o)


Elle est entière. C'est quoi la recette?
Ne pas couper les lignes après le xx caractère ?


Sous TB 1.5.0.7 :
Menu outils - options - onglet rédaction
reformater les messages texte en lignes de [xx] caractères.
Mettre xx = 500 :o)

@+
FxM

Avatar
Pierre Fauconnier
Merci M'sieur...


--
Pierre Fauconnier () (Skype:
pierre_fauconnier)
"Le bonheur n'est pas au bout du chemin. Le bonheur EST le chemin ( proverbe
zen )
Remplacez nospam.nospam par pfi.be pour répondre. Merci

"FxM" a écrit dans le message de news:

Bonjour Pierre,

Salut Serge,
Non, moi c'est François-Xavier :o)


Elle est entière. C'est quoi la recette?
Ne pas couper les lignes après le xx caractère ?


Sous TB 1.5.0.7 :
Menu outils - options - onglet rédaction
reformater les messages texte en lignes de [xx] caractères.
Mettre xx = 500 :o)

@+
FxM