Heure instantanée+incrémentation Excel
banban64
Messages postés
18
Statut
Membre
-
gbinforme Messages postés 15481 Date d'inscription Statut Contributeur Dernière intervention -
gbinforme Messages postés 15481 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour à tous,
J'ai crée un userform pour remplir mon tableur. Il suffit de cliquer sur le bouton "transfert" à droite du tableur pour voir le formulaire.Et j'aimerais que lorsque je clique sur "valider" , que la fenêtre se ferme et que sa me marque en même temps l'heure de saisie dans la 2ème colonne.Je suis novice en VBA, je me lance à peine!
Je vous transmets mon ficher xls pour vous montrer comment il est fait!
www.adpc64.org/bdd22.xls
Autre pitit truc.... je cherche à ce que ma ma premiere colonne s'incremente toute seule à chaque fois que je crée une nouvelle ligne : j'aimerais qu'à chaque fois que je rajoute une ligne grâce à mon formulaire, que sa passe de 001 à 002 et etc...
J'ai crée un userform pour remplir mon tableur. Il suffit de cliquer sur le bouton "transfert" à droite du tableur pour voir le formulaire.Et j'aimerais que lorsque je clique sur "valider" , que la fenêtre se ferme et que sa me marque en même temps l'heure de saisie dans la 2ème colonne.Je suis novice en VBA, je me lance à peine!
Je vous transmets mon ficher xls pour vous montrer comment il est fait!
www.adpc64.org/bdd22.xls
Autre pitit truc.... je cherche à ce que ma ma premiere colonne s'incremente toute seule à chaque fois que je crée une nouvelle ligne : j'aimerais qu'à chaque fois que je rajoute une ligne grâce à mon formulaire, que sa passe de 001 à 002 et etc...
A voir également:
- Heure instantanée+incrémentation Excel
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Si ou excel - Guide
- Changement d'heure - Guide
- Déplacer colonne excel - Guide
1 réponse
bonjour
En rajoutant dans ton formulaire cette procédure, cela devrait te donner le résultat
En rajoutant dans ton formulaire cette procédure, cela devrait te donner le résultat
Private Sub valider_Click() ActiveCell.Offset(0, 1).NumberFormat = "h:mm:ss" ActiveCell.Offset(0, 1).Value = Time ActiveCell.NumberFormat = "000" ActiveCell.Value = WorksheetFunction.Max([A:A]) + 1 transfert.Hide End Sub
