Bonjour a tous,
je débute depuis ce matin en vb excel, voici mon problème:
Je dispose de trois type de fichier texte (texte1, texte2, texte3) lors de l'ouverture de mon document excel, je demande a l'utilisateur lequelle il veut importer.
Lors de l'importation deux fichiers sont distincts
- 1 : MonDocsVierge.xls (qui reste vierge et qui me sert d'importation)
- 2 : NomDuFichierSelectionnéParmisLesTrois.xls (qui contient les données)
A partir de ce moment j'exploite les résultats du fichier texte choisi :
- Etape 1 : Mise en forme des données (macro excel) : OK
- Etape 2 : Création de graphiques (macro excel) : PAS OK
Le soucis est que je ne connais pas à l'avance le nom du fichier qui est ouvert.
J'arrive a récupérer le nom du fichier avec la fonction :
Dim NomFichier
NomFichier = Application.Sheets(1).Name
Salut
Tu veux changer le nom de la feuille Importation ?
Ou bien tu veux modifier ta syntaxe VB pour insérer le nom de ton fichier qui sera le nom de la feuille dans le futur ?
Dim monFichier As String
monFichier = "C:\mon Fichier Excel sélectionné.XLS"
Changer le nom :
Sheets("Importation").Name = monFichier
Modifier la syntaxe : ActiveChart.SetSourceData Source:=Sheets(monFichier).Range("A7:A19,D7:D19" _
), PlotBy:=xlColumns
Tu remarqueras la disparition des "
Vala
Jack, MVP VB NB : Je ne répondrai pas aux messages privés
Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)
