Double click to print active range

B

Bob Wall

(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
 
B

Bob Umlas

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
 
Top