Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 842
  • Last Modified:

Unrestrict restricted scroll area

Dear Experts:

below macro restricts the user to a specific area of a worksheet.

I inserted this sub into the sheet module of the sheet on which I would like to limit the scroll area.

I wonder which code undoes this, i.e. the scroll area is to be 'unrectricted' for the active worksheet.

Help is much appreciated. Thank you very much in advance.

Regards, Andreas


Private Sub Worksheet_Activate()
RestrictUser Range("A1:EO44")
End Sub


Sub RestrictUser(WhichRange As Range)

With WhichRange.Worksheet
.ScrollArea = WhichRange.Areas(1).Address
End With
End Sub

Open in new window

0
AndreasHermle
Asked:
AndreasHermle
1 Solution
 
Rory ArchibaldCommented:
Private Sub Worksheet_Activate()
Me.Scrollarea = ""
End Sub

Open in new window


would do it.
0
 
AndreasHermleAuthor Commented:
Hi rorya:

ok, thank you very much for your quick and professional help.

Regards, Andreas
0

Featured Post

Free Tool: Subnet Calculator

The subnet calculator helps you design networks by taking an IP address and network mask and returning information such as network, broadcast address, and host range.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now