Skiftevis skjule/vise alt indhold/formatering af celler

Det kommer an på hvordan du selv gør det nu,
så om min metode er nemmere vil bero på dette.?

efternærlæsning fremgår det jo hvordan du gør (ups):-)

jeg vil flytte cellene til et andet sted (ledigt område)
og derefter hente dem igen efter behov.

En anden metode kunne måske bruges.

formater først cellerne som de skal se ud i det ene tilfælde.
Gå i formater / Typografi og giv så den formatering et typografinavn.

Formater cellerne som de skal se ud i tilfælde 2.
Bemærk at i stedet for skriftfarve hvid jkan du bruge Brugerdefuneret format ;;;
så er celleværdi skjult uanset farve
Gå i formater / Typografi og giv så den formatering et typografinavn.

Du vil så kunne nøjes med to små makroer fx.

Sub Invisible()
    Range("C5:G17").Style = "Usynlig"
    Application.DisplayCommentIndicator = xlNoIndicator
End Sub

Sub All_Visible()
    Range("C5:G17").Style = "Alt_synlig"
    Application.DisplayCommentIndicator = xlCommentIndicatorOnly
End Sub

Tak for svarene. Det er begge gode løsninger. Jeg har løst problemet ved af hide/skjule (hidden = true på rows) rækkerne med cellerne. Det var vel også det Bak foreslå. Hvis I begge laver et svar kan i dele pointene :-) Tak for hjælpen

ok her er koden jeg havde valgt.

Sub Skjul()
'flytter "celle" til kolonne 12, som er skjult - (Cut=Kopier og Slet)
If Cells(10, 2) <> "" Then Cells(10, 2).Cut Destination:=Cells(10, 12): Exit Sub
If Cells(10, 12) <> "" Then Cells(10, 12).Cut Destination:=Cells(10, 2): Exit Sub
End Sub

*