می تونید با استفاده از تابع revstr جایگاه آخرین "\" رو در آدرس کلی پیدا کنید و از سمت راست با استفاده از تابع right تا همونجا بکنید .

با سلام خدمت آقای کاویان عزیز
اگر بخواهیم فقط نام فایل رو بدون مسیرش داشته باشیم باید چکار کنیم.
با تشکر پیشاپیش

سلام
از OCX ها یا DLL های ذکر شده در پست های بالا نمی توان برای اینکار بهره برد ولی OCX های زیادی برای بازکردن فایل PDF در درون اکسس موجود می باشد .
با سپاس
کاویان

باسلام آیا فایل pdf را هم از این طریق می توان باز نمود راهنمایی فرمایید

با سلام
شما برای استفاده از امکانات عمومی آفیس مانند همین امکان باز کردن فایل که در تمامی نرم افزار های آفیس مشترک است از object یاد شده استفاده کنید و کار با هر یک از برنامه دیگر آفیس از object مربوط به آن استفاده کنید .
مثلا اگر بخواهید از درون یک فایل اکسس با استفاده از کد نویسی اطلاعات درون یک فایل اکسل را بدون باز کردن محیط نرم افزار اکسل فراخوانی کنید بایستی از microsoft excel x object library استفاده کنید .
به طور کلی به فراخور ارتباط با هر برنامه یا ocx بایستی از توابع منحصر به فرد آن که در قالب یک فایل برای برنامه نویسان ایجاد شده است استفاده نمایید .
در خصوص سوال دوم این تابع که یکی از مجموعه توابع زیر می باشد :
CBool
CByte
CCur
CDate
CDbl
CDec
CInt
CLng
CLngLng
CLngPtr
CSng
CStr
CVar
برای تبدیل اجباری نوع متغیر ها به یکدیگر به کار می رود .
در مورد مثال فوق بدون استفاده از این تابع نیز به هدف می رسیم ولی معمولا برنامه نویسان برای جلوگیری از بروز خطاهای احتمالی متغیر های لازم را به نوع مورد نظر خود تبدیل می کنند .
با سپاس
کاویان

از توجه شما بسیار سپاسگزارم
در راه حل شما 2تا سئوال داشتم
1- اگه امکان داره من را راهنمایی بفرمائید که چطور می توان با این قبیل Object ها بیشتر آشنا شوم؟
2- کار تابع CStr چیست؟

با سلام
بهترین راه حل استفاده از رفرنس microsoft office x object library در قسمت VBE می باشد .
در فایل نمونه از این مجموعه توابع برای رسیدن به هدف مورد نظر شما استفاده شده است .
با سپاس
کاویان

سلام مجدد
من یکی از راه حل های سئوالم رو در یک تالار گفتگو خارجی پیدا کردم و خیلی ساده بود و کد VBA آن به صورت زیر است:
Private Sub Command24_Click()
Text35.SetFocus
SendKeys ("^k")
End Sub

حالا اگه امکان داشته باشه که از طریق خود پنجره Explorer به این امر دست یافت برای کاربران من راحت و روان تر هستش که درصورت امکان من را راهنمایی بفرمائید