همه برنامه های اداری مایکروسافت از اتوماسیون پشتیبانی می کنند. آنها می توانند به عنوان سرورهای COM اجرا شوند و از اسکریپت های داخلی یا مستندات داخلی استفاده شوند. بنابراین ، می توانید از طریق اسکریپت vba داده ها را در یک سند اکسل بنویسید.
ضروری است
- - برنامه Microsoft Excel نصب شده ؛
- - ویرایشگر / ویرایشگر متن ویژوال بیسیک.
دستورالعمل ها
مرحله 1
یک کانتینر برای میزبانی کد vba ایجاد کنید. اگر قرار است اسکریپت در سندی جاسازی شود ، پرونده مناسب را در Microsoft Excel بارگذاری کنید. با فشار دادن Alt + F11 ویرایشگر ویژوال بیسیک را باز کنید. در صورت لزوم ، یک ماژول جدید ایجاد کنید (مورد ماژول در فهرست وارد کردن). یکی از ماژول ها یا فرم ها را باز کنید. یک کنترل کننده برای کنترل فرم خود ایجاد کنید ، یا فقط یک رویه را به یک ماژول اضافه کنید. مثلا:
زیر آزمون ()
پایان دادن به زیر
اگر در حال توسعه یک اسکریپت مستقل هستید (یعنی تحت Windows Script Host اجرا می شود) ، به سادگی یک فایل با پسوند vbs در یک ویرایشگر متن ایجاد کنید.
گام 2
در اسکریپت تعبیه شده در سند ، اظهارات متغیر را در ابتدای روش اضافه کنید:
کتاب کار کم مانند اکسل. کتاب کار
صفحه oSheet به عنوان Excel. Worksheet
مورد اول برای ذخیره سازی ارجاع به یک شیbook کتاب کار اکسل است ، و مورد دوم برای یک صفحه است.
مرحله 3
متغیرها را با ارجاعات شی object اولیه کنید. در اسکریپت vbs ، یک آبجکت برنامه اکسل ایجاد کنید (این اکسل را به عنوان یک سرور COM راه اندازی می کند):
تنظیم oApplication = CreateObject ("Excel. Application").
در اسکریپت جاسازی شده در سند ، از Global Application object به جای متغیر oApplication استفاده می شود که اشاره به شی global برنامه فعلی دارد. یک کتاب کار جدید اکسل را انتخاب کنید یا باز کنید. مثلا:
تنظیم oWorkbook = Application. Workbooks (1)
تنظیم oWorkbook = Application. Workbooks ("Book1")
تنظیم oWorkbook = oApplication. Workbooks. Open ("D: / vic / related / tmp / test.xls")
پیوندی به صفحه مورد نظر کتاب دریافت کنید:
تنظیم oSheet = oApplication. Sheets ("Sheet1")
مرحله 4
از اسکریپت vba برای اکسل اطلاعات بنویسید. از مجموعه Cells ، که خاصیت شی sheet صفحه کارنامه است که در مرحله قبل به آن اشاره شده است ، در متغیر oSheet استفاده کنید. یک مثال از نوشتن یک رشته در یک سلول ممکن است به این شکل باشد:
oSheet. Cells (1 ، 1) = "رشته در سلول A1 نوشته خواهد شد"
مرحله 5
در اسکریپت vbs ، کد را برای ذخیره داده اضافه کرده و برنامه Excel را خاموش کنید:
o کتاب کار. ذخیره کنید
برنامه کاربردی
مرحله 6
اسکریپت را ذخیره و اجرا کنید. در ویرایشگر ویژوال بیسیک ، Ctrl + S را فشار دهید و سپس مکان نما را در متن روش قرار دهید و F5 را فشار دهید. اسکریپت vbs را در دیسک ذخیره کرده و سپس آن را به عنوان یک فایل معمولی اجرا کنید.
