M
Marc
Guest
Bonjour à tous,
Suite aux renseignements obtenu sur ce forum, j'ai réussi à ouvrir l'exploreur Windows dans un répertoire précis à partir d'un bouton sur une feuille excel dont voici le code.
Private Sub CommandButton1_Click()
'necessite d'activer Microsoft bibliotheque 'Microsoft Shell controls and automation' dans 'outils' puis 'Références'
Dim Chemin As String
Chemin = 'C:\\RAPPORT INDISPO\\EN COURS' 'à adapter
Shell 'Explorer ' & Chemin & '', 3
ActiveWorkbook.Close SaveChange = False
End Sub
Ca marche nickel mais, bien sur, à la demande de plusieurs autre personnes j'ai du reproduire l'opération vers d'autre répertoires et là je suis tombé sur un os car il y une virgule dans le nom du répertoire du genre
Chemin = 'C:\\RAPPORT INDISPO\\EN COURS, URGENT'
Message Windows du genre 'Le repertoire URGENT n'existe pas ou ....'
Apparenment la partie avant la virgule n'est pas pris en compte ?? si quelqu'un à une idée ?
Je profite de ce message pour vous demander également comment, lors de la fermeture d'un fichier excel, ne rien enregitrer et le fermer sans aucun message ni aucune confirmation ?
Si quelqu'un possède la même astuce pour fermer un fichier Word...
Suite aux renseignements obtenu sur ce forum, j'ai réussi à ouvrir l'exploreur Windows dans un répertoire précis à partir d'un bouton sur une feuille excel dont voici le code.
Private Sub CommandButton1_Click()
'necessite d'activer Microsoft bibliotheque 'Microsoft Shell controls and automation' dans 'outils' puis 'Références'
Dim Chemin As String
Chemin = 'C:\\RAPPORT INDISPO\\EN COURS' 'à adapter
Shell 'Explorer ' & Chemin & '', 3
ActiveWorkbook.Close SaveChange = False
End Sub
Ca marche nickel mais, bien sur, à la demande de plusieurs autre personnes j'ai du reproduire l'opération vers d'autre répertoires et là je suis tombé sur un os car il y une virgule dans le nom du répertoire du genre
Chemin = 'C:\\RAPPORT INDISPO\\EN COURS, URGENT'
Message Windows du genre 'Le repertoire URGENT n'existe pas ou ....'
Apparenment la partie avant la virgule n'est pas pris en compte ?? si quelqu'un à une idée ?
Je profite de ce message pour vous demander également comment, lors de la fermeture d'un fichier excel, ne rien enregitrer et le fermer sans aucun message ni aucune confirmation ?
Si quelqu'un possède la même astuce pour fermer un fichier Word...