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 : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
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.