Gestion de flotte vehicule Le sujet est résolu

Y compris Power BI, Power Query et toute autre question en lien avec Excel
S
Stymzup
Nouveau venu
Nouveau venu
Messages : 6
Inscrit le : 23 mars 2020

Message par Stymzup » 23 mars 2020, 15:10

Bonjour à tous,

J'écris ce message car je rencontre un problème avec un fichier EXCEL sur lequel j'aurais besoin de faire une analyse et je ne sais pas comment m'y prendre.

En effet, mon tableau se construit comme suit (Je vous joint un exemple):

Colonne A : Date
Colonne A : Immatriculation
Colonne A : Kilométrage

Je souhaiterais obtenir dans un tableau récapitulatif m'indiquant le dernier kilométrage saisie par immatriculation.

Immatriculation - Date - Kilométrage
AB-001-AB - 19/03/2020 - 3065
EB-002-AB - 17/12/2019 - 59367
EJ-004-AB - 03/01/2020 - 17238
FG-003-AB - 11/03/2020 - 52735

Je vous remercie par avance pour vos aides/retours,

Stymzup
KMS VEHICULES.xlsx
(13.06 Kio) Téléchargé 43 fois
Avatar du membre
pierrep56
Membre impliqué
Membre impliqué
Messages : 1'208
Appréciations reçues : 198
Inscrit le : 18 juin 2014
Version d'Excel : 2016

Message par pierrep56 » 23 mars 2020, 16:13

Avec du Sql c'est simple
Pierre
Démo_KMS VEHICULES.xlsm
(32.44 Kio) Téléchargé 28 fois
S
Stymzup
Nouveau venu
Nouveau venu
Messages : 6
Inscrit le : 23 mars 2020

Message par Stymzup » 24 mars 2020, 09:05

Bonjour Pierre,

Merci pour ta solution, le fait est que le fichier que j'ai envoyé est un très gros récapitulatif de l'original qi possède plus de 40k lignes (Et ne va faire qu'augmenter drastiquement avec le temps) et au vu des performances de mon PC il serait compliqué d'ouvrir le fichier et lancer la macro.

Existerait-il une ou plusieurs fonctions avancées de type formule de calcul qui pourrait faire exactement ce résultat (Merci encore) mais sans alourdir trop le fichier ?

Merci d'avance pour votre aide,
Avatar du membre
pierrep56
Membre impliqué
Membre impliqué
Messages : 1'208
Appréciations reçues : 198
Inscrit le : 18 juin 2014
Version d'Excel : 2016

Message par pierrep56 » 24 mars 2020, 09:21

Bonjour,

Avec le même code dans un nouveau fichier on peut tout à fait interroger un fichier excel externe sans toucher aux données originales.
Voici la modif :
Connect_xls ThisWorkbook.Path & "\KMS VEHICULES.xlsx"
Et voici le fichier "d'interrogation" à placer dans le même dossier que le fichier "KMS VEHICULES.xlsx"

Pierre

Edit de 11h00 : avec amélioration requête pour résultats plus justes
Démo_KMS VEHICULES_v2.zip
(37.23 Kio) Téléchargé 13 fois
S
Stymzup
Nouveau venu
Nouveau venu
Messages : 6
Inscrit le : 23 mars 2020

Message par Stymzup » 24 mars 2020, 14:12

Bonjour Pierre,

Merci pour tous ces efforts !
Je t'avoue ne pas m'y connaitre énormément en MACRO.

J'ai bien placé en début de la MACRO :

Connect_xls ThisWorkbook.Path & "\KMS VEHICULES.xlsx"

Mais le fait est que, mon fichier de base possède bien plus de colonnes et je n'arrive pas à adapter ta macro sur le fichier original…
Un erreur ressort à chaque fois.

Je me permets de te joindre les en-tête du fichier original si jamais tu as le temps de regarder :)
EN-TETE FEUIL ORIGINALE.xlsx
(9.41 Kio) Téléchargé 21 fois
Avatar du membre
pierrep56
Membre impliqué
Membre impliqué
Messages : 1'208
Appréciations reçues : 198
Inscrit le : 18 juin 2014
Version d'Excel : 2016

Message par pierrep56 » 24 mars 2020, 15:11

Avec le grand-confinement on a du temps! ;)

Alors voici une version 3, j'ai essayé de simplifier au maximum :
* on place ce nouveau fichier dans le même dossier que celui "à lire"
* on écrit le nom du fichier "à lire" en A1 (au cas ou différent de "KMS VEHICULES.xlsx")
* on écrit le nom de l'onglet "à lire" en C1 (au cas ou différent de "Feuil1")
* il suffit alors de cliquer sur le bouton!

Pierre
Démo_KMS VEHICULES_v3.xlsm
(30.96 Kio) Téléchargé 43 fois
S
Stymzup
Nouveau venu
Nouveau venu
Messages : 6
Inscrit le : 23 mars 2020

Message par Stymzup » 24 mars 2020, 15:43

C'est vrai qu'il faut tuer le temps :)
Malheureusement l'erreur suivante s'affiche :
[Microsoft][Pilote ODBC Excel]Erreur générale Impossible d'ouvrir la clé de registe "Temporary (volatile) Ace DNS for process 0x3d20 Thread 0cde8 DBCX 0c22971034

Lorsque je clic sur le débogage, voici ce qui est surligné dans Visual Basics :

Cnx.Open "Driver={Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb)};" & _
"DBQ=" & Ndf & "; ReadOnly=False;"

J'ai bien respecté les process suivants :
* Placer le nouveau fichier dans le même dossier que celui "à lire"
* Ecrire le nom du fichier "à lire" en A1
* Ecrire le nom de l'onglet "à lire" en C1
Avatar du membre
pierrep56
Membre impliqué
Membre impliqué
Messages : 1'208
Appréciations reçues : 198
Inscrit le : 18 juin 2014
Version d'Excel : 2016

Message par pierrep56 » 24 mars 2020, 17:08

Probablement pb de configuration.
Tout fermer, éventuellement redémarrer Windows, ouvrir uniquement le fichier démo (sans le fichier de données)
Si toujours erreur, je ne peux rien faire.
Pierre
Ps : fonctionne sous PC Windows 10 64 bits + Office 2016 32 bits
et PC Windows 10 32 bits + Office 2007 32 bits
S
Stymzup
Nouveau venu
Nouveau venu
Messages : 6
Inscrit le : 23 mars 2020

Message par Stymzup » 25 mars 2020, 13:20

Bonjour Pierre,
j'ai redémarré le PC et tout fonctionne, j'ai quelques valeurs étranges et quelques unes en doublon mais peut-importe je m'en accommoderai, c'est bien mieux que rien du tout !
Je te remercie encore pour ton temps et aide sur le sujet! ::D
S
Stymzup
Nouveau venu
Nouveau venu
Messages : 6
Inscrit le : 23 mars 2020

Message par Stymzup » 25 mars 2020, 13:22

:btres:
Répondre
  • Sujets similaires
    Réponses
    Vues
    Dernier message