Discussion :

[titou31000]

Bonjour à tous,

J'ai écrit une macro vba et j'ai du mal à la réécrire sous Delphi. En fait, il y a la fonction TextToColumns qui me pose problème, au niveau qui paramètre field avec le tableau, je n'arrive pas à le retranscrire en delphi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Range("E2:E108").Select
    Selection.TextToColumns Destination:=Range("E2"), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=False, _
        Semicolon:=False, Comma:=False, Space:=True, Other:=False, FieldInfo _
        :=Array(Array(1, 1), Array(2, 1)), TrailingMinusNumbers:=True

Avez-vous déjà rencontré cette fonction?

Merci,

Bonne journée

[ZebreLoup]

C'est une fonction spécifique d'Excel, l'équivalent de faire Données-Convertir dans le menu. Je ne sais pas si ça existe en Delphi. Sinon, il faut faire une boucle sur les lignes et utiliser des splits.

[titou31000]

Oui c'est exactement ça, une fonction d'Excel que j'utilise!! Je pense que c'est faisable puisque une ligne comme cela la fonctionne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

OleExcelApplication.Workbooks[1].Worksheets[4].Select;