CodeItBetter Programming Another VB Programming Blog

'Forms - How to Drag files from Windows Explorer to a form and get their full path

Option Explicit
 
'Set the Form OLEDropMode Property to 1 - manual
Private Sub Form_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, _
    Shift As Integer, X As Single, Y As Single)
    Dim I As Integer
    For I = 1 To Data.Files.Count
        Debug.Print Data.Files(I)
    Next I
End Sub