sheet protection

[[email protected]]

Hi and thanks in advance,
I have this problem of unprotecting a sheet, allowing for certain
features and want to protect that with a password again. When I do
that, I am getting syntax error. Someone please help,

code:
Sub Macro4()
ActiveSheet.Unprotect Password:="hiacsc"

ActiveSheet.Protect Password:="hiacsc" DrawingObjects:=True, _
Contents:=True, Scenarios:=True , AllowFormattingCells:=True,
_
AllowFormatingColumns:=True, _
AllowFormattingRows:=True, AllowSorting:=True,
AllowFiltering:=True
ActiveSheet.EnableSelection = xlNoRestrictions
End Sub

If I omit Password for protecting the sheet it does what I want, but
when I protect that with Password atrribute, it is giving me syntax
error.

[Norman Jones]

Hi Nasir,

Try changing:

> ActiveSheet.Protect Password:="hiacsc" DrawingObjects:=True, _

to

ActiveSheet.Protect Password:="hiacsc", DrawingObjects:=True, _


Note the comma after "hiacsc"


---
Regards,
Norman



<[email protected]> wrote in message
news:[email protected]...
> Hi and thanks in advance,
> I have this problem of unprotecting a sheet, allowing for certain
> features and want to protect that with a password again. When I do
> that, I am getting syntax error. Someone please help,
>
> code:
> Sub Macro4()
> ActiveSheet.Unprotect Password:="hiacsc"
>
> ActiveSheet.Protect Password:="hiacsc" DrawingObjects:=True, _
> Contents:=True, Scenarios:=True , AllowFormattingCells:=True,
> _
> AllowFormatingColumns:=True, _
> AllowFormattingRows:=True, AllowSorting:=True,
> AllowFiltering:=True
> ActiveSheet.EnableSelection = xlNoRestrictions
> End Sub
>
> If I omit Password for protecting the sheet it does what I want, but
> when I protect that with Password atrribute, it is giving me syntax
> error.
>

[Ardus Petus]

You forgot a comma right between "hiacsc" and DrawingObjects

HTH
--
AP

<[email protected]> a écrit dans le message de news:
[email protected]...
> Hi and thanks in advance,
> I have this problem of unprotecting a sheet, allowing for certain
> features and want to protect that with a password again. When I do
> that, I am getting syntax error. Someone please help,
>
> code:
> Sub Macro4()
> ActiveSheet.Unprotect Password:="hiacsc"
>
> ActiveSheet.Protect Password:="hiacsc" DrawingObjects:=True, _
> Contents:=True, Scenarios:=True , AllowFormattingCells:=True,
> _
> AllowFormatingColumns:=True, _
> AllowFormattingRows:=True, AllowSorting:=True,
> AllowFiltering:=True
> ActiveSheet.EnableSelection = xlNoRestrictions
> End Sub
>
> If I omit Password for protecting the sheet it does what I want, but
> when I protect that with Password atrribute, it is giving me syntax
> error.
>