Dear Friend theDBguy. It's working perfectly. Please accepts my sincere apologies for the trouble I gave youy, but there was one extra line in the previous code and the result was the same. Now everything is working as shown in the image. Many thanks to you and all the colleagues here on the...
Im sorry.
Function mostrarArquivosWSH(nompasta) As String
Dim Fso As Object 'New FileSystemObject
Dim Pasta As Object 'Folder
Dim arquivos As Object 'Files
Dim arquivo As Object 'File
Dim Devolve As String
On Error GoTo mostrararquivosWSH_Err
Set Fso =...
This is the code i have in my listbox
Private Sub Form_Load()
Dim Caminho As String
Caminho = "c:\Patrigest\Imóveis" & "\" & Form_frmimovel.txtSeparar.Value & "\" & Form_frmimovel.txt1.Value
If Len(Caminho) <> 0 Then
Me.Lista6 = Trim(Caminho)
Me.Lista6.RowSource = ""...
Good afternoon everyone. I have a listbox with about 30 different documents. These appear with the full path like this:
c:\Patrigest\Properties\5467-RC--36 - 0\Documents\Invoice_Receipt_Pinto Ribeiro.pdf.
What I wanted was for the result to be just:
Invoice_Receipt_Pinto Ribeiro.pdf. In other...
Good afternoon. I don't know if my question is relevant, but I would like to know if it is possible when sending a document to the printer, instead of opening it with the local printer, to open it with the Microsoft PrintToPDF option. Thank you for your help.