Hide sheet

  • Thread starter Thread starter ranswert
  • Start date Start date
R

ranswert

How do I write a procedure that will hide the worksheet except for a certain
range of cells?
 
You can of course hide entire columns and rows, but that means you have to
have a rectangular collection of cells on show.

You could consider masking the cells, set background and foreground colors
the same, lock these cells, unlock the cells you want to show (if need you
need to edit) and then protect the sheet.
 
Sub hidenonused()
With Range("a1:b12")
lr = .Rows.count + 1
'MsgBox lr
lc = .Columns.count + 1
'MsgBox lc
'MsgBox Columns.count
End With
Rows(lr & ":" & Rows.count).Hidden = True
Range(Cells(1, lc), Cells(1, Columns.count)).EntireColumn.Hidden = True
End Sub
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

hide check box 4
Disable/enable or lock/unlock cells in VBA dependent on other cells values 2
hide colum based on cell value on each worksheets 2
Hide Rows if all values are zero 5
Syntax to match sheet by codename 4
SheetCalculate fires all the time 3
Loop to hide sheet based on cell 1
hide multiple worksheets based on a formula value in one cell 1

Back
Top