Messages des blogs récents

Envoyé par informer

Bonjour à tous,

En vba, il existe une fonction native REPLACE(expression, find, replace, [ start, [ count, [ compare ]]]) Voir ici pour plus d'information

Toutefois, cette fonction ne peut remplacer qu'un seul caractère à la fois. donc dans l'éventualité d'un remplacement de différents caractères par un même caractère, rien de mieux que l'utilisation du RegEx. Le code suivant permet cette action!

Code :

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

Public Function fRegExReplace(psValue As String, psPattern

...

Les expressions rationnelles sont délaissées par Excel, hélas. Voici une fonction perso qui pallie ce manque.


Salut.


- Pierre, je voudrais tester que ma saisie est correcte.
- Mmmh? Mais encore?
- J'ai des codes d'articles: Deux lettres, 4 chiffres, un tiret et deux chiffres. T'as une idée? Je ne m'en sors pas avec les formules, les SI, les STXT, etc...
- Ok, Attends...


- Tiens, voilà une fonction qui utilise ...

Il existe 2 fonctions bien pratiques pour obtenir du texte contenu entre 2 balises :

Code VB.NET :

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

1
2
3
4
5
6
7
8
9
 
Private Function ParseBetween(Source$, Before$, After$) As String()
    Dim Results As New List(Of String)
    Dim T As New List(Of String)
    With T
        .AddRange(System.Text.RegularExpressions.Regex.Split(Source, Before))
        .RemoveAt(0)
        For Each Item$ In T
           Results.Add(System.Text.RegularExpressions.Regex.Split(Item,

...

Il y a des fois ou on se retrouve avec une liste de "trucs" qu'on veux utiliser pour avoir une autre liste de "machin". Et le simple rechercher remplacer ne passe pas !!!
Il faut faire juste un peu plus. On a donc besoin des expressions régulières !


Note : Juste ce qu'il faut, on n'est pas fou non plus...

Prenons un cas typique d'une liste de retour à réutilisé :

Projet référencé : frkdbg

...