pb: débutant sous vba

  • Initiateur de la discussion freddo6
  • Date de début
F

freddo6

Guest
bonjours à tous,


voila je débute en VBA et j'aurai sans doute une question simple pour vous:

voilà je suis en train de faire un module sous access me permettant d'envoyer une table vers un fichier excel

une fois cette table envoyée (ce que j'arrive encore à faire..)
je voudrais que mon programme fasse:
-afficher ma feuille de calcul
-puis (et surtout) effectuer une macro enregistrer sous excel (c'est une macro qui me permet de convertir une colonne)

donc si quelqu'un pourrai m'aider je lui serai infiniment reconnaissant

PS: voilà ce que j'essaye de faire
Function boulanger()
Dim objXL As Object, x

Set objXL = CreateObject("Excel.Application")
With objXL.Application
.Visible = True
.Workbooks.Open "C:\Mes documents\essai.XLS"
.Sheets("feuille1").select
.Range("A1").select
Selection.TextToColumns Destination:=.Range("A1"),
DataType:=xlFixedWidth, _
FieldInfo:=Array(Array(0, 9), Array(12, 9), Array(19, 1))
.Range("A13").select
End With

Set objXL = Nothing

End Function
 

Discussions similaires

Statistiques des forums

Discussions
314 645
Messages
2 111 536
Membres
111 184
dernier inscrit
amiko