Dear friends your expertise is required for a piece of code that would be
attached with a button which upon being clicked shall ask in a msgbox:
"You sure the information is complete and correct?"
and upon clicking the "YES" all the entries would be frozen / cells locked,
except for a column A:A.

Thanx Guys!!!

Check your other post.

FARAZ QURESHI wrote:

Dear friends your expertise is required for a piece of code that would be
attached with a button which upon being clicked shall ask in a msgbox:
"You sure the information is complete and correct?"
and upon clicking the "YES" all the entries would be frozen / cells locked,
except for a column A:A.

Thanx Guys!!!

--

Dave Peterson

Faraz,
Right-click on the A at the top of column A. Select Format Cells. On the
protection tab, uncheck Locked. This will prevent column A from being
protected. Your button code:

Sub LockIt()
If MsgBox("Are you sure your entries are " _
& "correct and complete?", vbYesNo) = vbYes _
Then ActiveSheet.Protect "abc"
End Sub

Put this code in a standard module. Insert a button from the forms toolbar
on the worksheet and assign this macro to it. The "abc" is the password.
Change as desired. Hope this helps! James


"FARAZ QURESHI" wrote in message
...
Dear friends your expertise is required for a piece of code that would be
attached with a button which upon being clicked shall ask in a msgbox:
"You sure the information is complete and correct?"
and upon clicking the "YES" all the entries would be frozen / cells
locked,
except for a column A:A.

Thanx Guys!!!

You can use the following code on command click event ....

If MsgBox("Your Message.....", vbYesNo) = vbYes Then
Columns("A:A").Select
Selection.Locked = False
Selection.FormulaHidden = False
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End If

:) have fun!!!!!!!

Gaurav Kothari



"FARAZ QURESHI" wrote:

Dear friends your expertise is required for a piece of code that would be
attached with a button which upon being clicked shall ask in a msgbox:
"You sure the information is complete and correct?"
and upon clicking the "YES" all the entries would be frozen / cells locked,
except for a column A:A.

Thanx Guys!!!