Bonjour à tous,
Je souhaite piloter excel via un clic sur bouton pour executer les tâches suivantes :
-ouvrir excel et le fichier;(ok)
-supprimer des colonnes;(ok)
-faire un texte to columns sur ma colonnes B (là je bloque)
Voici mon code pour l'instant :
// Déclaration des variables
FichierXLS est une chaîne
x2 est un objet OLE "Excel.Application"
FichierXLS = selecteur.SAIS_FIC
// rendre excel visible ou non
x2>>visible = OLEVrai
// ouvre le classeur
x2>>workbooks>>open(FichierXLS)
x2>>range("A1:Z4 ; A6:Z7")>>select() // sélectionne une plage
x2>>Selection>>Delete() // efface le contenu de la sélection
x2>>range("B1:B65536")>>select()
x2>>Selection>>TextToColumns (x2>>Range("B1:B65536"),xlFixedWidth,array(array(0, 1), array(10, 1), array(18, 1))True)//ligne problématique !!!!! :-?
Code VB que je souhaiterai retranscrire en Windev
Selection.TextToColumns Destination:=Range("B1"),DataType:=xlFixedWidth,FieldInfo:=Array(Array(0, 1), Array(10, 1), Array(18, 1)),TrailingMinusNumbers:=True
D'avance merci pour votre aide
Pilouz