Comment concatener plusieurs textbox

Résolu/Fermé

coupidon Messages postés 98 Date d'inscription mardi 3 janvier 2006 Statut Membre Dernière intervention 23 novembre 2016 - 8 sept. 2016 à 09:47
Ant049 Messages postés 154 Date d'inscription jeudi 4 août 2016 Statut Membre Dernière intervention 9 septembre 2016 - 9 sept. 2016 à 13:42

Bonjour,

voilà, j'ai 3 textbox avec lequels je saisi :
- des heures sur le 1er
- des minutes sur le 2em
- des secondes sur le 3em
j'ai choisi cette configuration par esthétisme,bref

je souhaiterais faire un calcul en vba sur excel avec, en utilisant la date du jour et heure avec la fonction

now()

mais comment on peu concatener les 3 textboxs pour me permettre ce calcul.

merci à ceux qui peuvent m'aider.....

A voir également:

Vba concatener
Concatener deux cellules excel - Guide
Concaténer pdf - Guide
Vba ouvrir un fichier excel avec chemin ✓ - Forum VB / VBA
Vba attendre 1 seconde ✓ - Forum VB / VBA
Vba récupérer valeur cellule ✓ - Forum VB / VBA

1 réponse

Réponse 1 / 1

Ant049 Messages postés 154 Date d'inscription jeudi 4 août 2016 Statut Membre Dernière intervention 9 septembre 2016 22
8 sept. 2016 à 10:00

Bonjour,

Pour concaténer tes textbox :

Nomdetavariable = TextBox1.Value & ":" & TextBox2.Value & ":" & TextBox3.Value

Quelle opération veux-tu faire ?

coupidon Messages postés 98 Date d'inscription mardi 3 janvier 2006 Statut Membre Dernière intervention 23 novembre 2016 1
8 sept. 2016 à 10:07

je veux utiliser la date du jour avec now() dans cette date normalement il y à la date, je jour, l'année et les heures heures, minutes, secondes.

je veux dans trois textbox saisir, les heures dans l'une, les minutes dans l'autres et les secondes dans la dernière
et avec cela je souhaites faire le calcul des trois textbox avec le now() du moment et qu'elle additionne ces heures vois-tu ?

un exemple :
textbox1 : 5 Heures
textbox2 : 20 minutes
textbox3 : 41 secondes

disons que maintenant "now()" nous sommes le jeudi 08 septembre 2016 10:06:06
qu'un textox4 par exemple m'affiche le résultat :

15:26:47

voilà, semble simple sur excel mais en vba je pêche, pour cela que je pensais à la concatenation

Ant049 Messages postés 154 Date d'inscription jeudi 4 août 2016 Statut Membre Dernière intervention 9 septembre 2016 22
8 sept. 2016 à 10:35

D'accord, je t'ai mis une possibilité de concaténation sur mon 1er post.
Pour l'addition, il faut que tu utilises la fonction Time sur VBA, qui te renverra l'heure avec minutes et secondes.
Fais attention aux formats ! Pour additionner les deux, il faudra que tu adaptes le format, je te laisse voir ça et reviens si tu bloques.

coupidon Messages postés 98 Date d'inscription mardi 3 janvier 2006 Statut Membre Dernière intervention 23 novembre 2016 1 > Ant049 Messages postés 154 Date d'inscription jeudi 4 août 2016 Statut Membre Dernière intervention 9 septembre 2016
8 sept. 2016 à 19:44

bonsoir,

j'ai tester ton code donc voilà, comme ceci cela fonctionne, mais je n'arrive pas à trouver comment faire avec la fonction time pour l'utiliser dans ce code
quand j'utilise la variable H et que je souhaite faire des calculs ben cela me fait des erreurs, du coup je bloque....
j'ai chercher des cours sur vba avec la fonction time, mais avec ma concaténation cela bug.
je sais pas si c'est pris comme une heure du coup, afin de pouvoir justement faire le calcul.

Private Sub TextBox10_AfterUpdate()

Dim H As String
H = TextBox8.Value & ":" & TextBox9.Value & ":" & TextBox10.Value

TextBox16.Value = H
End Sub

coupidon Messages postés 98 Date d'inscription mardi 3 janvier 2006 Statut Membre Dernière intervention 23 novembre 2016 1
9 sept. 2016 à 13:01

mais pour se sujet vous avez répondu à mes attentes, donc je considère que cette question est résolu, merci

Ant049 Messages postés 154 Date d'inscription jeudi 4 août 2016 Statut Membre Dernière intervention 9 septembre 2016 22
9 sept. 2016 à 13:42

Bonjour,

Tu as la méthode pour concaténer tes textbox.
En ce qui concerne l'ajout des deux horaires :
- essaye de jouer avec les formats :

Format( tavaleur, "format souhaité")

- regarde des fonctions comme DateAdd

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

Retour ligne dans une concaténation EXCEL ?

inverse de la fonction concatener

Erreur d'exécution 13 Incompatibilité de type

Méthode find dans VBA - Recherche de données sous Excel