petite Question :
Est'il possible de lancer un fichier.mdb(programme sous access) via une
macro sous excel?
j'ai essaie ca mais ca marche pas il me mets le message d'erreur "Erreur
Execution 53 fichier introuvable" alors que l'emplacment du fichier est le
bon!
voila le code que j'ai ecrit
Dim access, access1, r
Set acces1 = CreateObject("Scripting.FileSystemObject")
Set acces = acces1.GetFile("\\Dg6luxfs1\batim_interv\outils_LOCAUX\MAJ
FICHIER EXCEL\MAJ03.mdb")
petite Question : Est'il possible de lancer un fichier.mdb(programme sous access) via une macro sous excel? j'ai essaie ca mais ca marche pas il me mets le message d'erreur "Erreur Execution 53 fichier introuvable" alors que l'emplacment du fichier est le bon! voila le code que j'ai ecrit
Dim access, access1, r Set acces1 = CreateObject("Scripting.FileSystemObject") Set acces = acces1.GetFile("Dg6luxfs1batim_intervoutils_LOCAUXMAJ FICHIER EXCELMAJ03.mdb")
bonjour,
Dans la proc, il te faut utiliser la liaison courte donc faire référence
dans Outils/Référénces de l'éditeur VBE à Microsoft Access 9.0 Object Library
Dim appAccess As Access.Application
Set appAccess = CreateObject("Access.Application.9")
petite Question :
Est'il possible de lancer un fichier.mdb(programme sous access) via une
macro sous excel?
j'ai essaie ca mais ca marche pas il me mets le message d'erreur "Erreur
Execution 53 fichier introuvable" alors que l'emplacment du fichier est le
bon!
voila le code que j'ai ecrit
Dim access, access1, r
Set acces1 = CreateObject("Scripting.FileSystemObject")
Set acces = acces1.GetFile("\Dg6luxfs1batim_intervoutils_LOCAUXMAJ
FICHIER EXCELMAJ03.mdb")
petite Question : Est'il possible de lancer un fichier.mdb(programme sous access) via une macro sous excel? j'ai essaie ca mais ca marche pas il me mets le message d'erreur "Erreur Execution 53 fichier introuvable" alors que l'emplacment du fichier est le bon! voila le code que j'ai ecrit
Dim access, access1, r Set acces1 = CreateObject("Scripting.FileSystemObject") Set acces = acces1.GetFile("Dg6luxfs1batim_intervoutils_LOCAUXMAJ FICHIER EXCELMAJ03.mdb")
christophe
rebjr
j'ai essaye ce que tu m'as dit mais il m'affiche le message d'erreur "Erreur d'execution 7866 Microsoft acces can't open the Database because it's missing or opened exclusively by another user"
j'ai oublie de te dire que le fichier MAJ03.mdb attaque lui meme une autre base et un fichier excel. et je souhaite juste lancer la base sans l'ouvrir
A+
bonjour,
Dans la proc, il te faut utiliser la liaison courte donc faire référence dans Outils/Référénces de l'éditeur VBE à Microsoft Access 9.0 Object Library
Dim appAccess As Access.Application Set appAccess = CreateObject("Access.Application.9")
petite Question : Est'il possible de lancer un fichier.mdb(programme sous access) via une macro sous excel? j'ai essaie ca mais ca marche pas il me mets le message d'erreur "Erreur Execution 53 fichier introuvable" alors que l'emplacment du fichier est le bon! voila le code que j'ai ecrit
Dim access, access1, r Set acces1 = CreateObject("Scripting.FileSystemObject") Set acces = acces1.GetFile("Dg6luxfs1batim_intervoutils_LOCAUXMAJ FICHIER EXCELMAJ03.mdb")
rebjr
j'ai essaye ce que tu m'as dit mais il m'affiche le message d'erreur "Erreur
d'execution 7866 Microsoft acces can't open the Database because it's missing
or opened exclusively by another user"
j'ai oublie de te dire que le fichier MAJ03.mdb attaque lui meme une autre
base et un fichier excel.
et je souhaite juste lancer la base sans l'ouvrir
A+
bonjour,
Dans la proc, il te faut utiliser la liaison courte donc faire référence
dans Outils/Référénces de l'éditeur VBE à Microsoft Access 9.0 Object Library
Dim appAccess As Access.Application
Set appAccess = CreateObject("Access.Application.9")
petite Question :
Est'il possible de lancer un fichier.mdb(programme sous access) via une
macro sous excel?
j'ai essaie ca mais ca marche pas il me mets le message d'erreur "Erreur
Execution 53 fichier introuvable" alors que l'emplacment du fichier est le
bon!
voila le code que j'ai ecrit
Dim access, access1, r
Set acces1 = CreateObject("Scripting.FileSystemObject")
Set acces = acces1.GetFile("\Dg6luxfs1batim_intervoutils_LOCAUXMAJ
FICHIER EXCELMAJ03.mdb")
j'ai essaye ce que tu m'as dit mais il m'affiche le message d'erreur "Erreur d'execution 7866 Microsoft acces can't open the Database because it's missing or opened exclusively by another user"
j'ai oublie de te dire que le fichier MAJ03.mdb attaque lui meme une autre base et un fichier excel. et je souhaite juste lancer la base sans l'ouvrir
A+
bonjour,
Dans la proc, il te faut utiliser la liaison courte donc faire référence dans Outils/Référénces de l'éditeur VBE à Microsoft Access 9.0 Object Library
Dim appAccess As Access.Application Set appAccess = CreateObject("Access.Application.9")
petite Question : Est'il possible de lancer un fichier.mdb(programme sous access) via une macro sous excel? j'ai essaie ca mais ca marche pas il me mets le message d'erreur "Erreur Execution 53 fichier introuvable" alors que l'emplacment du fichier est le bon! voila le code que j'ai ecrit
Dim access, access1, r Set acces1 = CreateObject("Scripting.FileSystemObject") Set acces = acces1.GetFile("Dg6luxfs1batim_intervoutils_LOCAUXMAJ FICHIER EXCELMAJ03.mdb")
anonymousA
en l'absence d'autres éléments, je ne vois pas où est le problème.
A+
rebjr
j'ai essaye ce que tu m'as dit mais il m'affiche le message d'erreur "Erreur d'execution 7866 Microsoft acces can't open the Database because it's missing or opened exclusively by another user"
j'ai oublie de te dire que le fichier MAJ03.mdb attaque lui meme une autre base et un fichier excel. et je souhaite juste lancer la base sans l'ouvrir
A+
bonjour,
Dans la proc, il te faut utiliser la liaison courte donc faire référence dans Outils/Référénces de l'éditeur VBE à Microsoft Access 9.0 Object Library
Dim appAccess As Access.Application Set appAccess = CreateObject("Access.Application.9")
petite Question : Est'il possible de lancer un fichier.mdb(programme sous access) via une macro sous excel? j'ai essaie ca mais ca marche pas il me mets le message d'erreur "Erreur Execution 53 fichier introuvable" alors que l'emplacment du fichier est le bon! voila le code que j'ai ecrit
Dim access, access1, r Set acces1 = CreateObject("Scripting.FileSystemObject") Set acces = acces1.GetFile("Dg6luxfs1batim_intervoutils_LOCAUXMAJ FICHIER EXCELMAJ03.mdb")
en l'absence d'autres éléments, je ne vois pas où est le problème.
A+
rebjr
j'ai essaye ce que tu m'as dit mais il m'affiche le message d'erreur "Erreur
d'execution 7866 Microsoft acces can't open the Database because it's missing
or opened exclusively by another user"
j'ai oublie de te dire que le fichier MAJ03.mdb attaque lui meme une autre
base et un fichier excel.
et je souhaite juste lancer la base sans l'ouvrir
A+
bonjour,
Dans la proc, il te faut utiliser la liaison courte donc faire référence
dans Outils/Référénces de l'éditeur VBE à Microsoft Access 9.0 Object Library
Dim appAccess As Access.Application
Set appAccess = CreateObject("Access.Application.9")
petite Question :
Est'il possible de lancer un fichier.mdb(programme sous access) via une
macro sous excel?
j'ai essaie ca mais ca marche pas il me mets le message d'erreur "Erreur
Execution 53 fichier introuvable" alors que l'emplacment du fichier est le
bon!
voila le code que j'ai ecrit
Dim access, access1, r
Set acces1 = CreateObject("Scripting.FileSystemObject")
Set acces = acces1.GetFile("\Dg6luxfs1batim_intervoutils_LOCAUXMAJ
FICHIER EXCELMAJ03.mdb")
en l'absence d'autres éléments, je ne vois pas où est le problème.
A+
rebjr
j'ai essaye ce que tu m'as dit mais il m'affiche le message d'erreur "Erreur d'execution 7866 Microsoft acces can't open the Database because it's missing or opened exclusively by another user"
j'ai oublie de te dire que le fichier MAJ03.mdb attaque lui meme une autre base et un fichier excel. et je souhaite juste lancer la base sans l'ouvrir
A+
bonjour,
Dans la proc, il te faut utiliser la liaison courte donc faire référence dans Outils/Référénces de l'éditeur VBE à Microsoft Access 9.0 Object Library
Dim appAccess As Access.Application Set appAccess = CreateObject("Access.Application.9")
petite Question : Est'il possible de lancer un fichier.mdb(programme sous access) via une macro sous excel? j'ai essaie ca mais ca marche pas il me mets le message d'erreur "Erreur Execution 53 fichier introuvable" alors que l'emplacment du fichier est le bon! voila le code que j'ai ecrit
Dim access, access1, r Set acces1 = CreateObject("Scripting.FileSystemObject") Set acces = acces1.GetFile("Dg6luxfs1batim_intervoutils_LOCAUXMAJ FICHIER EXCELMAJ03.mdb")
Michel Pierron
Bonjour Christophe; Peut être simplement: Const MdbFile$ = "Ici le chemin complet de ton fichier .mdb" Dim iPath$ iPath = Application.Path & "msaccess.exe " Shell iPath & MdbFile, vbNormalFocus
MP
"christophe" a écrit dans le message de news:
Bonjour a toutes et a tous
petite Question : Est'il possible de lancer un fichier.mdb(programme sous access) via une macro sous excel? j'ai essaie ca mais ca marche pas il me mets le message d'erreur "Erreur Execution 53 fichier introuvable" alors que l'emplacment du fichier est le bon! voila le code que j'ai ecrit
Dim access, access1, r Set acces1 = CreateObject("Scripting.FileSystemObject") Set acces = acces1.GetFile("Dg6luxfs1batim_intervoutils_LOCAUXMAJ FICHIER EXCELMAJ03.mdb")
Bonjour Christophe;
Peut être simplement:
Const MdbFile$ = "Ici le chemin complet de ton fichier .mdb"
Dim iPath$
iPath = Application.Path & "msaccess.exe "
Shell iPath & MdbFile, vbNormalFocus
MP
"christophe" <cgrosjean@europarl.eu.int> a écrit dans le message de news:
CB106041-1A1E-4843-A9DD-05C9FC7C4660@microsoft.com...
Bonjour a toutes et a tous
petite Question :
Est'il possible de lancer un fichier.mdb(programme sous access) via une
macro sous excel?
j'ai essaie ca mais ca marche pas il me mets le message d'erreur "Erreur
Execution 53 fichier introuvable" alors que l'emplacment du fichier est le
bon!
voila le code que j'ai ecrit
Dim access, access1, r
Set acces1 = CreateObject("Scripting.FileSystemObject")
Set acces = acces1.GetFile("\Dg6luxfs1batim_intervoutils_LOCAUXMAJ
FICHIER EXCELMAJ03.mdb")
Bonjour Christophe; Peut être simplement: Const MdbFile$ = "Ici le chemin complet de ton fichier .mdb" Dim iPath$ iPath = Application.Path & "msaccess.exe " Shell iPath & MdbFile, vbNormalFocus
MP
"christophe" a écrit dans le message de news:
Bonjour a toutes et a tous
petite Question : Est'il possible de lancer un fichier.mdb(programme sous access) via une macro sous excel? j'ai essaie ca mais ca marche pas il me mets le message d'erreur "Erreur Execution 53 fichier introuvable" alors que l'emplacment du fichier est le bon! voila le code que j'ai ecrit
Dim access, access1, r Set acces1 = CreateObject("Scripting.FileSystemObject") Set acces = acces1.GetFile("Dg6luxfs1batim_intervoutils_LOCAUXMAJ FICHIER EXCELMAJ03.mdb")