Bonjour,
J'ai recopié betement la procedure d'impression d'une feuille excell sur
http://access.seneque.free.fr/impression1.htm et j'ai le message suivant :
"Propriété ou méthode non gérée par cet objet." Que me manque t - il ?
Merci
de cocher bêtement la référence excel : alt+f11 outils /références microsoft excel nn.0
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Valérie" a écrit dans le message de news:buoo9f$njg$
Bonjour, J'ai recopié betement la procedure d'impression d'une feuille excell sur http://access.seneque.free.fr/impression1.htm et j'ai le message suivant : "Propriété ou méthode non gérée par cet objet." Que me manque t - il ? Merci
Bonjour.
de cocher bêtement la référence excel : alt+f11 outils /références
microsoft excel nn.0
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Valérie" <faussebal@wanadoo.fr> a écrit dans le message de
news:buoo9f$njg$1@news-reader3.wanadoo.fr...
Bonjour,
J'ai recopié betement la procedure d'impression d'une feuille excell sur
http://access.seneque.free.fr/impression1.htm et j'ai le message suivant :
"Propriété ou méthode non gérée par cet objet." Que me manque t - il ?
Merci
de cocher bêtement la référence excel : alt+f11 outils /références microsoft excel nn.0
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Valérie" a écrit dans le message de news:buoo9f$njg$
Bonjour, J'ai recopié betement la procedure d'impression d'une feuille excell sur http://access.seneque.free.fr/impression1.htm et j'ai le message suivant : "Propriété ou méthode non gérée par cet objet." Que me manque t - il ? Merci
Valérie
Voici les references cochees et dans l'ordre : VB for applications / MA 10.0 object library / OLE automation / M DAO 3.6 object library / MW common controls 6.0 / M active x data object 2.1 library / M excel 9.0 object library et cela ne fonctionne toujours pas !
Voici les references cochees et dans l'ordre : VB for applications / MA 10.0
object library / OLE automation / M DAO 3.6 object library / MW common
controls 6.0 / M active x data object 2.1 library / M excel 9.0 object
library et cela ne fonctionne toujours pas !
Voici les references cochees et dans l'ordre : VB for applications / MA 10.0 object library / OLE automation / M DAO 3.6 object library / MW common controls 6.0 / M active x data object 2.1 library / M excel 9.0 object library et cela ne fonctionne toujours pas !
Raymond [mvp]
Sur quelle ligne tu as l'erreur ? affiche ici ta procédure (la partie automation). ta compilation est-elle bonne ?
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Valérie" a écrit dans le message de news:buop7d$9l6$
Voici les references cochees et dans l'ordre : VB for applications / MA 10.0
object library / OLE automation / M DAO 3.6 object library / MW common controls 6.0 / M active x data object 2.1 library / M excel 9.0 object library et cela ne fonctionne toujours pas !
Sur quelle ligne tu as l'erreur ? affiche ici ta procédure (la partie
automation).
ta compilation est-elle bonne ?
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Valérie" <faussebal@wanadoo.fr> a écrit dans le message de
news:buop7d$9l6$1@news-reader4.wanadoo.fr...
Voici les references cochees et dans l'ordre : VB for applications / MA
10.0
object library / OLE automation / M DAO 3.6 object library / MW common
controls 6.0 / M active x data object 2.1 library / M excel 9.0 object
library et cela ne fonctionne toujours pas !
Sur quelle ligne tu as l'erreur ? affiche ici ta procédure (la partie automation). ta compilation est-elle bonne ?
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Valérie" a écrit dans le message de news:buop7d$9l6$
Voici les references cochees et dans l'ordre : VB for applications / MA 10.0
object library / OLE automation / M DAO 3.6 object library / MW common controls 6.0 / M active x data object 2.1 library / M excel 9.0 object library et cela ne fonctionne toujours pas !
Raymond [mvp]
.../... je dois m'absenter 1 h , soit tu patientes soit un ami(e) prendra la suite du post
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
.../... je dois m'absenter 1 h , soit tu patientes soit un ami(e) prendra la
suite du post
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
.../... je dois m'absenter 1 h , soit tu patientes soit un ami(e) prendra la suite du post
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
Valérie
Absolument désolée mais moi aussi j'ai du m'absenter et malheureusement mon pb est toujours la. La compilation est bonne, l'erreur se situe là : .ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Aurais tu une sol pour que je puisse imprimer ma feuille excel dans access ? Merci beaucoup
Absolument désolée mais moi aussi j'ai du m'absenter et malheureusement mon
pb est toujours la. La compilation est bonne, l'erreur se situe là :
.ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Aurais tu une sol pour que je puisse imprimer ma feuille excel dans access ?
Merci beaucoup
Absolument désolée mais moi aussi j'ai du m'absenter et malheureusement mon pb est toujours la. La compilation est bonne, l'erreur se situe là : .ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Aurais tu une sol pour que je puisse imprimer ma feuille excel dans access ? Merci beaucoup
Raymond [mvp]
Tu es bien sous 2000 ou + ?
si oui, peux-tu me passer ta base par mail avec ton fichier excel même vide (en zip obligatoire ) enlève XYZ. dans l'adresse. mais dépêche-toi car il est tard.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Valérie" a écrit dans le message de news:bupcf0$4ea$
Absolument désolée mais moi aussi j'ai du m'absenter et malheureusement mon
pb est toujours la. La compilation est bonne, l'erreur se situe là : .ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Aurais tu une sol pour que je puisse imprimer ma feuille excel dans access ?
Merci beaucoup
Tu es bien sous 2000 ou + ?
si oui, peux-tu me passer ta base par mail avec ton fichier excel même vide
(en zip obligatoire ) enlève XYZ. dans l'adresse.
mais dépêche-toi car il est tard.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Valérie" <faussebal@wanadoo.fr> a écrit dans le message de
news:bupcf0$4ea$1@news-reader4.wanadoo.fr...
Absolument désolée mais moi aussi j'ai du m'absenter et malheureusement
mon
pb est toujours la. La compilation est bonne, l'erreur se situe là :
.ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Aurais tu une sol pour que je puisse imprimer ma feuille excel dans access
?
si oui, peux-tu me passer ta base par mail avec ton fichier excel même vide (en zip obligatoire ) enlève XYZ. dans l'adresse. mais dépêche-toi car il est tard.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Valérie" a écrit dans le message de news:bupcf0$4ea$
Absolument désolée mais moi aussi j'ai du m'absenter et malheureusement mon
pb est toujours la. La compilation est bonne, l'erreur se situe là : .ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Aurais tu une sol pour que je puisse imprimer ma feuille excel dans access ?
Merci beaucoup
Valérie
Désolée pour mon manque de réactivité ! J'utilise access 2002 et excel 2000, mes references cochées sont elles bonnes ? Je précise que j'arrive parfaitement à faire une liaison excel pour renseigner les cellules de la feuille à imprimer, je n'arrive pas à l'imprimer ni à en faire un aperçu c'est tout !! Merci beaucoup pour ton aide !
Désolée pour mon manque de réactivité !
J'utilise access 2002 et excel 2000, mes references cochées sont elles
bonnes ? Je précise que j'arrive parfaitement à faire une liaison excel pour
renseigner les cellules de la feuille à imprimer, je n'arrive pas à
l'imprimer ni à en faire un aperçu c'est tout !!
Merci beaucoup pour ton aide !
Désolée pour mon manque de réactivité ! J'utilise access 2002 et excel 2000, mes references cochées sont elles bonnes ? Je précise que j'arrive parfaitement à faire une liaison excel pour renseigner les cellules de la feuille à imprimer, je n'arrive pas à l'imprimer ni à en faire un aperçu c'est tout !! Merci beaucoup pour ton aide !
Raymond [mvp]
Bonjour.
ce n'est pas grave , c'est pour toi ! tu peux afficher la procédure ? des fois que tu ais supprimé une ligne sans le vouloir ? seulement la partie automation.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Valérie" a écrit dans le message de news:buqqj6$78n$
Désolée pour mon manque de réactivité ! J'utilise access 2002 et excel 2000, mes references cochées sont elles bonnes ? Je précise que j'arrive parfaitement à faire une liaison excel pour
renseigner les cellules de la feuille à imprimer, je n'arrive pas à l'imprimer ni à en faire un aperçu c'est tout !! Merci beaucoup pour ton aide !
Bonjour.
ce n'est pas grave , c'est pour toi !
tu peux afficher la procédure ? des fois que tu ais supprimé une ligne sans
le vouloir ? seulement la partie automation.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Valérie" <faussebal@wanadoo.fr> a écrit dans le message de
news:buqqj6$78n$1@news-reader1.wanadoo.fr...
Désolée pour mon manque de réactivité !
J'utilise access 2002 et excel 2000, mes references cochées sont elles
bonnes ? Je précise que j'arrive parfaitement à faire une liaison excel
pour
renseigner les cellules de la feuille à imprimer, je n'arrive pas à
l'imprimer ni à en faire un aperçu c'est tout !!
Merci beaucoup pour ton aide !
ce n'est pas grave , c'est pour toi ! tu peux afficher la procédure ? des fois que tu ais supprimé une ligne sans le vouloir ? seulement la partie automation.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Valérie" a écrit dans le message de news:buqqj6$78n$
Désolée pour mon manque de réactivité ! J'utilise access 2002 et excel 2000, mes references cochées sont elles bonnes ? Je précise que j'arrive parfaitement à faire une liaison excel pour
renseigner les cellules de la feuille à imprimer, je n'arrive pas à l'imprimer ni à en faire un aperçu c'est tout !! Merci beaucoup pour ton aide !
Valérie
Dim XL_App As Object Dim XL_Classeur As Object Dim XL_Feuille As Object Set XL_App = CreateObject("Excel.Application") With XL_App Set XL_Classeur = .Workbooks.Open("D:Ventes.XLS") Set XL_Feuille = XL_Classeur.Sheets("Ventes_Mois") With XL_Feuille .Select .ActiveWindow.SelectedSheets.PrintOut Copies:=1 End With '.ActiveWorkbook.Save '.ActiveWorkbook.Close '.Quit End With Set XL_App = Nothing Set XL_Classeur = Nothing Set XL_Feuille = Nothing
Dim XL_App As Object
Dim XL_Classeur As Object
Dim XL_Feuille As Object
Set XL_App = CreateObject("Excel.Application")
With XL_App
Set XL_Classeur = .Workbooks.Open("D:Ventes.XLS")
Set XL_Feuille = XL_Classeur.Sheets("Ventes_Mois")
With XL_Feuille
.Select
.ActiveWindow.SelectedSheets.PrintOut Copies:=1
End With
'.ActiveWorkbook.Save
'.ActiveWorkbook.Close
'.Quit
End With
Set XL_App = Nothing
Set XL_Classeur = Nothing
Set XL_Feuille = Nothing
Dim XL_App As Object Dim XL_Classeur As Object Dim XL_Feuille As Object Set XL_App = CreateObject("Excel.Application") With XL_App Set XL_Classeur = .Workbooks.Open("D:Ventes.XLS") Set XL_Feuille = XL_Classeur.Sheets("Ventes_Mois") With XL_Feuille .Select .ActiveWindow.SelectedSheets.PrintOut Copies:=1 End With '.ActiveWorkbook.Save '.ActiveWorkbook.Close '.Quit End With Set XL_App = Nothing Set XL_Classeur = Nothing Set XL_Feuille = Nothing
Raymond [mvp]
Remplace : ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True par .PrintOut Copies:=1, Collate:=True
J'ai du faire un rajout du 2e with sans modifier ma documentation.
toutes mes excuses pour le retard et le préjudice.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Valérie" a écrit dans le message de news:buqros$eld$
Dim XL_App As Object Dim XL_Classeur As Object Dim XL_Feuille As Object Set XL_App = CreateObject("Excel.Application") With XL_App Set XL_Classeur = .Workbooks.Open("D:Ventes.XLS") Set XL_Feuille = XL_Classeur.Sheets("Ventes_Mois") With XL_Feuille .Select .ActiveWindow.SelectedSheets.PrintOut Copies:=1 End With '.ActiveWorkbook.Save '.ActiveWorkbook.Close '.Quit End With Set XL_App = Nothing Set XL_Classeur = Nothing Set XL_Feuille = Nothing
Remplace :
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
par
.PrintOut Copies:=1, Collate:=True
J'ai du faire un rajout du 2e with sans modifier ma documentation.
toutes mes excuses pour le retard et le préjudice.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Valérie" <faussebal@wanadoo.fr> a écrit dans le message de
news:buqros$eld$1@news-reader1.wanadoo.fr...
Dim XL_App As Object
Dim XL_Classeur As Object
Dim XL_Feuille As Object
Set XL_App = CreateObject("Excel.Application")
With XL_App
Set XL_Classeur = .Workbooks.Open("D:Ventes.XLS")
Set XL_Feuille = XL_Classeur.Sheets("Ventes_Mois")
With XL_Feuille
.Select
.ActiveWindow.SelectedSheets.PrintOut Copies:=1
End With
'.ActiveWorkbook.Save
'.ActiveWorkbook.Close
'.Quit
End With
Set XL_App = Nothing
Set XL_Classeur = Nothing
Set XL_Feuille = Nothing
Remplace : ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True par .PrintOut Copies:=1, Collate:=True
J'ai du faire un rajout du 2e with sans modifier ma documentation.
toutes mes excuses pour le retard et le préjudice.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Valérie" a écrit dans le message de news:buqros$eld$
Dim XL_App As Object Dim XL_Classeur As Object Dim XL_Feuille As Object Set XL_App = CreateObject("Excel.Application") With XL_App Set XL_Classeur = .Workbooks.Open("D:Ventes.XLS") Set XL_Feuille = XL_Classeur.Sheets("Ventes_Mois") With XL_Feuille .Select .ActiveWindow.SelectedSheets.PrintOut Copies:=1 End With '.ActiveWorkbook.Save '.ActiveWorkbook.Close '.Quit End With Set XL_App = Nothing Set XL_Classeur = Nothing Set XL_Feuille = Nothing
