Inserer symbole sur liste de fichier Excel

vincent -  
Raymond PENTIER Messages postés 58213 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour, je veux insérer un symbole " ; " à toute les lignes sur un fichier excel d'environ 3600 lignes

Merci d'avance

3 réponses

  1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Bonjour,

    Bonjour, je veux insérer un symbole " ; "

    A droite, a gauche.....???????
    1
    1. vincent
       
      A DROITE de la colonne A
      0
  2. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Re,

    Ouvrir votre classeur
    Ouvrir le vba par Alt+F11
    Doubleclick gauche (souris) sur ThisWorkbook ( en haut a gauche )

    Faire un click gauche dans fenetre a droite

    Copier le code ci-dessous

    Sub ajout_PV()
    Dim Col_A As Range, Last_Row, Cellule As Range, Nb_Cel_Sans_Fond

    With Worksheets("Feuil1")
    'Recherche derniere ligne colonne A
    Last_Row = .Columns("A").Find("*", , , , , xlPrevious).Row
    'Definition Plage de cellule
    Set Col_A = .Range("A1:A" & Last_Row)
    For Each Cellule In Col_A
    Cellule = Cellule & ";"
    Next Cellule
    End With

    End Sub

    Pour lancer la macro: click gauche sur triangle vert en haut dessous menu Format.
    Click gauche sur Excuter dans boite a dialogue(a droite).

    Bonne suite
    0
  3. Raymond PENTIER Messages postés 58213 Date d'inscription   Statut Contributeur Dernière intervention   17 482
     
    Je n'ai pas compris ce que tu veux faire ; tu peux expliquer autrement ?
    0