Lock a range of columns across a number of sheets and password protect them and prompt for a password on unlocking

[Shootster]

Hi
i would like some help with vba code please

I have 6 sheets, with data that need to be hidden and locked with a password
Columns("AC:AJ").Columns("AS:AX"). these are the ranges that need to be hidden
i would like to use 2 buttons, one to lock and hide and the other to unlock and show, but prompt for a password
maybe a pop up message for incorrect password
ideally this would be applied to all sheets at the same time