Adriel Ortiz Mangia

H o l a Te paso la macro actualizada Sub GuardarCopia() Dim NombreArchivo As String NombreArchivo = Format(Date, "dd - mm - yyyy") If MsgBox("¿Está seguro de haber rellenado correctamente la plantilla?", vbQuestion + vbYesNo) = vbYes Then FilePath =...

H o l a prueba así Private Sub CommandButton1_Click() If Hoja2.Cells(Z, 2) <> Empty Then Do While Hoja2.Cells(Z, c1) <> Empty c1 = c1 + 4 Loop Hoja2.Cells(Z, c1).Value = Date Hoja2.Cells(2, c1).Value = "Fecha de mantención" Hoja2.Cells(2,...

H o l a No me quedó claro ahora, ¿pudieras poner una imagen como quedaría el resultado?

H o l a Cuales son las 2 columnas a copiar, ¿veo varias?

H o l a Te paso la macro Private Sub CommandButton1_Click() Range("A1") = CDate(TextBox1 & "-" & ComboBox1) End Sub cambia los nombres de los controles por lo que estas utilizando. Valora mi contribución por Excelente o bueno saludos!

H o l a Te paso la macro Private Sub CommandButton1_Click() ' If Text2 < Text1 Then MsgBox "El Text2 debe se mayor al Kilometraje Inicial", vbCritical Exit Sub End If ' End Sub Necesito información para guardar en la hoja. Valora la respuesta para...

H o l a esto te calcula la diferencia de horas y te lo muestra en un mensaje Private Sub CommandButton1_Click() ' hora = TimeValue(Text1) - TimeValue(Text2) ' MsgBox Format(hora, "h.m.s") ' End Sub para mandar a la base de datos, necesito saber como...

¿Pero en cual línea se detiene la macro? O envíame tu archivo para revisarlo [email protected]

H o l a ¿Envíame a mi Email [email protected], con ejemplos que debemos de calcular?, cual columna porque son varias.

¿Pudieras poner un ejemplo o una imagen?