VBA code to get the latest number

Hi,

I am trying to open most latest & greatest .pdf file from a folder that has lets say, 123456AA.pdf, 123456AB.pdf, 123456AC.pdf, 123456AD,......123456BW.pdf

I need to open the 123456BW.pdf. I have VBA code as follows.



Sub OpenPDFdoc()

Dim Folder As String

Folder = Left(ActiveCell.Value, 3)

On Error GoTo 1

ActiveWorkbook.FollowHyperlink "U:\Engineering\Design\DWG\" & Folder & "\" & ActiveCell.Value & ".pdf", NewWindow:=True

Exit Sub

1: MsgBox "File Cannot Be Opened"

End Sub



With this code I can open a specific folder. But I want to open the latest file and open it.

Any help on vba would be highly appreciated.

Thanks.

Mashiul

Hi dflak,

Thanks very much for your code. It worked perfectly.

Mashiul