fonction remplacer CTRL+H

M

myDearFriend!

Guest

• 30 Octobre 2004

• #2

Bonjour Mars66,


Ci-joint un exemple par VBA.

Sub RemplaceVirgules()
Dim C As Range
For Each C In Selection
C.Value = Application.WorksheetFunction.Substitute(C.Value, ",", vbLf)
Next C
End Sub


Cordialement,
Didier_mDF

 

Pièces jointes

• PourMars66.zip

  8.3 KB · Affichages: 27

Vote positif 0 Vote négatif

M

mars66

Guest

• 30 Octobre 2004

• #3

merci de ton aide je vais essayer de l'appliquer @+

 

Vote positif 0 Vote négatif

A

andré

Guest

• 30 Octobre 2004

• #4

Salut,

Solution par formule :

=SUBSTITUE(A1;",";CAR(10))
Ne pas oublier de cocher 'Renvoyer à la ligne automatiquement' sous Format / Cellule / Alignement.

Ândré.

 

Vote positif 0 Vote négatif