04-01-2012, 17:53
Olá
O seguinte código abre uma janela de diálogo que me permite seleccionar um ou mais ficheiros e listar esses mesmo ficheiros numa listbox, no entanto o que aparece na listbox é o caminho do ficheiro, por exemplo, C:\Pasta1\Pasta2\Ficheiro.pdf. Alguém sabe se é possível listar apenas o nome do ficheiro e a extensão? Ou seja, Ficheiro.pdf, por exemplo.
O seguinte código abre uma janela de diálogo que me permite seleccionar um ou mais ficheiros e listar esses mesmo ficheiros numa listbox, no entanto o que aparece na listbox é o caminho do ficheiro, por exemplo, C:\Pasta1\Pasta2\Ficheiro.pdf. Alguém sabe se é possível listar apenas o nome do ficheiro e a extensão? Ou seja, Ficheiro.pdf, por exemplo.
Código:
Private Sub btnSelect()
Dim f As Object
Dim varFile As Variant
Set f = Application.FileDialog(3)
f.AllowMultiSelect = True
If f.Show = True Then
For Each varFile In f.SelectedItems
Me.Lboxfile.AddItem varFile
Next
End If
End Sub