[Déplacé VB6 --> VBA] Ouverture de fichier depuis CommandButton EXCEL
oupss89
- Messages postés
- 6
- Date d'inscription
- lundi 14 décembre 2009
- Statut
- Membre
- Dernière intervention
- 17 décembre 2009
- Messages postés
- 130
- Date d'inscription
- jeudi 16 avril 2009
- Statut
- Membre
- Dernière intervention
- 8 décembre 2015
A voir également:
- Vba ouvrir fichier excel chemin relatif
- Vba chemin relatif - Meilleures réponses
- Chemin relatif vba - Meilleures réponses
- VBA Chemin Relatif ✓ - Forum - VB.NET
- Chemin relatif/absolu fichier ✓ - Forum - VB.NET
- VBA, importer les données d'un fichier TDMS sous EXCEL - Forum - Visual Basic 6
- Vba chemin absolu chemin relatif - Forum - Visual Basic 6
- Chemin relatif sur access vba - Forum - Visual Basic
12 réponses
- Messages postés
- 6
- Date d'inscription
- lundi 14 décembre 2009
- Statut
- Membre
- Dernière intervention
- 17 décembre 2009
Bjr,
Non, en fait, le fichier EXCEL où je place mes boutons est dans un dossier Père par rapport à la base que je appeler. Donc, je voudrais que lors du click sur le bouton, le fichier ACCESS s'ouvre en aillant seulement le chemin relatif (un peu comme avec le lien hypertexte).
L'objectif est de pouvoir fournir l'outil EXCEL à des clients avec l'ensemble des dossiers fils...
J'éspère que je ne suis pas trop confuse.
Exemple :
Fichier excel dans : C\BLABLA\YOUPI\Essai.xls
Base Access appelée par EXCEL via ComanButton : C\BLABLA\YOUPI\ACCESS\Tacages.mdb)
MErci !
Non, en fait, le fichier EXCEL où je place mes boutons est dans un dossier Père par rapport à la base que je appeler. Donc, je voudrais que lors du click sur le bouton, le fichier ACCESS s'ouvre en aillant seulement le chemin relatif (un peu comme avec le lien hypertexte).
L'objectif est de pouvoir fournir l'outil EXCEL à des clients avec l'ensemble des dossiers fils...
J'éspère que je ne suis pas trop confuse.
Exemple :
Fichier excel dans : C\BLABLA\YOUPI\Essai.xls
Base Access appelée par EXCEL via ComanButton : C\BLABLA\YOUPI\ACCESS\Tacages.mdb)
MErci !
- Messages postés
- 130
- Date d'inscription
- jeudi 16 avril 2009
- Statut
- Membre
- Dernière intervention
- 8 décembre 2015
Salut désolé pour l'attente mais ...
Bref voici un bout de code pour toi, il faut juste qu'il y ait un seul fichier Access dans le répertoire de ton fichier Excel.
N'oublie pas de cliquer sur réponse acceptée si l'a réponse te satisfait.
Sinon explique encore
nitho l'amateur
Bref voici un bout de code pour toi, il faut juste qu'il y ait un seul fichier Access dans le répertoire de ton fichier Excel.
Private Sub nitho()
Dim chmin As String
With Application.FileSearch
.NewSearch
.LookIn = ActiveWorkbook.Path
.Filename = "*.mdb"
.SearchSubFolders = False
.Execute
chmin = .FoundFiles(1)
End With
Set appAccess = CreateObject("Access.Application")
appAccess.OpenCurrentDatabase chmin
appAccess.Visible = True
End Sub
N'oublie pas de cliquer sur réponse acceptée si l'a réponse te satisfait.
Sinon explique encore
nitho l'amateur
- Messages postés
- 6
- Date d'inscription
- lundi 14 décembre 2009
- Statut
- Membre
- Dernière intervention
- 17 décembre 2009
Bonjour, et merci pour tes réponses !!
J'ai essayé de placer ton code dans le CommandButton_Click() (en vérifiant l'histoire des dossiers), et voilà ce qu'il me dit : Erreur de compilation - Utilisatio incorrecte de la Propriété ------".LookIn".
Visiblement...il ya un truc qui lui plait pas...
Merci encore de ton aide !
J'ai essayé de placer ton code dans le CommandButton_Click() (en vérifiant l'histoire des dossiers), et voilà ce qu'il me dit : Erreur de compilation - Utilisatio incorrecte de la Propriété ------".LookIn".
Visiblement...il ya un truc qui lui plait pas...
Merci encore de ton aide !
