Donne d'une celulle en plusieurs celulles de 250 caractéres

[yorrickb]

Bonjour,

J'ai un petit problème excel.

J'ai dans une colonne une cellule "description commerciale" qui contient jusqu’à 1034 caractères.

Afin d'importer cela je dois couper cette cellule en 5 cellules de 250 caractères, je doit garder les données
comme tel car par la suite je vais faire des exports de mon ERP en une seule cellule.

J'ai essayer avec la fonction convertir, mais je trouve cela de la bidouille et à chaque import. Je devrait `
refaire l'import en supprimant les indices de colonne.

Pouvez vous m’aidè ...

Merci par avance

 

[yorrickb]

Re : Donne d'une celulle en plusieurs celulles de 250 caractéres

J'ai trouvé la réponse à mon problème,

J'ai utilisé la fonction =STXT(A1;cardeb;nbcar)

Je pense que le plus simple serait une macro mais à défaut
j'ai ma solution.

Bonne continuation au forum.

Cdlt

 

[camarchepas]

Re : Donne d'une celulle en plusieurs celulles de 250 caractéres

Bonjour,

alors un essai, testé sur un jeu de données bidon

Pour le coup la phrase devra être en A16 , sinon adaptes le code A16 et B16

Sub Decoupe()
Dim Phrase As String
Dim Tourne As Long, Compte As Long
Phrase = Range("A16")  ' A adapter
For Tourne = 1 To Len(Phrase) Step 250
  Range("B16").Offset(0, Compte) = Mid(Phrase, Tourne, 250) ' A adapter
  Compte = Compte + 1
Next Tourne
End Sub