Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Ajouter dix minutes à une heure sous forme hh:mm:ss en Vba

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

zephir94

XLDnaute Impliqué
Bonsoir à vous tous,

Je récupère la saisie d'une textbox depuis un Userform.
La textbox est formatée en hh:mm:ss

et j'écris dans une Cellule d'une feuille cette saisie, je voudrais incrémenter de dix minutes cette saisie !
mais je n'y arrive pas, j'ai fait moultes recherches infructueuses du genre :

VB:
a = TextBox3.Value
a = Format(a, "HH:MM:SS")
ActiveSheet.Range("V" & ligne2).Value =a
ActiveSheet.Range("V" & ligne2).Value = DateAdd("m", 10, ActiveSheet.Range("V" & ligne2).Value)
Merci à vous tous pour m'aider

Bien cordialement
Zephir
 
Dernière édition:
Bonjour.
N'utilisez Format que pour transformer une donnée numérique en texte, pas le contraire.
Là je dirais :
VB:
ActiveSheet.Cells(ligne2, "V").Value = CDate(TextBox3.Text) + TimeSerial(0, 10, 0)
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…