Discussion :

[niko8181]

bonjour
j'essaie de créer des fichiers de logs d'un traitement au format excel, en VBA depuis ACCESS.
Je crée mon objet excel comme cela :

Code :

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

Set ObjectExcel = CreateObject("Excel.Application")

Existe-t-il une instruction simple pour ajouter une ligne en fin de fichier ?

Sans passer par Cells(x,y), sans avoir à compter le nombre de ligne du fichier
etc ?

Si non, quelle est la façon la plus simple pour rajouter une ligne à mon fichier, sachant que je dois faire cela à chaque itération de ma boucle de traitement ?

merci

[ESVBA]

bonjour,

la fin d'un fichier EXCEL !

pour moi, 3 possibilités :
- on cherche la dernière ligne occupée sur une feuille et on ajoute par une ligne par une fonction du type "cells()"
- on utilise un format type "xml","HTML" avec les fonctions pour écrire ce format
- on utilise un fichier texte (du brut de brut, de l'époque du "DOS") que l'on importe dans excel. Là on se préoccupe de rien. On ajoute à la fin.

La première solution est la plus simple et la plus performante. Une seule instuction VBA pour trouver la dernière ligne !
Voir la contribution de ouskel'n'or

1. Ouvre l'instance d'excel
2. DebutBoucle
3. > traitement access
4. > Pointe dernière ligne occupée +1 sur la feuille Excel "xx"
5. > Ecriture Sur la feuille
6. Fin de boucle
7. Ferme Excel

Et la boucle Access, elle est dans une procédure évèmentielle ?
Attention à comment est quitter la boucle.

ESVBA