Cómo concatenar varios cuadros de texto
Resuelto
coupidon
Mensajes publicados
98
Estado
Miembro
-
Ant049 Mensajes publicados 157 Estado Miembro -
Ant049 Mensajes publicados 157 Estado Miembro -
Hola,
tengo 3 cajas de texto con las que ingreso:
- horas en la primera
- minutos en la segunda
- segundos en la tercera
he elegido esta configuración por estética, en fin
me gustaría hacer un cálculo en VBA en Excel, utilizando la fecha y hora actual con la función
now()
pero ¿cómo puedo concatenar las 3 cajas de texto para permitirme hacer este cálculo?
gracias a quienes puedan ayudarme.....
tengo 3 cajas de texto con las que ingreso:
- horas en la primera
- minutos en la segunda
- segundos en la tercera
he elegido esta configuración por estética, en fin
me gustaría hacer un cálculo en VBA en Excel, utilizando la fecha y hora actual con la función
now()
pero ¿cómo puedo concatenar las 3 cajas de texto para permitirme hacer este cálculo?
gracias a quienes puedan ayudarme.....
Quiero en tres textbox ingresar las horas en uno, los minutos en otro y los segundos en el último
y con eso deseo hacer el cálculo de los tres textbox junto con el now() del momento y que sume esas horas, ¿entiendes?
Un ejemplo:
textbox1: 5 horas
textbox2: 20 minutos
textbox3: 41 segundos
Digamos que ahora "now()" estamos en jueves 08 de septiembre de 2016 10:06:06
que un textbox4, por ejemplo, me muestre el resultado:
15:26:47
Eso parece simple en Excel, pero en VBA me cuesta, por eso pensaba en la concatenación.
Para la suma, tienes que usar la función Time en VBA, que te devolverá la hora con minutos y segundos.
¡Ten cuidado con los formatos! Para sumar los dos, tendrás que adaptar el formato, te dejo ver eso y vuelve si te atascas.
he probado tu código, y así funciona, pero no logro encontrar cómo usar la función time en este código
cuando uso la variable H y quiero hacer cálculos, me da errores, así que estoy bloqueado...
he buscado cursos sobre VBA con la función time, pero con mi concatenación da error.
no sé si se reconoce como una hora, así que puedo hacer el cálculo.
Private Sub TextBox10_AfterUpdate()
Dim H As String
H = TextBox8.Value & ":" & TextBox9.Value & ":" & TextBox10.Value
TextBox16.Value = H
End Sub
Tienes el método para concatenar tus cuadros de texto.
En cuanto a la suma de los dos horarios:
- intenta jugar con los formatos:
- mira funciones como DateAdd.