Je travaille sur un module d’importation de données qui puise sa source dans
des feuilles Excel qui contiennent des macros.
Lors de l’ouverture du workbook à l’aide de la méthode open de l’objet
Excel, la bibliothèque ouvre automatiquement une boîte de dialogue qui me
demande de confirmer l’activation des macros.
Compte tenu du fait que je n’utilise pas ces macros durant mon traitement,
j’aimerais qu’Excel ne me pose pas la question.
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
Pierre CFI [mvp]
bonjour tu ouvres un recordset ??
-- Pierre CFI MVP Microsoft Access
Site pour bien commencer Access http://www.mpfa.info
"CrazyMasterMC" a écrit dans le message de news:
Salut,
Je travaille sur un module d'importation de données qui puise sa source dans des feuilles Excel qui contiennent des macros.
Lors de l'ouverture du workbook à l'aide de la méthode open de l'objet Excel, la bibliothèque ouvre automatiquement une boîte de dialogue qui me demande de confirmer l'activation des macros.
Compte tenu du fait que je n'utilise pas ces macros durant mon traitement, j'aimerais qu'Excel ne me pose pas la question.
Sauriez-vous comment faire ?
D'avance merci
Laurent
bonjour
tu ouvres un recordset ??
--
Pierre CFI
MVP Microsoft Access
Site pour bien commencer
Access http://www.mpfa.info
"CrazyMasterMC" <CrazyMasterMC@discussions.microsoft.com> a écrit dans le message de news:
161C8541-3126-4C49-8394-FB1E82761E8B@microsoft.com...
Salut,
Je travaille sur un module d'importation de données qui puise sa source dans
des feuilles Excel qui contiennent des macros.
Lors de l'ouverture du workbook à l'aide de la méthode open de l'objet
Excel, la bibliothèque ouvre automatiquement une boîte de dialogue qui me
demande de confirmer l'activation des macros.
Compte tenu du fait que je n'utilise pas ces macros durant mon traitement,
j'aimerais qu'Excel ne me pose pas la question.
Site pour bien commencer Access http://www.mpfa.info
"CrazyMasterMC" a écrit dans le message de news:
Salut,
Je travaille sur un module d'importation de données qui puise sa source dans des feuilles Excel qui contiennent des macros.
Lors de l'ouverture du workbook à l'aide de la méthode open de l'objet Excel, la bibliothèque ouvre automatiquement une boîte de dialogue qui me demande de confirmer l'activation des macros.
Compte tenu du fait que je n'utilise pas ces macros durant mon traitement, j'aimerais qu'Excel ne me pose pas la question.
Sauriez-vous comment faire ?
D'avance merci
Laurent
CrazyMasterMC
Salut,
La fonction que je corrige utilisait initialement :
DoCmd.TransferSpreadsheet acImport, , [TableDestination], [nomFichierXL], True, [Plage de cellules]
Qui m'affichait cette maudite boite de dialogue... En plus je recevais souvent l'erreur : 3161 : Impossible de décoder le fichier.
Du coup j'ai instancié un objet Excel et je fais un parcours de ma Range que j'importe ligne à ligne via une requête Insert. Je n'ai pas fini le nouveau module.
Je préfère cette méthode car les messages renvoyés par je moteur Access ne servent à rien, ils ne sont pas assez précis...
Là je maîtrise tout le process.
Mais si tu as une autre suggestion, je suis toujours open.
Bien à toi
Laurent
Salut,
La fonction que je corrige utilisait initialement :
DoCmd.TransferSpreadsheet acImport, , [TableDestination], [nomFichierXL],
True, [Plage de cellules]
Qui m'affichait cette maudite boite de dialogue... En plus je recevais
souvent l'erreur : 3161 : Impossible de décoder le fichier.
Du coup j'ai instancié un objet Excel et je fais un parcours de ma Range que
j'importe ligne à ligne via une requête Insert. Je n'ai pas fini le nouveau
module.
Je préfère cette méthode car les messages renvoyés par je moteur Access ne
servent à rien, ils ne sont pas assez précis...
Là je maîtrise tout le process.
Mais si tu as une autre suggestion, je suis toujours open.
La fonction que je corrige utilisait initialement :
DoCmd.TransferSpreadsheet acImport, , [TableDestination], [nomFichierXL], True, [Plage de cellules]
Qui m'affichait cette maudite boite de dialogue... En plus je recevais souvent l'erreur : 3161 : Impossible de décoder le fichier.
Du coup j'ai instancié un objet Excel et je fais un parcours de ma Range que j'importe ligne à ligne via une requête Insert. Je n'ai pas fini le nouveau module.
Je préfère cette méthode car les messages renvoyés par je moteur Access ne servent à rien, ils ne sont pas assez précis...
Là je maîtrise tout le process.
Mais si tu as une autre suggestion, je suis toujours open.
Bien à toi
Laurent
Pierre CFI [mvp]
le fichier xls a une macro et no message Dim db As dao.Database Dim enr As dao.Recordset Set db = OpenDatabase("c:decouverteclient.xls", False, False, "excel 8.0") Set enr = db.OpenRecordset("client")
Client est une zone nommée sinon, le nom de la feille avec $ (client$
-- Pierre CFI MVP Microsoft Access
Site pour bien commencer Access http://www.mpfa.info
"CrazyMasterMC" a écrit dans le message de news:
Salut,
La fonction que je corrige utilisait initialement :
DoCmd.TransferSpreadsheet acImport, , [TableDestination], [nomFichierXL], True, [Plage de cellules]
Qui m'affichait cette maudite boite de dialogue... En plus je recevais souvent l'erreur : 3161 : Impossible de décoder le fichier.
Du coup j'ai instancié un objet Excel et je fais un parcours de ma Range que j'importe ligne à ligne via une requête Insert. Je n'ai pas fini le nouveau module.
Je préfère cette méthode car les messages renvoyés par je moteur Access ne servent à rien, ils ne sont pas assez précis...
Là je maîtrise tout le process.
Mais si tu as une autre suggestion, je suis toujours open.
Bien à toi
Laurent
le fichier xls a une macro et no message
Dim db As dao.Database
Dim enr As dao.Recordset
Set db = OpenDatabase("c:decouverteclient.xls", False, False, "excel 8.0")
Set enr = db.OpenRecordset("client")
Client est une zone nommée
sinon, le nom de la feille avec $ (client$
--
Pierre CFI
MVP Microsoft Access
Site pour bien commencer
Access http://www.mpfa.info
"CrazyMasterMC" <CrazyMasterMC@discussions.microsoft.com> a écrit dans le message de news:
9DF47803-5D02-4301-B225-35A9065CBB92@microsoft.com...
Salut,
La fonction que je corrige utilisait initialement :
DoCmd.TransferSpreadsheet acImport, , [TableDestination], [nomFichierXL],
True, [Plage de cellules]
Qui m'affichait cette maudite boite de dialogue... En plus je recevais
souvent l'erreur : 3161 : Impossible de décoder le fichier.
Du coup j'ai instancié un objet Excel et je fais un parcours de ma Range que
j'importe ligne à ligne via une requête Insert. Je n'ai pas fini le nouveau
module.
Je préfère cette méthode car les messages renvoyés par je moteur Access ne
servent à rien, ils ne sont pas assez précis...
Là je maîtrise tout le process.
Mais si tu as une autre suggestion, je suis toujours open.
le fichier xls a une macro et no message Dim db As dao.Database Dim enr As dao.Recordset Set db = OpenDatabase("c:decouverteclient.xls", False, False, "excel 8.0") Set enr = db.OpenRecordset("client")
Client est une zone nommée sinon, le nom de la feille avec $ (client$
-- Pierre CFI MVP Microsoft Access
Site pour bien commencer Access http://www.mpfa.info
"CrazyMasterMC" a écrit dans le message de news:
Salut,
La fonction que je corrige utilisait initialement :
DoCmd.TransferSpreadsheet acImport, , [TableDestination], [nomFichierXL], True, [Plage de cellules]
Qui m'affichait cette maudite boite de dialogue... En plus je recevais souvent l'erreur : 3161 : Impossible de décoder le fichier.
Du coup j'ai instancié un objet Excel et je fais un parcours de ma Range que j'importe ligne à ligne via une requête Insert. Je n'ai pas fini le nouveau module.
Je préfère cette méthode car les messages renvoyés par je moteur Access ne servent à rien, ils ne sont pas assez précis...
Là je maîtrise tout le process.
Mais si tu as une autre suggestion, je suis toujours open.
