Thread: ThisWorkbook
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
DejaVu[_61_] DejaVu[_61_] is offline
external usenet poster
 
Posts: 1
Default ThisWorkbook


I have a workbook with one worksheet in it that I use as a template to
create a new sheet for each of my sales managers. In *ThisWorkbook*
(in my template) I have some coding. It's on the workbook level and
does a few various things such as; depending on which cell they have
selected, Range("A1") will say various things. All of this coding in
*ThisWorkbook* is saved in my template book... I want it to be in each
workbook created for each sales manager.
Here is a snippet of my code:
-Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal
Target As Range)

Select Case Target.Row
Case Is = 3
Range("B20").Formula = "=if(B3="""","""",1-(B23/B3))"-

I'm not even sure if this is possible, or if there is an easier way to
do what I'm wanting... TIA
DejaVu


--
DejaVu
------------------------------------------------------------------------
DejaVu's Profile: http://www.excelforum.com/member.php...o&userid=22629
View this thread: http://www.excelforum.com/showthread...hreadid=515349