Macro ouvre un fichier.txt sous notepad
Résolu
Ludivine
-
Ludivine -
Ludivine -
HEllo,
Je cherche à effectuer une macro sous excel 2007 qui m'ouvre un fichier .txt mais je veux qu'elle me l'ouvre sous notepad.
Le fichier texte est situé dans un sous-répertoire par rapport au fichier excel contenant la macro : \database\fichier.txt
Merci beaucoup par avance !
(J'ai essayé en enregistrant une macro mais pas réussi à que le fichier s'ouvre sous notepad!)
Je cherche à effectuer une macro sous excel 2007 qui m'ouvre un fichier .txt mais je veux qu'elle me l'ouvre sous notepad.
Le fichier texte est situé dans un sous-répertoire par rapport au fichier excel contenant la macro : \database\fichier.txt
Merci beaucoup par avance !
(J'ai essayé en enregistrant une macro mais pas réussi à que le fichier s'ouvre sous notepad!)
A voir également:
- Macro ouvre un fichier.txt sous notepad
- Telecharger notepad++ - Télécharger - Édition & Programmation
- Comment ouvrir un fichier epub ? - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Finale notepad - Télécharger - Outils professionnels
- Comment ouvrir un fichier bin ? - Guide
3 réponses
Bonsoir,
Un essai :
Bonne soirée
Un essai :
Sub ouvrir_fichier_txt()
Dim FichierTxt As String
Dim Ouvre As Double
FichierTxt = "C:\Users\TonNom\Documents\TonFichier.txt"
Ouvre = Shell("NOTEPAD.EXE " & FichierTxt, 1)
End Sub
Bonne soirée
Bonjour,
Si vous etes avec XP le chemin de notepad est le bon. Si vous etes sous seven il faudra le modifier.
Il faudra mettre le chemin et le nom de votre fichier
Sub test()
x = "C:\WINDOWS\system32\notepad.exe " & Chr(34) & "D:\_Docs\Test\shell_\RVCHUT.TXT" & Chr(34)
t = Shell(x, vbNormalFocus)
End Sub
Bonne suite
Si vous etes avec XP le chemin de notepad est le bon. Si vous etes sous seven il faudra le modifier.
Il faudra mettre le chemin et le nom de votre fichier
Sub test()
x = "C:\WINDOWS\system32\notepad.exe " & Chr(34) & "D:\_Docs\Test\shell_\RVCHUT.TXT" & Chr(34)
t = Shell(x, vbNormalFocus)
End Sub
Bonne suite
