Resize a password protected page

Prev: Mouse Scroll event in listbox kills Excel
Next: SEARCH IS NOT WORKING

From: Michael Lanier on 17 May 2010 20:39

---

I need to resize a password protected page. The current macro works
great when the page is not password protected.

Private Sub Worksheet_Change(ByVal Target As Range)
If Range("G15").Value = "Resize" Then
ActiveWindow.DisplayHeadings = False
Columns("C:C").ColumnWidth = Range("C17").Value
Columns("G:G").ColumnWidth = Range("C18").Value
Rows("1:1").RowHeight = Range("C15").Value
Rows("6:6").RowHeight = Range("C16").Value
End If
End Sub

Can you help with this. Let's presume the password is "BigBird."

Thanks,

Michael

From: Michael Lanier on 17 May 2010 21:51

---

Thanks Jim for your help. I'll give it a try in the morning when I
can think better.

Michael

 | 
Pages: 1
Prev: Mouse Scroll event in listbox kills Excel
Next: SEARCH IS NOT WORKING