Public Worksheet Declaration

I'm using a public declaration for a worksheet but I seem to have to initialize it in each routine. Is there a way to set it and leave it?

So in a module I have:

Public BI as worksheet

Sub Prog1()
   Set BI = sheets("BasicInfo")

'code
end sub

Sub Prog2()
  Set BI = Sheets("BasicInfo")

'code
end sub