Bonjour,

J'ai une base de données en xls et je voudrais modifier le nom des variables, c'est à dire modifier les chaînes de caractères des cellules de la ligne 1.

J'ai réussi à modifier une partie des caractères, mais je n'ai pas d'idée pour faire le reste.

Par exemple, j'ai une cellule qui contient le nom de ma variable, c'est à dire : "V1_2_TXT".
J'ai réussi à la modifier avec la macro ci-dessous pour que cela devienne :
"o_V1_2".

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Sub Codes_Var_Com()
 
Sheets("Extract").Select
 
    Dim Cell As Variant
    Dim LastCol As Integer
    Dim Col As Variant
    Dim Var As String
 
    LastCol = Range("ALL" & 1).End(xlToLeft).Column 'Definition derniere colonne
 
    For Col = 43 To LastCol
        Var = Cells(1, Col)
            If Right(Var, 4) = "_TXT" Then
                Var = Replace(Var, "_TXT", "")
                Cells(1, Col) = "o_" & Var
            End If
    Next Col
 
End Sub
Mais, là où je bloque, c'est que si les 2 derniers caractères sont "_2", le chiffre après le "V" et avant le dernier "_" est augmenté de 1 et le "_2" disparait :
"o_V1_2" devient "o_V2" OU "o_V6_2" devient "o_V7"

Est-ce clair ???

Merci d'avance de votre aide.

Anthony