Double click to print active range
 

(Excel 97)
I have coded a print function that is activated on a double-click event.
When the user double clicks a named range (employee name), the code selects
a finite range and prints it. The problem is I have a lot of employees to
accommodate, and I would like to avoid writing an event for each one.

Is there a way to write the code to print the appropriate range (always
3 rows and 15 columns including the active cell) without having to code each
individual employee record? If so, I can use the same workbook in different
offices with varying numbers of employees without having to customize the
application for each location.

Thanks in advance!!

BW

Double click to print active range
 

You don't say if I double click cell F12, do I want to print A10:O12 or
A11:O13 or A12:O14. But this should get you started:

Range(target.row,1).resize(3,15).Printout

If your structure is 3 rows, skip a row, 3 rows, skip a row, etc, then you
could use:

Target.CurrentRegion.Resize(3,15).Printout.

HTH
Bob Umlas
Excel MVP

"Bob Wall" wrote in message
...
(Excel 97)
I have coded a print function that is activated on a double-click event.
When the user double clicks a named range (employee name), the code
selects a finite range and prints it. The problem is I have a lot of
employees to accommodate, and I would like to avoid writing an event for
each one.

Is there a way to write the code to print the appropriate range (always
3 rows and 15 columns including the active cell) without having to code
each individual employee record? If so, I can use the same workbook in
different offices with varying numbers of employees without having to
customize the application for each location.

Thanks in advance!!

BW