display/show and print a PDF file selected on a listbox on a UserForm

Hola manito, welcome to the forum
To select the pirnter

Function SelePrn()
    Application.Dialogs(xlDialogPrinterSetup).Show
End Function

to print the pdf file without opening

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
                                      (ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
                                       ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Const SW_HIDE            As Long = 0&
Sub PrintFile(strFilePath As String)
   ShellExecute Application.hWnd, "Print", strFilePath, 0&, 0&, SW_HIDE
End Sub

hoipe it helps

Else Google

excel vba to print selected pdf file without opening

Happy coding

if the list of PDF files is a listbox then you can just click it to select that file and then add code to print the selected file.
If you want to open it that you will need code to open the pdf file.

Syntax: OpenPDFFile(full path and filename here)

Public Function OpenPDFFile(tFilename As String) As Boolean
Dim myShell As Object
Dim fOpen       As Boolean
If Len(Trim(tFilename)) <= 0 Then Exit Function
fOpen = True
On Error GoTo NotOpen
ShellExecute 0, "Open", tFilename, "", "", vbNormalNoFocus
endMacro:
Err.Clear
On Error GoTo 0
OpenPDFFile = fOpen
Exit Function

NotOpen:
fOpen = False
Resume endMacro
End Function

is there a way to show or display the selected PDF file in the list in a popup or second UserForm ?

You can use a webbrowser element in a userform.
See example (unzip first)

@dotchiejack: thanks for sharing, nice one

@ Keebellak: Welcome

@dotchiejack: I couldn't leave it alone
I made some minor modifications to the form and added 2 controls

@ Keebellah, nice job

Can you explain what you mean by

is there also a way to filter those files with a text box and let just those files appear in the list box

Do you mean just show a list of files that answer to a particular description?
What description/filter?
What would you like to filter.
Give facts, not just let's assume ....

In the Userform where you have the Listbox you can add a textbox where you enter part of the filename you want to filter the list on.
Use this in the code that fills your listbox to see if the filename matches part of the text and if so, you show it.

Use the InsStr() VBA function and remember it's case sensitive
The function returns 0 if no match is found

something like:

If Instr(1,(lcase(filename),lcase(textbox string)) > 0 then 

End If

Do you know how to write that code?
If not, attach the file you have now (non-private data please) and I'll help you out.

I'll take a look and update asap

Something like this?
Filter as you type in the textbox.

I modified your Userform2 and used part of the pdf viewer from as well.
Give it a try. I added a textbox and an option button on your Userform2 but if you place the mouse over these two you will understand what you have to do.

Minor corrections (cosmetic) and reduced your UserForm1 code a little.
TIP: replace the hard-coded file path in this module, it is very bad programming

Vba is fun and quite easy realy.
Glad you’re happy.
Thanks for the spanish offer

Hi, I was away for two days.
I added the delete button for you