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

Problème de soustraction dans textbox

  • Initiateur de la discussion @Christophe@
  • Date de début
@

@Christophe@

Guest
Bonsoir Forum

Je bloque sur le problème suivant, comme un exemple est souvent mieux, le voici, merci d'avance

Exemple,

Textbox 1 (heure prévu)= 06:00
Textbox 2 (heure arrivé)= 06:23

Textbox 3 (retard) = 00:23

Comment obtenir le résultat du textbox 3 automatiquement dans mon userform.

Merci d'avance, bonne soiré a tous

@Christophe@
 
Z

zon

Guest
Salut christophe,

Un début de code si on a un bouton valider



Sub commandbutton1_click()
Dim h1, h2 As Long
Dim str1, str2 As String


ga1 = Left(CStr(textbox1.Value), 2) 'recupere l'heure
dr1 = Right(CStr(textbox1.Value), 2) ' recupere les min
h1 = CLng(ga1) 'On transforme en long les heures et les minutes
m1 = CLng(dr1)
ga2 = Left(CStr(textbox2.Value), 2) 'recupere l'heure
dr2 = Right(CStr(textbox2.Value), 2) ' recupere les min
h2 = CLng(ga2) 'On transforme en long les heures et les minutes
m2 = CLng(dr2)

''code pour retrancher des heures et des minutes ....


End Sub
 
R

Ronan Quennec

Guest
Je pense que cette méthode est beaucoup plus simple
 

Pièces jointes

  • Classeur2.xls
    28 KB · Affichages: 57
  • Classeur2.xls
    28 KB · Affichages: 69
  • Classeur2.xls
    28 KB · Affichages: 62

Discussions similaires

Réponses
12
Affichages
901
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…