Excel VBA supprimer le catactère

Résolu
pou pouille Messages postés 212 Statut Membre -  
pou pouille Messages postés 212 Statut Membre -
Bonjour,
j'expose mon problème:
j'ai dans les cellules de la colonne G ce genre d'écriture:
G1_1
G2_1
G2_2
... je souhaiterai pouvoir tester si la cellule contien le caratère _ alors le supprimer et concatener les 2 parties:
G11
G21
G22 et ainsi de suite (j'ai déja le début de la boucle avec le nombre de cellules variable)
Dim i As Integer
For i = 1 To lignes
Next i
par avance merci. Pou Pouille
--
la théorie et la pratique c'est la même chose...enfin en théorie
Configuration: win Xp Sp2

2 réponses

  1. gbinforme Messages postés 14930 Date d'inscription   Statut Contributeur Dernière intervention   4 744
     
    bonjour

    Avec ce code tu devrais avoir ton résultat :
    Public Sub supcar()
    Dim i As Long
    For i = 1 To Cells(Columns(1).Cells.Count, "G").End(xlUp).Row
        Cells(i, "G").Value = Replace(Cells(i, "G").Value, "_", "")
    Next i
    End Sub
    
    0
  2. pou pouille Messages postés 212 Statut Membre 31
     
    ca fonctionne parfaitement , merci
    0