¿Cómo mover una determinada fila a una nueva hoja cuando la casilla de verificación está marcada en Excel?
Este artículo habla de mover una determinada fila a una nueva hoja cuando la casilla de verificación está marcada en Excel.
Mover fila cuando la casilla de verificación está marcada con el código VBA
Mover fila cuando la casilla de verificación está marcada con el código VBA
Haga lo siguiente para mover una determinada fila a una hoja de trabajo específica cuando marque una casilla de verificación en Excel.
1. Cambie a la hoja de trabajo en la que necesita mover la fila según la casilla de verificación, haga clic en Developer > recuadro > Casilla de verificación (control ActiveX) para insertar una casilla de verificación. Ver captura de pantalla:
2. Haga clic con el botón derecho en la pestaña de la hoja y luego haga clic en Ver código desde el menú contextual. Ver captura de pantalla:
3. En la apertura Microsoft Visual Basic para aplicaciones ventana, copie y pegue debajo del código VBA en la ventana Código.
Código de VBA: mueva la fila a una hoja de trabajo específica cuando se marca una casilla de verificación
Private Sub CheckBox1_Click()
Dim xRg As Range
Dim xAddress As String
On Error Resume Next
If CheckBox1.value Then
xAddress = Application.ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select the range row you will move(single cell):", "KuTools For Excel", xAddress, , , , , 8)
If xRg Is Nothing Then Exit Sub
Set xRg = xRg(1).EntireRow
xRg.Copy
ActiveWorkbook.Sheets("Sheet3").Range("A1").PasteSpecial xlPasteAllUsingSourceTheme
xRg.Clear
Application.CutCopyMode = False
End If
End Sub
Note: En el código, Shee3 y A1 indican que la fila especificada se moverá a la primera fila en Sheet3. Cámbielos según sus necesidades.
4. presione el otro + Q llaves para cerrar el Microsoft Visual Basic para aplicaciones ventana.
5. Desactive el modo de diseño haciendo clic en el Modo de diseño botón de la Developer .
6. Marque la casilla de verificación y luego Kutools for Excel aparece el cuadro de diálogo, seleccione la primera celda de la fila (o toda la fila) que necesita mover y haga clic en el OK botón. Luego, la fila completa especificada se moverá a una determinada hoja de trabajo inmediatamente. Ver captura de pantalla:
Artículos relacionados:
- ¿Cómo mover la fila completa a otra hoja según el valor de la celda en Excel?
- ¿Cómo mover la fila completa al final de la hoja activa según el valor de la celda en Excel?
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!