Find Printed Range using VBA

[ChubbyPenguin]

Hi, I'm trying to log times when certain sections of a sheet are printed. I can use the Workbook_BeforePrint event to trigger the macro, but ActiveSheet.Range("Print_Area").Address gives the entire set print area instead of the specific printed range. I can use the selected range, but there's always a chance a specific "page" of the print area is printed instead of the selection.

Is there a way to target the printed range instead of the entire print area? Preferrably looking for a solution without implementing a button and an input for a page/range if it's possible.

 

[Skyybot]

This will give you the Range of the current Window view.

Application.ActiveWindow.VisibleRange.Address

 

[jolivanes]

And what needs to be done with the answer?

 

[ChubbyPenguin]

Let me see if I can give a better picture:

I have print areas setup e.g. $E$1:$M$22,$X$1:$AF$22,$AQ$1:$AY$22,$E$24:$M$45,$X$24:$AF$45,$AQ$24:$AY$45
I would like to be able to tell which area(s) are being printed so I can keep a separate table of which section was printed and when.

Checking the selection or visible area probably would be good enough most of the time, but it wouldn't work if sections were printed by selecting the range of pages. If there isn't a way to tell areas E$1:$M$22, $X$1:$AF$22 were printed I may end up going with that, or forcing printing to be done through a macro.