I found this code which works very well for my use.
As my filtered list data set includes an unknown number of "Y" i need to include a variable to relplace the fixed +5 in the code below.
Any assistance appreciated.
Sub SetPrint()
Set rowNo = Range("A:A").Find("Y", LookIn:=xlValues...