Como ocultar caixas de seleção quando a linha está oculta no Excel?

Normalmente, ao ocultar uma linha que contém caixas de seleção nas células da linha, as caixas de seleção não serão ocultadas com a linha, mas se sobreporão ao conteúdo de outra linha, conforme mostrado na captura de tela abaixo. Como você pode ocultar as caixas de seleção quando uma linha está oculta no Excel? Este artigo irá ajudá-lo a resolver isso.

Ocultar caixa de seleção quando a linha estiver oculta com código VBA

Ocultar caixa de seleção quando a linha estiver oculta com código VBA

Você pode executar o seguinte código VBA para ocultar caixas de seleção quando a linha estiver oculta no Excel.

1. Clique com o botão direito do mouse na aba da planilha com as caixas de seleção que deseja ocultar e clique em Visualizar Código no menu de contexto.

2. Na janela Microsoft Visual Basic for Applications, copie e cole o código VBA abaixo na janela Código.

Código VBA: Ocultar caixa de seleção quando a linha estiver oculta

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim xChkBox As CheckBox
    Dim xCell As Range
    Dim xHide As Boolean
    If Target.EntireRow.AddressLocal = Application.Intersect(Target, Target.EntireRow).AddressLocal Then
        xHide = (MsgBox("Hide Rows ???", vbYesNo + vbQuestion, "Kutools for Excel") = vbYes)
        Target.EntireRow.Hidden = xHide
        For Each xChkBox In ActiveSheet.CheckBoxes
            Set xCell = xChkBox.TopLeftCell
            If Not Intersect(xCell, Target) Is Nothing Then
                xChkBox.Visible = Not xHide
            End If
        Next
    End If
End Sub

3. Em seguida, pressione simultaneamente as teclas Alt + Q para fechar a janela Microsoft Visual Basic for Applications.

4. Selecione a linha inteira com as caixas de seleção que você precisa ocultar, então uma caixa de diálogo aparecerá, por favor, clique no botão Sim.

Então você pode ver que todas as caixas de seleção estão ocultas com a linha, conforme mostrado na captura de tela abaixo.

Observação: Para exibir a linha oculta com caixas de seleção, selecione as linhas inteiras incluindo a linha oculta e, na caixa de diálogo que aparece, clique no botão Não. A linha com as caixas de seleção será exibida.

Artigos relacionados:

• Como ocultar linhas com base na data de hoje no Excel?
• Como ocultar/mostrar linhas ou colunas com sinal de mais ou menos no Excel?