XL 2013 Mise à jour base de données

HUMANUM

XLDnaute Nouveau
Bonjour à tous,

Je suis en train de créer un tableur de gestion des heures de fonctionnement de machines.
Je vous expose ma problématique.
J'ai un premier fichier Excel qui me sert de base de données (numéro machine + nombre d'heures)
J'ai un deuxième fichier Excel sur lequel j'ouvre un formulaire pour mettre à jour la base de données du premier fichier.

Exemple :
Dans mon formulaire je rentre le numéro d'une machine et un nombre d'heure.
Je veux que ce formulaire une fois validé aille trouver la bonne machine dans la base de donnée et mettre en face le nombre d'heure

C'est ce que je veux faire mais que je n'arrive pas !

En pièces jointes mes deux fichiers.

Quelqu'un pour m'aider ?

Merci d'avance
 

Pièces jointes

  • BDD.xlsm
    8.2 KB · Affichages: 14
  • Formulaire.xlsm
    18.8 KB · Affichages: 7

_Thierry

XLDnaute Barbatruc
Repose en paix
Bonsoir @HUMANUM , Jean-Marcel

Une première approche, faite sans voir ton dernier fichier. A dézipper dans le même répertoire...

On voit bien les inconvénients de la Date/Time en entête de colonne qui sera la même pour toutes les machines....
Mais ca fera avancer le Shmilblick !
Il y a aussi quelques gestions d'erreurs...

@+Thierry

PS je vais regarder la nouvelle "mouture"...
 

Pièces jointes

  • XLD_HUMANUM_Formulaire.zip
    29.8 KB · Affichages: 9

_Thierry

XLDnaute Barbatruc
Repose en paix
Oui en fait ca ne change pas grand chose, mais si on insert une colonne "Date/Time" dans la BDD ce sera plus simple (et plus "parlant")...

Ce n'est pas compliqué à ajouter sur mon exemple si on veut le "Time-Stamp" système :

Remplacer cette ligne de code :
VB:
WSCible.Cells(1, CellCible.Column) = "Compteur " & Format(Now, "DD/MM/YY hh:mm:ss")

Par simplement ceci :
Code:
CellCible.Offset(0, 1) = Format(Now, "DD/MM/YY hh:mm:ss")

Bonne soirée
@+Thierry
 

_Thierry

XLDnaute Barbatruc
Repose en paix
Bonsoir Bruno,
Là je t'avoue que je ne comprends rien du tout.
Je n'ai pas trouvé d'autres Fils de discussion de notre ami dans XLD, et dans ce fil je n'ai rien trouvé d'irrespectueux.
Bien à toi, à vous
@+Thierry
 

Discussions similaires

Réponses
7
Affichages
326

Statistiques des forums

Discussions
312 104
Messages
2 085 335
Membres
102 865
dernier inscrit
FreyaSalander