XL 2010 Supprimer un colonne et mettre le contenu des cellules entre deux guillemets

[abdi1135]

Bonsoir,
Je veux supprimer la première colonne d'un fichier excel et mettre le contenu des cellules entre deux guillemets (si ils ne sont pas).


état initial
"021";"021FAL16-022046";"AM104089";2;1;2;20161226;20161226
"021";"021FAL16-022047";"AM102023";2;1;2;20161226;20161226

état final
"021FAL16-022046";"AM104089";"2";"1";"2";"20161226";"20161226"
"021FAL16-022047";"AM102023";"2";"1";"2";"20161226";"20161226"

Merci d'avance,

 

[Hieu]

Salut,

Voici une macro qui pourrait te permettre de réaliser ce que tu souhaites:

Sub mlkj()
Columns(1).Delete
i = 1
Do
For j = 1 To 7
If Not Left(Cells(i, j), 1) = Chr(34) Then Cells(i, j) = Chr(34) & Cells(i, j) & Chr(34)
Next j
i = i + 1
Loop Until IsEmpty(Cells(i, 1))
End Sub

 

[abdi1135]

Bonjour Hieu
Merci beaucoup pour votre aide et pour votre macro.
Amicalement