imposti le proprietā della CD dopodichč:

codice:
On Error GoTo ErrorHandler

  dlgCommonDialog.ShowOpen
  'associ il percorso del file ad un controllo o effettui tutte le operazioni che ti sevono

 
ErrorHandler:
  If Err.Number = cdlCancel Then
    '........  
    Err.Clear
  End If