Bonjour à tous
Apres avoir enregistré un fichier sous excel au format csv et ouvert la boite de dialogue ouvrir du bloc note.
Je voudrais savoir s'il est possible d'ouvrir le fichier csv dans le bloc note connaissant son chemin par la variable "NomFichier"
Le code de départ etant le suivant:
Code :
- Dim NomFichier As Variant
- NomFichier = Application.GetSaveAsFilename("aze.cvs", fileFilter:="Fichier (*.csv), *.csv" )
- If NomFichier <> False Then
- ActiveWorkbook.SaveAs NomFichier
- ActiveWorkbook.Close
- Else
- Exit Sub
- End If
- ident = Shell("C:\Windows\system32\notepad.exe", vbNormalNoFocus)
- AppActivate ident
- DoEvents
- SendKeys "^o", True
|
Si vous pouvez m'aider merci d'avance.
Message édité par treza88 le 01-06-2006 à 21:06:10
