Red de conocimiento informático - Aprendizaje de programación - Cómo agregar rápidamente ":" antes del penúltimo dígito en EXCEL

Cómo agregar rápidamente ":" antes del penúltimo dígito en EXCEL

Puede anidar en Excel usando VBA. A continuación se muestran todos los códigos fuente, siempre que sigas mis instrucciones paso a paso, incluso si no sabes nada sobre estos códigos, puedes seguirlos y pronto podrás ingresar valores de tiempo en Excel sin ingresar. dos puntos!

1. Inicie Excel, abra el libro que requiere ingresar una gran cantidad de valores de tiempo y luego presione Alt-F11 para iniciar el editor VBA.

2. Seleccione el comando de menú "Insertar"-"Agregar módulo". En este momento, en la ventana "Proyecto" en la parte superior izquierda de la pantalla, aparecerá un subdirectorio "Módulo". En el lado derecho se muestra el módulo "Módulo1" que acaba de agregar. Puede cambiarle el nombre a "Módulo1". " . Puedes cambiarle el nombre a algo que te guste, como "fasttime".

3. Haga doble clic en el módulo "fasttime" (si se ha cambiado el nombre del módulo) e ingrese el siguiente código en el editor de código de la derecha (o cópielo de mi libro de trabajo de muestra). >Si se produce un error, saltará a la instrucción EnterTimeError

Si Intersect(Application.If Intersect(Application.Caller, Range("fasttime")) no es nada, entonces

Salir Sub ' Finaliza el proceso si se cambia una celda que no está en el rango "fasttime"

End If

'Si el valor de entrada es menor que 1 o mayor que 2400, muestra un cuadro de diálogo donde el valor ingresado por el usuario es ilegal

Si Application.Caller < 1 o Application. Then

MsgBox "¡Lo siento, su valor ingresado es ilegal!", vbExclamation

MsgBox, vbExclamation

Application.Caller.Value = ""

Salir de Sub

End If

'\ Cambiar el valor de entrada al formato HH:MM

Application.Caller.Value = Format(Application.Caller, "00:00")

Salir Sub

EnterError :

Exit Sub

End Sub

4. Nombra el área de la celda donde se ingresa una gran cantidad de valores de tiempo como "fasttime". El método es nombrar primero el área de la celda donde se ingresan los valores de tiempo. Ennegrecer el área de la celda, luego seleccionar el comando del menú de Excel "Insertar" - "Nombre" - "Definición", ingresar "fasttime" en el "Nombre". en la columna del libro de trabajo actual" y finalmente presione OK.

¡Bien, listo! Ahora ingrese el valor de tiempo que desea probar en el campo "fasttime", ¡sin los dos puntos! Tenga en cuenta que el valor que ingrese debe estar entre 1 y 2400; de lo contrario, se considerará un valor ilegal. Por ejemplo, si necesita ingresar un valor de hora como las nueve y veinte de la mañana, solo necesita ingresar un número como 0920 y Excel lo mostrará como ". 09:20 a. m." en la celda; si necesita ingresar un valor de hora de 11 p. m. Para un valor de tiempo como quince minutos, solo necesita ingresar un número como 2315 y Excel lo mostrará como "11:15 p. m." en la celda. ¿No es muy conveniente?