Eve-Line
XLDnaute Nouveau
Bonjour,
J'ai beau chercher dans ce forum mais je ne trouve pas de réponse à mes questions Est-ce que quelqu'un peut m'aider?
Je voudrais créer un rapport à partir d'un fichier source en utilisant une succession de macro, ce pour me simplifier la vie à long terme.
1er problème, je n'arrive pas à ouvrir mon fichier source correctement. J'indique le point virgule comme "delimiter", mais le fichier s'ouvre avec toutes les données en colonne A... Où est l'erreur? Voici le texte de ma macro:
[/I][/SIZE]
2ème problème: je voudrais que ma macro enchaine 2 autres modules (ou 2 autres macros) automatiquement, mais je n'arrive pas à encoder cela.
Merci de votre aide!
Eve-Line
J'ai beau chercher dans ce forum mais je ne trouve pas de réponse à mes questions Est-ce que quelqu'un peut m'aider?
Je voudrais créer un rapport à partir d'un fichier source en utilisant une succession de macro, ce pour me simplifier la vie à long terme.
1er problème, je n'arrive pas à ouvrir mon fichier source correctement. J'indique le point virgule comme "delimiter", mais le fichier s'ouvre avec toutes les données en colonne A... Où est l'erreur? Voici le texte de ma macro:
Option Explicit
Public fichier As String
Public Const chemin As String = "H:\algemeen\Klantenmanagement\Gebiedsoptimalisatie\2009\Janvier\"
Public source
Public nbre As Byte
Public onglets As Collection
Sub fileopen()
Dim cat
Dim feuil
'repère le fichier source
fichier = Dir(chemin & "*.csv")
fichier = chemin & fichier
'Workbooks.Open Filename:=fichier
Workbooks.OpenText Filename:=fichier, DataType:=xlDelimited, Semicolon:=True
End Sub
Public fichier As String
Public Const chemin As String = "H:\algemeen\Klantenmanagement\Gebiedsoptimalisatie\2009\Janvier\"
Public source
Public nbre As Byte
Public onglets As Collection
Sub fileopen()
Dim cat
Dim feuil
'repère le fichier source
fichier = Dir(chemin & "*.csv")
fichier = chemin & fichier
'Workbooks.Open Filename:=fichier
Workbooks.OpenText Filename:=fichier, DataType:=xlDelimited, Semicolon:=True
End Sub
2ème problème: je voudrais que ma macro enchaine 2 autres modules (ou 2 autres macros) automatiquement, mais je n'arrive pas à encoder cela.
Merci de votre aide!
Eve-Line