Bonjour tout le monde !!!
Je viens à l'instant de m'inscrire sur ce forum qui m'a l'air bien
sympathique !
Voilà, je dispose d'Access 97 et de Excel 2000. Je pose ma question
sur ce forum car on n'a pas été capable de me répondre sur un forum
d'Access (trop dur?). J'espère donc que j'aurais un peu plus de chance
avec vous ! Je n'utilise Access que depuis moins d'un mois, donc aie
aie aie !! je n'y comprends pas grand chose ( la quasi totalité de mes
programmes ne sont pas de moi ).
Sous Access 97, j'ai une table avec une dizaine de champs, un
formulaire basé sur cette table qui me permet d'entrer de nouveaux
enregistements dans ma base de données. J'ai réussi, par
l'intermédiaire d'une macro (qui se base sur une requete qui fait un
filtre), qui elle-même est raccordée à un bouton, à envoyer le
résultat de mes deux filtres sur deux feuilles Excel différentes,
jusque là pas trop de difficultés.
Mais mon problème, c'est là que je bloque depuis un bon petit moment
maintenant, je voudrais prendre le contenu d'une des deux feuilles pour
le mettre sur l'autre feuille, et ça, par le biais d'une macro
raccordée à un bouton (que ce soit sur Access ou sur Excel, peu
importe) pour faciliter le travail du personnel, en automatisant la
chose.
J'espère que je me suis pas trop mal expliqué, si vous avez le
moindre doute, n'hésitez pas à me poser des questions pour
d'éventuelles précisions.
Je remercie d'avance tout ceux qui s'intéresseront à mon problème.
Bonjour tout le monde !!!
Je viens à l'instant de m'inscrire sur ce forum qui m'a l'air bien
sympathique !
Voilà, je dispose d'Access 97 et de Excel 2000. Je pose ma question
sur ce forum car on n'a pas été capable de me répondre sur un forum
d'Access (trop dur?). J'espère donc que j'aurais un peu plus de chance
avec vous ! Je n'utilise Access que depuis moins d'un mois, donc aie
aie aie !! je n'y comprends pas grand chose ( la quasi totalité de mes
programmes ne sont pas de moi ).
Sous Access 97, j'ai une table avec une dizaine de champs, un
formulaire basé sur cette table qui me permet d'entrer de nouveaux
enregistements dans ma base de données. J'ai réussi, par
l'intermédiaire d'une macro (qui se base sur une requete qui fait un
filtre), qui elle-même est raccordée à un bouton, à envoyer le
résultat de mes deux filtres sur deux feuilles Excel différentes,
jusque là pas trop de difficultés.
Mais mon problème, c'est là que je bloque depuis un bon petit moment
maintenant, je voudrais prendre le contenu d'une des deux feuilles pour
le mettre sur l'autre feuille, et ça, par le biais d'une macro
raccordée à un bouton (que ce soit sur Access ou sur Excel, peu
importe) pour faciliter le travail du personnel, en automatisant la
chose.
J'espère que je me suis pas trop mal expliqué, si vous avez le
moindre doute, n'hésitez pas à me poser des questions pour
d'éventuelles précisions.
Je remercie d'avance tout ceux qui s'intéresseront à mon problème.
Bonjour tout le monde !!!
Je viens à l'instant de m'inscrire sur ce forum qui m'a l'air bien
sympathique !
Voilà, je dispose d'Access 97 et de Excel 2000. Je pose ma question
sur ce forum car on n'a pas été capable de me répondre sur un forum
d'Access (trop dur?). J'espère donc que j'aurais un peu plus de chance
avec vous ! Je n'utilise Access que depuis moins d'un mois, donc aie
aie aie !! je n'y comprends pas grand chose ( la quasi totalité de mes
programmes ne sont pas de moi ).
Sous Access 97, j'ai une table avec une dizaine de champs, un
formulaire basé sur cette table qui me permet d'entrer de nouveaux
enregistements dans ma base de données. J'ai réussi, par
l'intermédiaire d'une macro (qui se base sur une requete qui fait un
filtre), qui elle-même est raccordée à un bouton, à envoyer le
résultat de mes deux filtres sur deux feuilles Excel différentes,
jusque là pas trop de difficultés.
Mais mon problème, c'est là que je bloque depuis un bon petit moment
maintenant, je voudrais prendre le contenu d'une des deux feuilles pour
le mettre sur l'autre feuille, et ça, par le biais d'une macro
raccordée à un bouton (que ce soit sur Access ou sur Excel, peu
importe) pour faciliter le travail du personnel, en automatisant la
chose.
J'espère que je me suis pas trop mal expliqué, si vous avez le
moindre doute, n'hésitez pas à me poser des questions pour
d'éventuelles précisions.
Je remercie d'avance tout ceux qui s'intéresseront à mon problème.
Je te remercie anonymousA pour avoir pris du temps pour me répondre.
C'est sympa.
Le problème est que je n'ai pas mes deux feuilles sur le même fichier
mais sur deux fichiers différents, alors, comment fait on à partir
d'Access pour faire afficher les résultats de mes deux filtres sur
deux feuilles différentes dans un même fichier comme tu me le
préconises? A ce moment là, je pourrais écrire le code que tu m'as
donné, mais il faut que je l'écrive où ce code (désolé) ? Je vo us
rappelle que je n'utilise que depuis très peu de temps, alors..... si
vous pourriez, dans la mesure su possible, être un peu plus précis
s'il vous plaît ?
Merci.
Je te remercie anonymousA pour avoir pris du temps pour me répondre.
C'est sympa.
Le problème est que je n'ai pas mes deux feuilles sur le même fichier
mais sur deux fichiers différents, alors, comment fait on à partir
d'Access pour faire afficher les résultats de mes deux filtres sur
deux feuilles différentes dans un même fichier comme tu me le
préconises? A ce moment là, je pourrais écrire le code que tu m'as
donné, mais il faut que je l'écrive où ce code (désolé) ? Je vo us
rappelle que je n'utilise que depuis très peu de temps, alors..... si
vous pourriez, dans la mesure su possible, être un peu plus précis
s'il vous plaît ?
Merci.
Je te remercie anonymousA pour avoir pris du temps pour me répondre.
C'est sympa.
Le problème est que je n'ai pas mes deux feuilles sur le même fichier
mais sur deux fichiers différents, alors, comment fait on à partir
d'Access pour faire afficher les résultats de mes deux filtres sur
deux feuilles différentes dans un même fichier comme tu me le
préconises? A ce moment là, je pourrais écrire le code que tu m'as
donné, mais il faut que je l'écrive où ce code (désolé) ? Je vo us
rappelle que je n'utilise que depuis très peu de temps, alors..... si
vous pourriez, dans la mesure su possible, être un peu plus précis
s'il vous plaît ?
Merci.
Depuis ACCESS, tu ouvres une connexion à Excel.Compte tenu de ce qu'il
y a ci-dessous, il te faut une référence dans Access à Excel
(Outils/Références). Puis on copie du classeur appelé toto1 vers le
classeur appelé toto2
On suppose bien sur qu'à l'instant où tourne cette proc les ficheirs
toto1 et toto2 sont ouverts dans la même session Excel
Set MyXL = GetObject(, "Excel.Application")
Set wbk1 = MyXL.Workbooks("toto1.xls")
Set wbk2 = MyXL.Workbooks("toto2.xls")
lignewbk2 = wbk2.Sheets("Feuil1").UsedRange.Rows.Count
wbk1.Sheets("Feuil1").UsedRange.Offset(1, 0).Copy
wbk2.Sheets("Feuil1").Range("A" & lignewbk2 + 1)
Set MyXL = Nothing
.
Depuis ACCESS, tu ouvres une connexion à Excel.Compte tenu de ce qu'il
y a ci-dessous, il te faut une référence dans Access à Excel
(Outils/Références). Puis on copie du classeur appelé toto1 vers le
classeur appelé toto2
On suppose bien sur qu'à l'instant où tourne cette proc les ficheirs
toto1 et toto2 sont ouverts dans la même session Excel
Set MyXL = GetObject(, "Excel.Application")
Set wbk1 = MyXL.Workbooks("toto1.xls")
Set wbk2 = MyXL.Workbooks("toto2.xls")
lignewbk2 = wbk2.Sheets("Feuil1").UsedRange.Rows.Count
wbk1.Sheets("Feuil1").UsedRange.Offset(1, 0).Copy
wbk2.Sheets("Feuil1").Range("A" & lignewbk2 + 1)
Set MyXL = Nothing
.
Depuis ACCESS, tu ouvres une connexion à Excel.Compte tenu de ce qu'il
y a ci-dessous, il te faut une référence dans Access à Excel
(Outils/Références). Puis on copie du classeur appelé toto1 vers le
classeur appelé toto2
On suppose bien sur qu'à l'instant où tourne cette proc les ficheirs
toto1 et toto2 sont ouverts dans la même session Excel
Set MyXL = GetObject(, "Excel.Application")
Set wbk1 = MyXL.Workbooks("toto1.xls")
Set wbk2 = MyXL.Workbooks("toto2.xls")
lignewbk2 = wbk2.Sheets("Feuil1").UsedRange.Rows.Count
wbk1.Sheets("Feuil1").UsedRange.Offset(1, 0).Copy
wbk2.Sheets("Feuil1").Range("A" & lignewbk2 + 1)
Set MyXL = Nothing
.
anonymousA wrote:Depuis ACCESS, tu ouvres une connexion à Excel.Compte tenu de ce qu'il
y a ci-dessous, il te faut une référence dans Access à Excel
(Outils/Références). Puis on copie du classeur appelé toto1 vers le
classeur appelé toto2
On suppose bien sur qu'à l'instant où tourne cette proc les ficheirs
toto1 et toto2 sont ouverts dans la même session Excel
Tu risques de péter un plomb mais je n'arrive pas à faire ce que tu
me demandes, en anglais c'est pas évident; je n'arrive pas à "ouvrir
une connexion à Excel, puisfaire outils/références, ect..."
Je suis désolé....Set MyXL = GetObject(, "Excel.Application")
Set wbk1 = MyXL.Workbooks("toto1.xls")
Set wbk2 = MyXL.Workbooks("toto2.xls")
lignewbk2 = wbk2.Sheets("Feuil1").UsedRange.Rows.Count
wbk1.Sheets("Feuil1").UsedRange.Offset(1, 0).Copy
wbk2.Sheets("Feuil1").Range("A" & lignewbk2 + 1)
Set MyXL = Nothing
.
anonymousA wrote:
Depuis ACCESS, tu ouvres une connexion à Excel.Compte tenu de ce qu'il
y a ci-dessous, il te faut une référence dans Access à Excel
(Outils/Références). Puis on copie du classeur appelé toto1 vers le
classeur appelé toto2
On suppose bien sur qu'à l'instant où tourne cette proc les ficheirs
toto1 et toto2 sont ouverts dans la même session Excel
Tu risques de péter un plomb mais je n'arrive pas à faire ce que tu
me demandes, en anglais c'est pas évident; je n'arrive pas à "ouvrir
une connexion à Excel, puisfaire outils/références, ect..."
Je suis désolé....
Set MyXL = GetObject(, "Excel.Application")
Set wbk1 = MyXL.Workbooks("toto1.xls")
Set wbk2 = MyXL.Workbooks("toto2.xls")
lignewbk2 = wbk2.Sheets("Feuil1").UsedRange.Rows.Count
wbk1.Sheets("Feuil1").UsedRange.Offset(1, 0).Copy
wbk2.Sheets("Feuil1").Range("A" & lignewbk2 + 1)
Set MyXL = Nothing
.
anonymousA wrote:Depuis ACCESS, tu ouvres une connexion à Excel.Compte tenu de ce qu'il
y a ci-dessous, il te faut une référence dans Access à Excel
(Outils/Références). Puis on copie du classeur appelé toto1 vers le
classeur appelé toto2
On suppose bien sur qu'à l'instant où tourne cette proc les ficheirs
toto1 et toto2 sont ouverts dans la même session Excel
Tu risques de péter un plomb mais je n'arrive pas à faire ce que tu
me demandes, en anglais c'est pas évident; je n'arrive pas à "ouvrir
une connexion à Excel, puisfaire outils/références, ect..."
Je suis désolé....Set MyXL = GetObject(, "Excel.Application")
Set wbk1 = MyXL.Workbooks("toto1.xls")
Set wbk2 = MyXL.Workbooks("toto2.xls")
lignewbk2 = wbk2.Sheets("Feuil1").UsedRange.Rows.Count
wbk1.Sheets("Feuil1").UsedRange.Offset(1, 0).Copy
wbk2.Sheets("Feuil1").Range("A" & lignewbk2 + 1)
Set MyXL = Nothing
.
Bonjour à tous et à toi anonymousA !
Etant donné que tu m'as envoyé hier le message juste avant que je
parte, et que je dispose pas d'Access 97 chez moi, je n'ai donc pas
pu tester ce que tu m'as gentiment envoyé.
Je viens donc à l'instant d'essayer de faire ce que tu m'as dis,
mais le souci est que je peux accéder à Tools/References uniquement
si je choisis une procédure évènementielle dans les propriétés de
mon form ; laquelle dois-je choisir ? où est-ce que je fais fausse
route ? Dans les deux cas, peux-tu me préciser stp?
Après ça j'ai choisis la library. Je te rappelle que sous 97 il y a
les modules. De plus tu me demandes si je sais lancer une procédure ?
mais si ma procédure est dans un module que j'intègre dans ma
macro, ça se fera automatiquement ( je suppose).
Merci d'avance pour ton aide.
@++
Bonjour à tous et à toi anonymousA !
Etant donné que tu m'as envoyé hier le message juste avant que je
parte, et que je dispose pas d'Access 97 chez moi, je n'ai donc pas
pu tester ce que tu m'as gentiment envoyé.
Je viens donc à l'instant d'essayer de faire ce que tu m'as dis,
mais le souci est que je peux accéder à Tools/References uniquement
si je choisis une procédure évènementielle dans les propriétés de
mon form ; laquelle dois-je choisir ? où est-ce que je fais fausse
route ? Dans les deux cas, peux-tu me préciser stp?
Après ça j'ai choisis la library. Je te rappelle que sous 97 il y a
les modules. De plus tu me demandes si je sais lancer une procédure ?
mais si ma procédure est dans un module que j'intègre dans ma
macro, ça se fera automatiquement ( je suppose).
Merci d'avance pour ton aide.
@++
Bonjour à tous et à toi anonymousA !
Etant donné que tu m'as envoyé hier le message juste avant que je
parte, et que je dispose pas d'Access 97 chez moi, je n'ai donc pas
pu tester ce que tu m'as gentiment envoyé.
Je viens donc à l'instant d'essayer de faire ce que tu m'as dis,
mais le souci est que je peux accéder à Tools/References uniquement
si je choisis une procédure évènementielle dans les propriétés de
mon form ; laquelle dois-je choisir ? où est-ce que je fais fausse
route ? Dans les deux cas, peux-tu me préciser stp?
Après ça j'ai choisis la library. Je te rappelle que sous 97 il y a
les modules. De plus tu me demandes si je sais lancer une procédure ?
mais si ma procédure est dans un module que j'intègre dans ma
macro, ça se fera automatiquement ( je suppose).
Merci d'avance pour ton aide.
@++
re
bon je n'arrive toujours pas à faire ce que tu me dis. Mais bon c'est
pas trop grave, je ferais des copier coller.
J'ai un autre souci : sous excel, j'ai fais une macro qui devrait me
faire obtenir, une fois terminée, la mise en page que je souhaite
avoir (placement des colonnes, taille, couleur....).
Le problème est que, quand je la lance depuis une macro d'Access97 (en
appelant un module, où j'ai copié le code de la macro d'Excel), il me
dit que toute mes lignes de code sont fausses (CutCopyMode .....). Et
je ne comprends pas pourquoi. Que faut-il que je fasse pour obtenir ce
que je souhaite ??
MERCI
re
bon je n'arrive toujours pas à faire ce que tu me dis. Mais bon c'est
pas trop grave, je ferais des copier coller.
J'ai un autre souci : sous excel, j'ai fais une macro qui devrait me
faire obtenir, une fois terminée, la mise en page que je souhaite
avoir (placement des colonnes, taille, couleur....).
Le problème est que, quand je la lance depuis une macro d'Access97 (en
appelant un module, où j'ai copié le code de la macro d'Excel), il me
dit que toute mes lignes de code sont fausses (CutCopyMode .....). Et
je ne comprends pas pourquoi. Que faut-il que je fasse pour obtenir ce
que je souhaite ??
MERCI
re
bon je n'arrive toujours pas à faire ce que tu me dis. Mais bon c'est
pas trop grave, je ferais des copier coller.
J'ai un autre souci : sous excel, j'ai fais une macro qui devrait me
faire obtenir, une fois terminée, la mise en page que je souhaite
avoir (placement des colonnes, taille, couleur....).
Le problème est que, quand je la lance depuis une macro d'Access97 (en
appelant un module, où j'ai copié le code de la macro d'Excel), il me
dit que toute mes lignes de code sont fausses (CutCopyMode .....). Et
je ne comprends pas pourquoi. Que faut-il que je fasse pour obtenir ce
que je souhaite ??
MERCI