J'ai un problème avec le chemin pour l'ouverture du fichier excel.
ex :
ChDir "C:\user\U205084\Suivi GED"
Workbooks.Open Filename:="C:\user\U205084\Suivi GED\Frais d'approches.xls"
Sheets("FappVesoul").Select
Range("A1").Select
J'aimerais que ce chemin ne soit pas en dur car il va être utiliser par
plusieurs utilisateurs et ils n'auront pas tous le même chemin d'accès ,
comment peut-on faire pour qu'excel puisse trouver le chemin automatiquement
sans qu'on lui dise ou le fichier se trouve, bien évidemment en donnant
simplement le nom du fichier.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Pounet95
Bonjour, Sans vérification aucune, de mémoire et sans filets : Pour que l'utilisateur puisse ouvrir un classeur sans préciser le chemin, il faut que celui-ci ( le classeur ), soit stocké dans le répertoire par défaut ( Menu /OutilsOptions onglet Général ) Sinon, à part indiquer ce chemin dans une cellule du classeur appelant et l'utiliser au moment voulu, je ne vois comment faire autrement
Exemple : En A1 de Feuil1 mettre C:userU205084Suivi GED
autre méthode : voir dans l'aide en ligne et sur le forum l'utilisation de GetOpenFileName
Bon après-midi -- Pounet95 on trouve tout ( ou presque ) http://www.excelabo.net/ "tibo" a écrit dans le message de news:
Bonjour,
J'ai un problème avec le chemin pour l'ouverture du fichier excel. ex : ChDir "C:userU205084Suivi GED" Workbooks.Open Filename:="C:userU205084Suivi GEDFrais d'approches.xls" Sheets("FappVesoul").Select Range("A1").Select
J'aimerais que ce chemin ne soit pas en dur car il va être utiliser par plusieurs utilisateurs et ils n'auront pas tous le même chemin d'accès , comment peut-on faire pour qu'excel puisse trouver le chemin automatiquement sans qu'on lui dise ou le fichier se trouve, bien évidemment en donnant simplement le nom du fichier.
merci d'avance,
TIBO
Bonjour,
Sans vérification aucune, de mémoire et sans filets :
Pour que l'utilisateur puisse ouvrir un classeur sans préciser le chemin,
il faut que celui-ci ( le classeur ), soit stocké dans le répertoire par
défaut
( Menu /OutilsOptions onglet Général )
Sinon, à part indiquer ce chemin dans une cellule du classeur appelant
et l'utiliser au moment voulu, je ne vois comment faire autrement
Exemple : En A1 de Feuil1 mettre C:userU205084Suivi GED
autre méthode : voir dans l'aide en ligne et sur le forum l'utilisation
de GetOpenFileName
Bon après-midi
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
"tibo" <tibo@discussions.microsoft.com> a écrit dans le message de news:
34A72759-D704-4D56-B653-1C5D51018DAF@microsoft.com...
Bonjour,
J'ai un problème avec le chemin pour l'ouverture du fichier excel.
ex :
ChDir "C:userU205084Suivi GED"
Workbooks.Open Filename:="C:userU205084Suivi GEDFrais
d'approches.xls"
Sheets("FappVesoul").Select
Range("A1").Select
J'aimerais que ce chemin ne soit pas en dur car il va être utiliser par
plusieurs utilisateurs et ils n'auront pas tous le même chemin d'accès ,
comment peut-on faire pour qu'excel puisse trouver le chemin
automatiquement
sans qu'on lui dise ou le fichier se trouve, bien évidemment en donnant
simplement le nom du fichier.
Bonjour, Sans vérification aucune, de mémoire et sans filets : Pour que l'utilisateur puisse ouvrir un classeur sans préciser le chemin, il faut que celui-ci ( le classeur ), soit stocké dans le répertoire par défaut ( Menu /OutilsOptions onglet Général ) Sinon, à part indiquer ce chemin dans une cellule du classeur appelant et l'utiliser au moment voulu, je ne vois comment faire autrement
Exemple : En A1 de Feuil1 mettre C:userU205084Suivi GED
autre méthode : voir dans l'aide en ligne et sur le forum l'utilisation de GetOpenFileName
Bon après-midi -- Pounet95 on trouve tout ( ou presque ) http://www.excelabo.net/ "tibo" a écrit dans le message de news:
Bonjour,
J'ai un problème avec le chemin pour l'ouverture du fichier excel. ex : ChDir "C:userU205084Suivi GED" Workbooks.Open Filename:="C:userU205084Suivi GEDFrais d'approches.xls" Sheets("FappVesoul").Select Range("A1").Select
J'aimerais que ce chemin ne soit pas en dur car il va être utiliser par plusieurs utilisateurs et ils n'auront pas tous le même chemin d'accès , comment peut-on faire pour qu'excel puisse trouver le chemin automatiquement sans qu'on lui dise ou le fichier se trouve, bien évidemment en donnant simplement le nom du fichier.
merci d'avance,
TIBO
isabelle
bonjour Tibo,
Sub Macro1() With Application.FileSearch .NewSearch .LookIn = "C:" .SearchSubFolders = True .Filename = "Frais d'approches" .MatchTextExactly = True .FileType = msoFileTypeAllFiles .Execute If .Execute() > 0 Then MsgBox "There were " & .FoundFiles.Count & _ " file(s) found." For i = 1 To .FoundFiles.Count MsgBox .FoundFiles(i) Next i Else MsgBox "aucun fichier trouvé" End If End With End Sub
isabelle
Bonjour,
J'ai un problème avec le chemin pour l'ouverture du fichier excel. ex : ChDir "C:userU205084Suivi GED" Workbooks.Open Filename:="C:userU205084Suivi GEDFrais d'approches.xls" Sheets("FappVesoul").Select Range("A1").Select
Sub Macro1()
With Application.FileSearch
.NewSearch
.LookIn = "C:"
.SearchSubFolders = True
.Filename = "Frais d'approches"
.MatchTextExactly = True
.FileType = msoFileTypeAllFiles
.Execute
If .Execute() > 0 Then
MsgBox "There were " & .FoundFiles.Count & _
" file(s) found."
For i = 1 To .FoundFiles.Count
MsgBox .FoundFiles(i)
Next i
Else
MsgBox "aucun fichier trouvé"
End If
End With
End Sub
isabelle
Bonjour,
J'ai un problème avec le chemin pour l'ouverture du fichier excel.
ex :
ChDir "C:userU205084Suivi GED"
Workbooks.Open Filename:="C:userU205084Suivi GEDFrais d'approches.xls"
Sheets("FappVesoul").Select
Range("A1").Select
Sub Macro1() With Application.FileSearch .NewSearch .LookIn = "C:" .SearchSubFolders = True .Filename = "Frais d'approches" .MatchTextExactly = True .FileType = msoFileTypeAllFiles .Execute If .Execute() > 0 Then MsgBox "There were " & .FoundFiles.Count & _ " file(s) found." For i = 1 To .FoundFiles.Count MsgBox .FoundFiles(i) Next i Else MsgBox "aucun fichier trouvé" End If End With End Sub
isabelle
Bonjour,
J'ai un problème avec le chemin pour l'ouverture du fichier excel. ex : ChDir "C:userU205084Suivi GED" Workbooks.Open Filename:="C:userU205084Suivi GEDFrais d'approches.xls" Sheets("FappVesoul").Select Range("A1").Select
FS --- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://frederic.sigonneau.free.fr Si votre question sur Excel est urgente, évitez ma bal !
Bonjour,
J'ai un problème avec le chemin pour l'ouverture du fichier excel. ex : ChDir "C:userU205084Suivi GED" Workbooks.Open Filename:="C:userU205084Suivi GEDFrais d'approches.xls" Sheets("FappVesoul").Select Range("A1").Select
J'aimerais que ce chemin ne soit pas en dur car il va être utiliser par plusieurs utilisateurs et ils n'auront pas tous le même chemin d'accès , comment peut-on faire pour qu'excel puisse trouver le chemin automatiquement sans qu'on lui dise ou le fichier se trouve, bien évidemment en donnant simplement le nom du fichier.
FS
---
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://frederic.sigonneau.free.fr
Si votre question sur Excel est urgente, évitez ma bal !
Bonjour,
J'ai un problème avec le chemin pour l'ouverture du fichier excel.
ex :
ChDir "C:userU205084Suivi GED"
Workbooks.Open Filename:="C:userU205084Suivi GEDFrais d'approches.xls"
Sheets("FappVesoul").Select
Range("A1").Select
J'aimerais que ce chemin ne soit pas en dur car il va être utiliser par
plusieurs utilisateurs et ils n'auront pas tous le même chemin d'accès ,
comment peut-on faire pour qu'excel puisse trouver le chemin automatiquement
sans qu'on lui dise ou le fichier se trouve, bien évidemment en donnant
simplement le nom du fichier.
FS --- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://frederic.sigonneau.free.fr Si votre question sur Excel est urgente, évitez ma bal !
Bonjour,
J'ai un problème avec le chemin pour l'ouverture du fichier excel. ex : ChDir "C:userU205084Suivi GED" Workbooks.Open Filename:="C:userU205084Suivi GEDFrais d'approches.xls" Sheets("FappVesoul").Select Range("A1").Select
J'aimerais que ce chemin ne soit pas en dur car il va être utiliser par plusieurs utilisateurs et ils n'auront pas tous le même chemin d'accès , comment peut-on faire pour qu'excel puisse trouver le chemin automatiquement sans qu'on lui dise ou le fichier se trouve, bien évidemment en donnant simplement le nom du fichier.
