How to print a sheet based on criteria of a group of cells

[rickadams]

Hi,
I am attempting to print volunteer sign in sheets based on active volunteers and not print the sheets for inactive ones. The organization can have up to 50 volunteers on the roster for bi weekly time and may only have 6-10 active during a given 2 week period. We need to track their hours because some are here for community service and some are here for CEU time.
If a particular volunteer is on the schedule I click a box next to their name with a “Y” and not active I enter “N”. I only want the 2 week sheets (all on 1 page) to print if the Active is “Y”.
First name stored in K12:K65, last Names are stored L12:L65 in a sort-able list Active or inactive criteria is stored in cells O12:O65
Each sheet populates with their first and last name and id number and the time sheet is now manually printed by sequence number.

First	Last		ID #	Active	SEQUENCE
JANE	DOE		125	Y	10
NOT	HERE		126	N	11

<tbody>
</tbody>

ETC

			Bi Weekly Time Sheet
<tbody> </tbody>
Name:	JANE	DOE		Volunteer Number	125
			Other Period
Week 1:		January 21, 2019	January 27, 2019
		Morning Hours	Afternoon Hours	Total Hours	Office Use Only
ROUND TO 1/4 HOUR		Time In	Time Out	Time In	Time Out		Regular	Overtime
Monday	1/21
Tuesday	1/22
Wednesday	1/23
Thursday	1/24
Friday	1/25
Saturday	1/26
Sunday	1/27
Totals
Time sheet must be filled out daily.
Week 2 :		January 28, 2019	February 3, 2019
		Morning Hours	Afternoon Hours	Total Hours	Office Use Only
ROUND TO 1/4 HOUR		Time In	Time Out	Time In	Time Out		Regular	Overtime
Monday	1/28
Tuesday	1/29
Wednesday	1/30
Thursday	1/31
Friday	2/1
Saturday	2/2
Sunday	2/3
Totals
Hours Total – Week 1 and 2
Signatures
Volunteer	Date	Department Supervisor	Date
Supervisor	Date	Other Department	Date
TIME SHEET MUST BE SIGNED.

<tbody>
</tbody>

Thank you for your help.

 

[CatyH]

I think what I would do would be to
1. create an index / roster of the ACTIVE ones, then
2. make that named list a data validation (drop down) cell that you can reference via VBA code.

Here is some code I used once that printed a set of pdfs based on a Data-Validation (drop down list) in cell E3 of NameOfSheet). Hope this helps!

Sub NameOfSub()
Dim FolderName As String, fName As String
Dim inputRange As Range, r As Range, c As Range


Application.ScreenUpdating = False
'''' Open file dialog and choose folder
With Application.FileDialog(msoFileDialogFolderPicker)
.AllowMultiSelect = False
If .Show = True Then
FolderName = .SelectedItems(1) & ""
Else
Exit Sub
End If
End With


'''' Location of DataValidation cell
Set r = Worksheets("NameOfSheet").Range("e3")
'''' Get DataValidation values
Set inputRange = Evaluate(r.Validation.Formula1)


'''' Loop through DataValidation list
For Each c In inputRange

If c.Value = "" Then
c.Value = "NoProgramName"
Else
End If

r.Value = c.Value
fName = c.Value
'''' Save as pdf
Sheets("Dashboard").ExportAsFixedFormat Type:=xlTypePDF, Filename:=FolderName & fName, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True
Next c
Application.ScreenUpdating = True
End Sub

Hi,
I am attempting to print volunteer sign in sheets based on active volunteers and not print the sheets for inactive ones.

 

[rickadams]

CatyH, I feel bad because I did not thank you For some reason I did not see your response until I looked up my posts. Thank you so much I will try your suggestion!

 

[CatyH]

CatyH,...

No worries - probably just a setting somewhere. Happens to me all the time on my cell but do let me know how it works - someone on this forum helped me with that very code (and more recently with a different conundrum) so I like to help if I can. This forum is an amazing place to swap ideas and get help!