Problema al transferir fecha de label

Mi problema es el siguiente tengo un formulario el cual usan 4 operadores diferentes en 2 turnos el problema es que el tuno 1 inicia alas 6 am 12 nov. Como ejemplo y finaliza alas 6 pm del 12 de nov. El turno 2 inicia alas 6 pm y finaliza alas 6 am pero laboral mente el turno termina con fecha inicial del turno 1 en el formulario yo tengo un txbox para fecha y otro para turno pero cada usuario utiliza diferentes formas de ingresar la fecha
En entonces lo que hice fue colocar 2 botones de opción al cual a uno lo nombre como turno 1
Anexe 2 label uno con name fecha y otro turno que dando como siguiente
Private Sub OptionButton1_Click()
If OptionButton1 Then
Me.LBTURNO.Caption = "A1"
Me.LBFECHA.Caption = Sheets("RESUMENES").Range("H2")
End If
End Sub
La fecha la tengo en un rango con fórmula =hoy()
Y para el otro es igual solo cambia por "A2"
Me.LBFECHA.Caption = Sheets("RESUMENES").Range("H2") - 1
Para que quede con la fecha que inicio pero
Al pasar el label ala hoja excel me cambea la fecha osea si hoy es 10/11/11
Me pone 11/10/11 en la hoja solo me voltea el mes

1 Respuesta

Respuesta
1
Tanto los Label como los Textbox que contenga fecha u horas, necesitan ser convertidos con la función CDate
Ej:
Private Sub CommandButton1_Click()
Range("A3") = CDate(Label2.Caption)
End Sub
PD) Ya se inició la promo 'fin de año' en manuales y aplicaciones de mi sitio...

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Fórmula para poner en celda que haga la concatenación de celdas visibles en un rango dado.

NECesito una fórmula para poner en K1, según el cuadro que adjunto, para que en K1, me haga, de forma automática, la concatenación de las celdas que queden visibles en el rango k4:K11, YA que al filtrar se pueden mostrar todas o solo parte de ellas....
2 respuestas

Como pegar solamente valores de una celda a otra hoja

Sub CopiarImprimir() ' ' CopiarImprimir Macro ' Application.ScreenUpdating = False Sheets("Imprimir").Select Worksheets("Imprimir"). Range("A4:C50"). Clear Range("E4:J49"). Clear Sheets("Planillas").Select Sheets("Planillas"). Range("G4").Copy...
3 respuestas

Mantener el color de un botón al salir de un módulo

Quisiera por favor me ayuden, estoy haciendo una aplicación en vba para un restaurante y necesito lo siguiente: tengo 20 mesas que al momento de abrir el modulo de venta selecciono la mesa y cambia de color y su estado pasa a ocupada la idea es...
3 respuestas

Redondear decimales en números arábigos

Sres. T.E. La consulta es la siguiente, necesito una fórmula en excel para llevar los decimales a .00 y .50, ejemplo en una celda tengo el valor 45.12 levarlo a 45.00 en otra tengo 45.42 levarlo a 45.00.
2 respuestas

Sumar dos filas distintas mayor a 0

Quiero sumar dos filas separadas por ejemplo fila 5 de A4 a J4 y fila 10 de A4 a J4, cada fila tiene resultados positivos o negativos, quiero que me sume en la celda B3 por ejemplo los datos positivos y en la celda C3 los datos negativos. Solo se...
2 respuestas

Filtrar ultima fecha según el criterio de una celda

Tengo una tabla de excel con la siguiente información Columna A el código del equipo. (Código único para cada equipo) Columna B la fecha en que se realizo la ultima revisión. Columna C el nombre del equipo. Columna D El tipo de revisión (preventivo,...
2 respuestas

Cómo hacer un filtro múltiple en formulario Excel?

Tengo un formulario en Excel con 5 combos combinado(Tipo, Año, Mes, servicio y Especialidad) y un cuadro de lista. La idea es que al seleccionar un valor en el cuadro combinado Tipo, en el cuadro de lista se me filtren los registros con ese valor,...
2 respuestas

Suma en un formulario de Excel

Estoy realizando un formulario, el cual al salir del ultimo texbox me sume los anteriores, he usado el siguiente código Private Sub base0_Change() On Error Resume Next Me.totalfactura = Round((Me.base0 + Me.base10 + Me.base21 + Me.base4 + Me.base5) +...
2 respuestas

Copiar dato de una celda para filtrar una tabla en otra hoja

En la primera hoja tengo una tabla con datos que alimenta otra tabla que se encuentra en una segunda hoja. Quisiera una macro que copie el contenido de la celda que tenga seleccionada, después ir la segunda hoja y filtrar ese dato en la tabla que ahí...
2 respuestas

Pasar de hoja resumen a plantilla de factura

Tengo un Excel, con un hoja resumen de datos, y lo que quisiera hacer, es que me pasara los datos que tengo en cada línea de la hoja resumen de forma de forma automática, a diferentes hojas de excel del mismo libro, en unas celdas concretas,...
3 respuestas