اشکان طاهری
اشکان طاهری

1 سال پیش

پاسخ

آدرس دهی به فایل دیگر در محیط vba

با سلام

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

حالا سوالی که دارم میخوام این جستجو را از یه فایل اکسل دیگه انجام بده آیا امکانش هست؟

گزارش تخلف

سؤالات مربوط به VBA در اکسل

برو به

به پشتیبانی نیاز داری؟

در صورتی که

  • در کار با بتازون مشکلی دارید
  • در مورد خدمات بتازون سؤالی دارید
  • نظراتی را برای ارتقا و بهبود خدمات دارید

خوشحال میشیم که حتماً با ما در میان بزارید

سلام،

برای ادرس دهی به شیت یک فایل دیگر از کد زیر استفاده می شود. سلول A1 از شیت test از فایل data.xlsx

Workbooks("data.xlsx").Sheets("test ").Cells(1, 1).Value
Workbooks("data.xlsx").Sheets("test ").Range("A1").Value

نکته این هست که برای این حالت باید هر دو فایل باز باشند.

حالا اگر باز نبود؟ خب باVBA بازش میکنیم (فرض هر دو فایل کنار هم هستند) و بعد از خوندن اطلاعات هم با VBA می بندیم!

گرفتن آدرس پوشه ای که فایل با یوزر فرم داخلش هست 
FolderPath = Application.ActiveWorkbook.Path & "\"

باز کردن فایل جدول
Dim dataWorkbook As Workbook
Set dataWorkbook = Workbooks.Open(FolderPath & "data.xlsx")

خواندن اطلاعات
dataWorkbook.Sheets("test ").Range("A1").Value

بستن فایل
dataWorkbook.Close

گزارش تخلف

برو به

درباره ما

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