View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Helmut Weber[_2_] Helmut Weber[_2_] is offline
external usenet poster
 
Posts: 163
Default password protection via code

Hi,

works allright for me here and now.
Of course,

select Case Left(ActiveWorkbook.ActiveSheet.Name, 2)
Case "PR"

is case sensitive.

--

Helmut Weber

Win XP, Office 2003
"red.sys" & Chr$(64) & "t-online.de"