Voici le début d'une procédure que j'ai sous Excel. IL s'agit de créer
une boîte de dialogue et de récupérer la donnée saisie par
l'utilisateur dans la variable nommée DATET.
Sub test()
Dim DATET As String
DATET = InputBox("date ?")
....
End sub
Ensuite, sous Access, j'ai le code suivant. Celui-ci me permet de
récupérer la valeur de la variable DATE_T saisie sous excel et d'y
faire référence dans ma fonction call ExportFile (cette fonction est
déjà faite. Du coup, je ne mets pas le code.) Cependant l'exécution de
ce code me génère une erreur de type "Erreur d'exécution, Propriété ou
méthode non gérée par cet objet"
Sub val()
Dim DATE_T As String
Dim oExApp As Object
Set oExApp = CreateObject("Excel.Application")
oExApp.DATET = DATE_T ================================> ERREUR
Set oExApp = Nothing
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
Raymond [mvp]
Bonjour.
si tu veux que access se branche sur ta session excel , il faut utiliser getobject et non createobject si tu as une seule session en cours, bien sûr. Set oExApp = CreateObject("Excel.Application") Set oExApp = GetObject("Excel.Application") pourquoi faire un input box au lieu d'utiliser la cellule directement, car je pense que le inputbox doit remplir une cellule ?
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"okto" a écrit dans le message de news:
Bonjour,
Je vous expose mon souci:
Voici le début d'une procédure que j'ai sous Excel. IL s'agit de créer une boîte de dialogue et de récupérer la donnée saisie par l'utilisateur dans la variable nommée DATET.
Sub test() Dim DATET As String DATET = InputBox("date ?")
....
End sub
Ensuite, sous Access, j'ai le code suivant. Celui-ci me permet de récupérer la valeur de la variable DATE_T saisie sous excel et d'y faire référence dans ma fonction call ExportFile (cette fonction est déjà faite. Du coup, je ne mets pas le code.) Cependant l'exécution de ce code me génère une erreur de type "Erreur d'exécution, Propriété ou méthode non gérée par cet objet"
Sub val() Dim DATE_T As String Dim oExApp As Object Set oExApp = CreateObject("Excel.Application") oExApp.DATET = DATE_T ================================> ERREUR Set oExApp = Nothing
Call ExportFile("C:test.txt", "Requête1", DATE_T)
....
End Sub
Merci de votre aide car là, je ne sais pas comment m'y prendre,
Bonjour.
si tu veux que access se branche sur ta session excel , il faut utiliser
getobject et non createobject si tu as une seule session en cours, bien sûr.
Set oExApp = CreateObject("Excel.Application")
Set oExApp = GetObject("Excel.Application")
pourquoi faire un input box au lieu d'utiliser la cellule directement, car
je pense que le inputbox doit remplir une cellule ?
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"okto" <jorie80@hotmail.com> a écrit dans le message de
news:ec6aacb8.0402190709.17a6292a@posting.google.com...
Bonjour,
Je vous expose mon souci:
Voici le début d'une procédure que j'ai sous Excel. IL s'agit de créer
une boîte de dialogue et de récupérer la donnée saisie par
l'utilisateur dans la variable nommée DATET.
Sub test()
Dim DATET As String
DATET = InputBox("date ?")
....
End sub
Ensuite, sous Access, j'ai le code suivant. Celui-ci me permet de
récupérer la valeur de la variable DATE_T saisie sous excel et d'y
faire référence dans ma fonction call ExportFile (cette fonction est
déjà faite. Du coup, je ne mets pas le code.) Cependant l'exécution de
ce code me génère une erreur de type "Erreur d'exécution, Propriété ou
méthode non gérée par cet objet"
Sub val()
Dim DATE_T As String
Dim oExApp As Object
Set oExApp = CreateObject("Excel.Application")
oExApp.DATET = DATE_T ================================> ERREUR
Set oExApp = Nothing
Call ExportFile("C:test.txt", "Requête1", DATE_T)
....
End Sub
Merci de votre aide car là, je ne sais pas comment m'y prendre,
si tu veux que access se branche sur ta session excel , il faut utiliser getobject et non createobject si tu as une seule session en cours, bien sûr. Set oExApp = CreateObject("Excel.Application") Set oExApp = GetObject("Excel.Application") pourquoi faire un input box au lieu d'utiliser la cellule directement, car je pense que le inputbox doit remplir une cellule ?
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"okto" a écrit dans le message de news:
Bonjour,
Je vous expose mon souci:
Voici le début d'une procédure que j'ai sous Excel. IL s'agit de créer une boîte de dialogue et de récupérer la donnée saisie par l'utilisateur dans la variable nommée DATET.
Sub test() Dim DATET As String DATET = InputBox("date ?")
....
End sub
Ensuite, sous Access, j'ai le code suivant. Celui-ci me permet de récupérer la valeur de la variable DATE_T saisie sous excel et d'y faire référence dans ma fonction call ExportFile (cette fonction est déjà faite. Du coup, je ne mets pas le code.) Cependant l'exécution de ce code me génère une erreur de type "Erreur d'exécution, Propriété ou méthode non gérée par cet objet"
Sub val() Dim DATE_T As String Dim oExApp As Object Set oExApp = CreateObject("Excel.Application") oExApp.DATET = DATE_T ================================> ERREUR Set oExApp = Nothing
Call ExportFile("C:test.txt", "Requête1", DATE_T)
....
End Sub
Merci de votre aide car là, je ne sais pas comment m'y prendre,
