Discussion :

[samsam007]

Bonjour le forum,

Je reviens vers vous pour tenter de résoudre un petit soucis qui m'empêche de finir mon premier projet Windev.
Dans celui-ci, j'ai une fenêtre dans laquelle plusieurs tables sont remplies via une requête paramétrée --> jusque là pas de soucis.
En revanche, pour tenter de simplifier l'impression de l'ensemble de ces tables, je cherche un moyen pour copier les lignes de chaque table dans une feuille Excel?
Le gros soucis pour l'impression finale, c'est que le rendu contient un peu de mise en page et quelques filtres.
De ce fait, je me suis demandé si il serait pas plus simple de faire ce que je cherche plutôt que de me lancer dans la création d'un état...??
Je vous joints la feuille excel en modèle que je souhaite utiliser. Celle-ci sera fixe pas de modification profonde.
Pourriez-vous m'indiquer une solution à mon problème? Ou si vous pensez à une solution plus simple et rapide à mettre en place je suis preneur!!?

Merci d'avance pour vos retours.
Bonne journée à tous.
Cdlt

modele_excel_projet2018.xls

[midou23175]

Bonjour,
la solution que vous cherchez, passe par écrire par programmation, dans un fichier excel

1- copier votre fichier modèle xls sous un autre nom,
2- ouvrir le nouveau fichier et l'adapter comme suit : supprimer toutes les lignes qui suivent la ligne 6
3- fermer le fichier xls
4- Faire cet exercice, et sélectionner le nouveau fichier xls

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
MaFeuille est un xlsDocument
sNomFichier est une chaîne
sNomFichier = fSélecteur(fRepExe(), "", ...
	"Sélectionnez un fichier.....", ...
	"Tous fichiers  (*.xls;*.xlsx)"+TAB+"*.xls; *.xlsx", "xls", fselOuvre + fselExiste)
SI sNomFichier = "" ALORS RETOUR
MaFeuille = xlsOuvre(sNomFichier, xlsEcriture)
 
// On va mettre OK dans la case A 7
MaFeuille[7,"A"] = "OK"
// Sauvegarde
xlsSauve(MaFeuille)
xlsFerme(MaFeuille)

5- Maintenant, appliquer cela avec l'export d'une seule table
Passer en revue, toutes lignes table et les affectez aux cellules du fichier xls
- les lignes de la table commencent à partir de 1
- les lignes du fichier xls commencent à partir de 7

1ère ligne table :
affecter MaColonne1 à A 7, affecter MaColonne2 à B 7, affecter MaColonne3 à C 7
ligne 2 de la table à A 8, B 8, C 8, etc...
les sous titres et autres tables, par la suite ...

[samsam007]

Bonsoir midou23175,

Je vous remercie pour votre retour. Toujours au rendez-vous.... ça fait plaisir
Je pense avoir compris la procédure que vous m'avez décrite...
Quelques zones d'ombre cependant :
- comment reproduire la mise en forme de mon fichier modèle? Via Windev? (les sous titres et les bandes noir de séparation?)
- de plus, le nombre d'enregistrement de chaque table n'est pas constant... je ne peux donc pas prévoir le début des autres tables? Seul table 1...

En espérant avoir été clair dans mes explications?
Merci d'avance pour votre retour.

[samsam007]

Bonjour le forum,

Finalement j'ai réussi à contourner mon problème en faisant autrement.
Merci à midou23175 pour sa réponse et son aide.
Je mets le post en résolu.
Bonne journée à tous.