Text.Trim(" ma Pomme#§ est belle ") => "ma Pomme#§ est belle"
Text.Remove(Text.Trim(" ma Pomme#§ est belle "), {"@","#","§"}) => "ma Pomme est belle"
text.Replace(Text.Remove(Text.Trim(" ma Pomme#§ est belle "), {"@","#","§"})," ","_") => "ma_Pomme_est_belle"
En formule, pas très compliqué, selon le même principe, mais je ne connais pas de fonction qui fasse tout d'un coupMais voila je travaille dans une boite qui nous demande de faire du velo sans les pedales... donc point de VBA.
Bonjour,Bonjour merinos, le forum
Pas trop compris la question mais peut être
VB:MsgBox Replace(Replace(Replace(Replace(Application.Trim(" ma Pomme#§ est belle "), "@", ""), "#", ""), "§", ""), " ", "_")
ps : et, en parlant Xld correctement, on dit mapomme est beau !
Bien cordialement, @+
Sub Essai_Regex()
Dim Chn_Txt$
Chn_Txt = " ma Pomme#§ est beau "
With CreateObject("VBScript.RegExp")
.Pattern = "[^A-zÀ-ÿ0-9 ]" 'caractères à garder
.Global = True
Chn_Txt = Application.Trim(.Replace(Chn_Txt, " ")) 'tous les caractères hors pattern sont modifiés _
en espaces pour traiter tous les séparateurs possibles, le trim réduit ensuite les répétitions d'espace
End With
Chn_Txt = Replace(Chn_Txt, " ", "_") 'remplaces les espaces par le caractère de séparation voulu
MsgBox Chn_Txt, vbOKOnly + vbInformation
End Sub
Tu veux dire que nous avons une poire et une pomme, si quelqu'un s'appelle @mabanane, je vais pas trouver cela très topBonjour à tous,
Je me suis réuni avec mapoire. Il est très jaloux de mapomme.
S'il vous plait, ne jouez pas les susceptibilité de ces deux individus fragiles
Sub Essai_Regex()
Dim Chn_Txt$
Chn_Txt = " ma Pomme#§ et ma Poire#§ sont beaux "
With CreateObject("VBScript.RegExp")
.Pattern = "[^A-zÀ-ÿ0-9 ]" 'caractères à garder
.Global = True
Chn_Txt = Application.Trim(.Replace(Chn_Txt, " ")) 'tous les caractères hors pattern sont modifiés _
en espaces pour traiter tous les séparateurs possibles, le trim réduit ensuite les répétitions d'espaces
End With
Chn_Txt = Replace(Chn_Txt, " ", "_") 'remplaces les espaces par le caractère de séparation voulu
MsgBox Chn_Txt, vbOKOnly + vbInformation
End Sub
Si tu veux je remmene me deux comptes secondaires, le trio d'Etoto (@Etoto0026 et @Et0t0) contre le duo des fruitsBonjour à tous,
Je me suis réuni avec mapoire. Il est très jaloux de mapomme.
S'il vous plait, ne jouez pas les susceptibilité de ces deux individus fragiles
Je me suis réuni avec mapomme pour lui signifier ma jalousie et frustation. Il est cité régulièrement dans ce forum et mapoire jamais!
Tu es suisse aussi ?il n'est pas Français mais Suisse