[VBA excel] sélection de données séparées par des ;Résolu

Question

bonjour,

j'ai un fichier excel ou les données ne sont pas affichées séparément par cellule, donc pas possible de sélectionner depuis VBA un range.
pour chaque ligne, les données sont dans la première cellule, séparées par un point virgule.
je souhaite faire une boucle ou je sélectionnerais pour chaque ligne du début à la fin en parcourant vers le bas, je sélectionne/copie à chaque fois la veleur contenue entre le 2è point-virgule et le 3è point-virgule.
savez vous comment faire ca ??

pour le moment, ce que je fais, c'est que je formatte le fichier pour afficher chaque donnée séparée par un ";" dans une cellule. c'est peut etre plus rapide autrement.

merci

mortalino · Accepted Answer

Salut,

il faut utiliser la fonction Split :

Dim MesValeurs() As String

MesValeurs = Split(Range("A1").Value), ";")
MsgBox "3eme Valeur : " & MesValeurs(2)

T'as plus qu'a boucler sur toutes les cellules 

@++ 

<hr width="100%" size="2" />
  --Mortalino--
Le mystérieux chevalier, ~Provençal, le Gaulois~

jrivet · Answer

Salut,
Essaie ceci

Dim i As Long
Dim ContenuCelule() As String
   For i = 1 To 10
       ContenuCelule = Split(Range("A" & i).Text, ";")
       MsgBox ContenuCelule(2)
   Next

, ----
[code.aspx?ID=41455 By Renfield]

@+: Ju£i?n
Pensez: Réponse acceptée

jrivet · Answer

Arggggg
Pas assez rapide petit scarabée 

salut [auteurdetail.aspx?ID=647037 mortalino]

@+: Ju£i?n
Pensez: Réponse acceptée

mortalino · Answer

Salut Julien,

Bien que moins rapide, c'est tout à ton honneur d'avoir fourni le code pour la boucle des cellules 

@++ 

<hr width="100%" size="2" />
  --Mortalino--
Le mystérieux chevalier, ~Provençal, le Gaulois~

cs_MPi · Answer

Salut,

Tu dis que tu formates ton fichier... mais tu ne dis pas comment, ni quel fichier tu formates...(?)

D'où proviennent tes données ? Est-ce un fichier CSV (ou .TXT) que tu importes ? Est-ce un fichier Excel que tu reçois tel quel ?

Si les données proviennent d'un fichier externe utilisant le ; et que ça te colles tout ça dans une colonne, tu peux remplacer ces ; par des , ou des TAB avant de le copier dans Excel.

Pourrais-tu préciser un peu plus ?

MPi

annyong · Answer

merci les gars !! :-)
c'est effectivement un fichier csv que j'importe

[VBA excel] sélection de données séparées par des ;

6 réponses

Votre réponse

Discussions similaires