Rapport excel Résolu/Fermé

Question

Bonjour, j'aimerais produire un rapport global de ma base de donne enregistrement :

Nom de bateau   capitaine  numero du bateau

     Quai
          date  poisson   brute  glace  net


                         total du net:


https://www.cjoint.com/?AGgoWAY2up3

Est-ce que quelqu'un peux me diriger un peu.

P.S. votre site est tres interessant.

Migou76 · Answer

Bonsoir, 

Il y a les formule de base de données. Mais, je ne sais pas ce que vous voulez extraire...

ghislaine2011 · Answer

Je veux imprimer toutes les donnees qui sont dans la table en Bd enr  avec une mise en page comme suit:

Nom de bateau capitaine numero du bateau 

Quai 
date poisson brute glace net 


total du net: 

 je vous joint le fichier : https://www.cjoint.com/?AGgoWAY2up3

ghislaine2011 · Answer

J'aimerais produire un rapport de ce style est-ce possible en allant chercher mes donnees dans ma Bd enr.

https://www.cjoint.com/?AGhtAVs075t

Le Pingou · Answer

Bonjour,
Au passage, oui c'est possible en utilisant le filtre avancé, et en plus vous avez la démonstration sur le lien proposé par Migou76. 
Note : un petit clic sur la flèche en bas à gauche du tableau et vous suivez la demo...

ghislaine2011 · Answer

ma feuille choix de rapport n'est pas dans la meme feuille que ma table enregistrement...

Le Pingou · Answer

Bonjour,
Eh bien,
ma feuille choix de rapport n'est pas dans la même feuille que ma table enregistrement...
vous avez remarquez que dans la fenêtre Filtre avancé sous Action vous pouvez choisir : Copier vers un autre emplacement.

ghislaine2011 · Answer

Oui je sais que je peux filtrer ma table 

Je m'explique: 

   J'aimerais que quand je clique sur icone  rapport global , il affiche a l'écran le rapport et que je puisse l'imprimer et que le positionnement soit comme ceci au lieu de toute sur une meme ligne

Nom de bateau        capitaine                                     numero du bateau 

Quai 

date      poisson     brute      glace     net 


                                               total du net:

Le Pingou · Answer

Bonjour,
Je veux bien voir ce qu'il est possible de réaliser.
Vous parlez de `clique sur icone rapport global ` mais il n'existe a aucun endroit sur votre classeur.
Merci de votre explication supplémentaire ... !

ghislaine2011 · Answer

je veux créer une macro qui ferais le rapport, après je vais créer mon icone pour le choix rapport global. 

Mais pour l'instant je cherche un moyen de faire ce rapport comme mentionné plus haut . 

C'est bien compliqué sourtout pour une débutante.... Mais je suis sur que quelqu'un me dirigera sur la bonne voie. 

Merci de m'aider.

P.s. j'ai commencé ma feuille rapport

Le Pingou · Answer

Bonjour,
Je vous laisse essayer ma proposition : https://www.cjoint.com/?3Gomg1lqbVR
Est-ce dans le bon sens ?
Il y a encore quelque détail à régler.

Le Pingou · Answer

Bonjour,
Est-ce que cela fonctionne si vous faite un clic sur l'encadrer rose de la feuille [MENU PRINCIPAL] ?

Le Pingou · Answer

Bonjour,
Eh bien c'est un problème de votre explorateur qui ne s'est pas ouvrir le fichier de type [*.xlsm].
Alors voici une version compressée : https://www.cjoint.com/?3GorFBsI1fU

Le Pingou · Answer

Bonjour,
J'ai un peu d'avance. Au passage, à la suite d'incohérence entre les données,  j'ai modifié le contenu de la feuille [BD bateau] ainsi que [BD enr] pour avoir une concordance entre les noms utilisés (nom bateau, nom capitaine...).
Votre fichier mis à jour : https://www.cjoint.com/?3Gox0h1mU3t

Le Pingou · Answer

Bonjour,
aussi ajouter un bas avec: le numéro de page et la date
Pour cela vous passer par la mise en page et l'onglet en-tête/pied de page.
Concernant : Le logo et Rapport de pesée par bateau
Vous étudier la procédure et vous allez trouver la variable ("teterapbat") dans cette partie :
' **** boucle sur les données du bateau
    If cont = True Then
        li = li + 1
        shr.Range("teterapbat").Copy Destination:=shr.Cells(li, 1)Cette variable est la plage nommée qui fait référence à l'en-tête à reprendre pour chaque bateau, donc en modifiant la plage de référence cela devrait marcher.
Si vous n'arrivez pas ... !

Le Pingou · Answer

Bonjour,
Oui c'est possible, il suffit d'ajouter une ligne de code dans la procédure à l'endroit souhaité, cela devrait être possible pour vous.
Dans le cas contraire, sur la base du rapport obtenu par la procédure, vous ajouter,  manuellement, en rouge les modifications désirées et vous mettez le fichier sur cjoint.com.

Le Pingou · Answer

Bonjour,
J'ai constaté que la ligne de titre (Date, Qté brute, ...) disparaissait.
Voici la version corrigée : https://www.cjoint.com/?3Gqpyss1UH3
Bon week-end.

ghislaine2011 · Answer

Bonjour Le Pingou, vous avez passe une bonne fin semaine...

J'ai remarqué que vous avez fait repeter l'entete et mis le total du net sur chaque ligne.

Est-ce possible de mettre l'entete surchaque page et le total du net à la fin de chaque categorie.

Salutation Ghislaine


P.s. j'essaie de comprendre votre programmation et je fais des test de mom coté.

Le Pingou · Answer

Bonjour,
Concernant le [total du net] vous l'avez déjà sous colonne [Total] qui est un cumul et de ce fait la dernière valeur et donc le total net. Pourquoi le répéter ?
Ne serait-il pas mieux de supprimer le total cumulé et introduire le total net par bateau ?
Concernant le [Grand total des net:] pourquoi ne pas l'insérer directement à côté de Rapport de pesée par bateau ?

Le Pingou · Answer

Bonjour,
Merci, le problème n'est de loin pas d'avoir raison, c'est une autre possibilité et c'est à vous de prendre la décision de votre choix.
Une correction/adjonction mineur de code de procédure et c'est dans la poche.

Le Pingou · Answer

Bonjour,
Votre fichier : https://www.cjoint.com/?3GsxZCryw9t

Le Pingou · Answer

Bonjour,
C'est un petit problème que vous résolvez de cette manière :
Lorsque vous cliquez sur le lien vous voyez : ghislaine2011_ccm_v03.xlsm
Avec l'extension [xlsm] ensuite clic sur le document joint puis choisir Enregistrer sous :
Dans la fenêtre Nom de fichier vous avez l'extension qui à changer en ZIP... donc vous remplacer le zip par xlsm et clic sur Enregistrer (vous aurez choisi au préalable ... le bureau).

Le Pingou · Answer

Bonjour,
Oui, j'ai compris, mais la procédure pour le rapport complet n'est pas utilisable, il est nécessaire d'écrire une nouvelle.
Je ferai cela demain.
Par contre pour votre en-tête  seulement sur le début des pages, ce n'est pas clair.... ? Peut-être en passant par la mise en la mise en page et l'onglet en-tête/pied de page ; regardez de votre côté si c'est possible

Le Pingou · Answer

Bonjour,
comment on fait pour executer pas à pas 

Une bonne explication par-là : http://www.excelabo.net/pasapas/suivre-macro

Le Pingou · Answer

Bonjour,  
Je n'ai encore pas vu la réponse à ce qui suit :  
Au passage, dans la feuille [BD enr], les dates de la colonne [A] sont inexploitables car incohérence du format ... !
En plus il semble qu'un message c'est volatilisé... ! Je demandais si ceci : Pour le rapport global, est possible de démêler de classer pas quai doit aussi s'appliquer au rapport pour un bateau ? OUI / NON  
Toutes ces adjonctions dans la procédure existante la rendent ingérable pour cette demande de différenciation par quai. Je suis dans l'obligation de revoir toute la procédure.  
Dans ce sens je ne vais pas corriger le petit problème que vous citez avant d'avoir réalisé la nouvelle procédure pour le rapport global et celui pour un bateau selon choix des dates (votre réponse selon début de message en dépend... !)  

Salutations.  
Le Pingou

Le Pingou · Answer

Bonjour,
Juste au passage....
Les erreurs que vous avez proviennent de la table de [BD enr] ou les données ne sont pas correctes et en plus il y a des incohérences avec la table de [BD bateau] (par exemple le bateau CLAUDE MARTIN n'existe pas .... !

Le Pingou · Answer

Bonjour, 
Je vous laisse le soin des essais : https://www.cjoint.com/?3GwwVs9K8uq 
Note : je n'ai pas regardé votre deux derniers messages et les fichiers. 

Salutations. 
Le Pingou

Le Pingou · Answer

Bonjour,
Pour reprendre la fonction calendrier, vous devez copier le code 
[Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)]
.....
End Sub qui se trouve dans le module de la feuille [Ajout d'enregistrement] et le coller dans le module de la feuille de votre choix (je pense : [Menu rapport]).
Il est nécessaire d'adapter cette instruction [...Range("B6")...] et lui mettre la référence de la cellule date qui déclenche la procédure [Private.... ] ( exemple remplacer le "B6" par "E20")

Le Pingou · Answer

Bonjour, 
Eh bien, vous parlez de quel calendrier ? 
En attendant ....! 
Concernant le calendrier je préfère utiliser cette méthode beaucoup plus conviviale que vous pouvez découvrir avec ce lien : http://www.mdf-xlpages.com/modules/publisher/item.php?itemid=28 



Salutations. 
Le Pingou

Le Pingou · Answer

Bonjour,
C'est simplement une image de calendrier.
Ouvrir la feuille concernée puis clic sur l'onglet [Développeur] et dans le ruban [Contrôles] clic sur [Mode création]. Maintenant vous pouvez sélectionner le calendrier par clic droit et clic sur couper.
Terminer par clic sur [Mode création] et enregistrer la modification.

Le Pingou · Answer

Bonjour,
Concernant le format date, rien ne vous empêche de définir le format date personnalisée des cellules qui reçoivent une date sur [aaaa-mm-jj] et c'est tout en ordre.
Cela dérange quel programme et si c'est le cas, le programme est mal conçu ... !
Pour les listes déroulantes, je l'ai mise simplement car il y avait des erreurs de valeur et cela m'a permis de tout normaliser d'un coup.
Par contre dans votre application il y a chaque fois une feuille [Ajout d'enrégistrement] qui permet d'entrer les données pour la feuille de donnée [BD enr] ce qui veut dire que ma liste déroulante est inutile.
Par contre j'ai fait quelque essai avec cette méthode et je constate que les résultats au niveau des colonnes [nom_bateau2, Capitaine et numéro bateau son fausse.

Le Pingou · Answer

Bonjour,
En principe dans l'aide fournie vous avez toutes les explications (clic 2 petites flèches en bas à droite).
Affichage permanent : clic sur la petite clef à gauche de [Auto Detect] (note : je trouve inutile d'afficher en permanence et surcharger les feuilles)
Toutefois essayez ceci, vous ouvrez le calendrier et vous cochez la case [Auto Detec] et de cette manière chaque fois que vous sélectionnez une cellule au format date, le calendrier apparaitra.
Autre possibilité que j'utilise de préférence c'est clic droit sur la cellule concernée et ensuite dans la fenêtre clic sur [mDF XLcalendar].

Le Pingou · Answer

Bonjour,
Désolé il n'y a aucun calendrier présent dans votre document.
Par contre j'ai réalisé quelques tests et le calendrier suit toujours la cellule sélectionnée pour une date et ceci même s'il est placé complètement ailleurs il revient se positionner vers la cellule sélectionnée.

Le Pingou · Answer

Bonjour, 
Merci, oui cette fois c'est clair, je l'avais déjà remarqué, mais il se trouve sur la feuille [Ajout d'enrégistrement] et non pas [BD enr]. 
Il s'agit du contrôle [Calendar] qui provient de la référence [Microsoft Calendar Control xx] qui malheureusement n'est plus disponible sous Office 2010. 
Si vous vous rappelez je vous avais fait une proposition au poste 66 dans le but de réutiliser ce contrôle. 
Pensez à mettre le statut résolu si c'est le cas !  

Salutations. 
Le Pingou

Le Pingou · Answer

Bonjour Ghislaine,
Eh bien vous avez bien fait d'insister avec le calendrier. 
Je viens de refaire des recherches un peu plus poussé et j'ai finalement trouvé sur le site [Microsoft Answers] la possibilité de télécharger le module [mscal.ocx] que j'ai installé sous [SysWOW64] et maintenant tout est parfait.
Le retraité vous remercie.
Je regarde votre demande dès demain matin.

Le Pingou · Answer

Bonjour,
J'ai oublié, concernant le calendrier [mdf] il faut mettre le fichier [mDF_XLcalendar.xla] dans la [Library] : chemin : C:\Program Files (x86)\Microsoft Office\Office14\Library
Est ensuite dans l'option d'Excel vous l'activez comme complément d'application.

Le Pingou · Answer

Bonjour,
Concernant les 2 derniers rapports, il serait bien si vous réalisiez un petit exemple pour la présentation par poisson et par quai !

Le Pingou · Answer

Bonjour,
Voici ma proposition : https://www.cjoint.com/?3GExSxXWIPi
A vous de réaliser des essais supplémentaire .... !

Le Pingou · Answer

Bonjour,
Le voici pour fêter votre retour : https://www.cjoint.com/?3HgldZ25vzv

Le Pingou · Answer

Bonjour,
Eh bien, votre classeur est ouvert et vous ouvrez l'éditeur VBA ( touche : Alt + F11), sous Outils clic sur Références et dans la liste vous devez avoir coché au minimum les références : 
Visual Basic For Applications, 
Microsoft Excel x.x Object Library, 
Microsoft Office x.x Object Library, 
Microsoft Forms x.x Object Library, 
Microsoft Calendar Control x.x,
Ole Automation. 
Si ce n'est pas le cas rechercher dans la liste et la cocher.

Rapport excel

39 réponses

Discussions similaires