سلام
با کد بالا که مربوط به رفرنس Microsoft Office 11.0 Object Library هست میتونید واردهاردبشید
انتخاب چندتایی را غیرفعال میکنه .AllowMultiSelect = False

محدودیت نمایش فایلها .Filters.Add "Images", "*.gif; *.jpg; *.jpeg; *.png; *.bmp", 1

تایتل پنجره انتخاب فایل .Title = "ÇäÊÎÇÈ ÝÇíá"
نهایتا آدرس فایل داخل متغیر ذخیره میشه strFile