Página 1 de 1

Duplo clique para hide/unhide

Enviado: 13 Nov 2019 às 10:44
por JDuro
Boas pessoal.

Pretendo inserir em algumas células do meu excel um duplo clique que faça hide/unhide (ocultar/mostrar) algumas linhas. No documento anexo:

- As células amarelas são para o duplo clique;
- E as laranjas para ocultar com o duplo clique.

É possível?

Abraço
João

Re: Duplo clique para hide/unhide

Enviado: 13 Nov 2019 às 14:52
por osvaldomp
Experimente:
Código: Selecionar todos
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
 If Intersect(Target, Range("3:3,9:9,16:16,21:21")) Is Nothing Then Exit Sub
 Select Case Target.Row
  Case 3: Rows("4:8").Hidden = Not Rows("4:8").Hidden
  Case 9: Rows("10:15").Hidden = Not Rows("10:15").Hidden
  Case 16: Rows("17:20").Hidden = Not Rows("17:20").Hidden
  Case 21: Rows("22:26").Hidden = Not Rows("22:26").Hidden
 End Select
 Cancel = True
End Sub

Duplo clique para hide/unhide

Enviado: 13 Nov 2019 às 15:35
por JDuro
Boa!!!!! Feito!!! :D

Duplo clique para hide/unhide

Enviado: 13 Nov 2019 às 15:36
por JDuro
Muito obrigado, OsvaldoMP