سوال: باز کردن فایل اکسل توسط کلیدی در فرم اکسس [بایگانی]

G.hemati

سه شنبه 19 آذر 1392, 14:40 عصر

با سلام
من در فایل پیوست میخوام فایل اکسل رو توسط کلیدی که در فرم اکسس وجود دارد باز کنم

من از طریق ویزارد اکسس کلیدی قرار دادم که توسط اون محیط اکسل فراخوانی میشه که نیاز با آدرس دهی مجدد در آن محیط میباشد تا به فایل مورد نظر دسترسی پیدا کرد .

میخوام با زدن کلید این مسیر خلاصه بشه و فایل اکسل موجود در مسیر برنامه باز بشه

ممنون

Abbas Amiri

سه شنبه 19 آذر 1392, 18:35 عصر

با سلام
من در فایل پیوست میخوام فایل اکسل رو توسط کلیدی که در فرم اکسس وجود دارد باز کنم

من از طریق ویزارد اکسس کلیدی قرار دادم که توسط اون محیط اکسل فراخوانی میشه که نیاز با آدرس دهی مجدد در آن محیط میباشد تا به فایل مورد نظر دسترسی پیدا کرد .

میخوام با زدن کلید این مسیر خلاصه بشه و فایل اکسل موجود در مسیر برنامه باز بشه

ممنون

از کدهای زیر استفاده کنید:

Dim strPath As String
Dim ExcelApp As Object
Dim ExcelWorkbook As Object
strPath = CurrentProject.Path & "\myExcelFileName.xlsx"
Set ExcelApp = CreateObject("Excel.Application")
ExcelApp.Visible = True
Set ExcelWorkbook = ExcelApp.Workbooks.Open(strPath, , False)

rezabahador

دوشنبه 14 دی 1394, 14:19 عصر

از کدهای زیر استفاده کنید:

Dim strPath As String
Dim ExcelApp As Object
Dim ExcelWorkbook As Object
strPath = CurrentProject.Path & "\myExcelFileName.xlsx"
Set ExcelApp = CreateObject("Excel.Application")
ExcelApp.Visible = True
Set ExcelWorkbook = ExcelApp.Workbooks.Open(strPath, , False)

سلام
منم این مشکل رو دارم ولی برای فایل پاورپوینت
لطف می کنید کد برای فایل پاور پوینت هم بزارید