Red de conocimiento informático - Problemas con los teléfonos móviles - Solicite asesoramiento sobre programación en VB

Solicite asesoramiento sobre programación en VB

El código anterior debería ser una función de VB para operar la tabla EXCEL

Private Sub Worksheet_Change(ByVal Target As Range) Este es un evento desencadenado por cambios en la tabla WorkSheet. En resumen, debería ser desencadenado por. cambios en el contenido de la celda EXCEL.

El valor de retorno objetivo representa la ubicación específica del cambio (celda)

Private Sub Worksheet_Change(ByVal Target As Range)

Si Target.Cells.Count gt; 1 Or Target.Row lt; 5 Then Exit Sub 'Si el número de celdas es menor que 1 o la fila es menor que 5, salga

Seleccione Case Target. Columna 'Objetivo del filtro. Seleccione los cambios y emita un pitido

Target.Select

Beep

Else

Target.Offset(0, 2).Seleccione 'If IsEmpty' (Objetivo) = Verdadero Luego 'Seleccione Desplazamiento(0, 2) y emita un BEEP

Si está vacío(Destino).Columna

Caso 1

Caso 1

Si IsEmpty(Target) = True Entonces 'Si IsEmpty(Target) = True Entonces 'Si IsEmpty(Target) = True Entonces 'If IsEmpty(Target).Target.Offset(1, -6) .Seleccione

Bip

Finalizar si

Finalizar selección

Finalizar sub

Estoy interesado en VBA I No sé mucho al respecto, la explicación anterior es solo como referencia.

上篇: ¿Cuál es mejor, X300 o FX5200 (PCI-E)? ¡Puntuación alta! Personalmente, recomiendo el X300. 下篇: ¿Se pueden subir las monedas Shib y Akita a 1 yuan?

Artículos populares