Print specific tabs when tab name is a cell value

[OhioExcelGuy]

I am a new member but have found numerous posts here that have helped tremendously in the past. I do have one I cannot seem to figure out or find a previous thread that will cover.

I have a workbook with numerous tabs. Some of which are are named as years (2020, 2021, 2022, etc...). What I am wanting to do is enter a specific year in a cell in an "Input" tab and have a module (that can be added to a button) that recognizes that cell value and prints the corresponding tab with that year as the name. The "Input" sheet is Sheet26, if that is needed for the code.

So in summary, I would like to be able to enter "2022" into cell D3 of the "Input" tab, then be able to press a button and the tab named "2022" will be printed to pdf.

I apologize if there is already a thread that covers this. If there is, can someone point me to it?

Thanks in advance!

 

[OhioExcelGuy]

I am a new member but have found numerous posts here that have helped tremendously in the past. I do have one I cannot seem to figure out or find a previous thread that will cover.

I have a workbook with numerous tabs. Some of which are are named as years (2020, 2021, 2022, etc...). What I am wanting to do is enter a specific year in a cell in an "Input" tab and have a module (that can be added to a button) that recognizes that cell value and prints the corresponding tab with that year as the name. The "Input" sheet is Sheet26, if that is needed for the code.

So in summary, I would like to be able to enter "2022" into cell D3 of the "Input" tab, then be able to press a button and the tab named "2022" will be printed to pdf.

I apologize if there is already a thread that covers this. If there is, can someone point me to it?

Thanks in advance!

I should also add that I would like it to print to the same file location as the workbook is saved. I have already figured out code to print multiple tabs to a pdf using the code below, but cannot figure out how to include a cell reference as a sheet name instead of entering the sheet name itself.

Sub Print_Calculations()

Dim PDFfile As String

PDFfile = ActiveWorkbook.Path & "\" & Worksheets("Index").Range("A8") & " " & Worksheets("Index").Range("B8") & ".pdf"
Sheets(Array("2016", "2017")).Select
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=PDFfile, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False

MsgBox "PDF Files have been created"

End Sub

 

[OhioExcelGuy]

I fumbled upon the solution in another thread here:

VBA reference cell value to be worksheet name

Hello, Sorry if this a basic question, I'm learning vba and have WORKSHEETNAME in cell A1, it is also the name of a tab in my workbook. I'm not sure what the code is to get the value of cell A1 and make it into a worksheet variable in VBA that i can access. any expertise is greatly...

www.mrexcel.com