Avatar billede sjssjdk Mester
24. september 2019 - 09:34 Der er 1 kommentar og
1 løsning

Hide / unhide med samme knap

Hej.

Jeg har en macro der skjuler et billede.
Er det muligt at kombinere sådan at sammen knap skjuler eller viser alt efter om den er skjult eller vist?

Jeg bruger i dag to knapper og denne macro:

Sub Hide()
ActiveSheet.Shapes("Group 8").Visible = False
End Sub

Sub Show()
ActiveSheet.Shapes("Group 8").Visible = True
End Sub

På forhånd tak :)
Avatar billede Jan Hansen Ekspert
24. september 2019 - 09:56 #1
Sub HideShow()
      If ActiveSheet.Shapes("Group 8").Visible=True then
        ActiveSheet.Shapes("Group 8").Visible=False
      Else
        ActiveSheet.Shapes("Group 8").Visible=True
    End if
End Sub
24. september 2019 - 14:47 #2
Et par varianter
Sub ShowHide()
    With ActiveSheet.Shapes("Group 8")
        .Visible = NOT .Visible
    End With
End Sub

Sub ShowHide_2()
    ActiveSheet.Shapes("Group 8").Visible = NOT ActiveSheet.Shapes("Group 8").Visible
End Sbu
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester