Discussion :

[GarsDuCalvados]

Bonjour,
comment fait on pour un intégrer dans un document Excel mis en page (un tableau quoi) des valeurs dans les cases que l'on veut venant de requete et de manipulation en VBA?
merci
.::GarsDuCalvados::..

[cafeine]

Hello,

réponse dans les tutoriels :
http://cafeine.developpez.com/access/tutoriel/excel

[Muhad'hib]

Salut,

Tu trouvera tout ce dont tu as besoin :

Tuto de Cafeine
La FAQ
Un exemple

Et je ne parle pas des nombreux sujets ouverts (et résolus) sur le forum

A+ et bonne recherche.

[GarsDuCalvados]

Ouais ok je suis d'ac. avec vous.
Mais est ce que je peux retrouver le principe du signet sur word dans excel.
C'est à dire mettre des valeurs bien précises dans certaines cases?

[cafeine]

Oui, c'est jouable dans l'automation, un truc du genre ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

objAppExcel.ActiveSheet.Range("A5") = 12

[GarsDuCalvados]

Voilà j'ai mis ça pour (déjà pour reussir à importer au moins une variable "ACLP1" de type entier) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 
            ' exportation vers Excel
             Set xlApp = CreateObject("Excel.Application")
            ' Assignation du fichier existant
            Set xlBook = xlApp.Workbooks.Open("C:\Feuille.xls")
 
            ' Importation dans la case voulu
            objAppExcel.ActiveSheet.Range("A5") = ACLP1
 
            ' Sauvegarde du fichier
            xlBook.Save
            ' Quitter l'application
            xlApp.Quit

Le fichier feuille.xls existe déjà car je dois le mettre en forme.
Le probleme c'ets qu'il me met comme erreur :
"Erreur d'execution 424 objet requis"

[cafeine]

Dans ton code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
             Set xlApp = CreateObject("Excel.Application")
            objAppExcel.ActiveSheet.Range("A5") = ACLP1

Il n'y a rien qui te choque ?

relis toi, s'il te plait.

[GarsDuCalvados]

Ha ok d'ac j'ai compris merci
Le hic c'est qu'il me demande si je veux remplacer le fichier qui existe alors que je veux utilisé celui qui existe une idée??

[GarsDuCalvados]

C'est bon ça marche.
Merci