ماکرونویسی در نرم افزار مایکروسافت ورد (قسمت اول)

به نام خداوند بخشنده و مهربان با آموزش ماکرونویسی در نرم افزار مایکروسافت ورد (قسمت اول) خدمت شما عزیزان و علاقه مندان به یادگیری این نرم افزار ویرایش متن هستیم ، همانطور که مستحضر هستید ماکرونویسی ( ماژول نویسی ) در محیط نرم افزار Word توسط زبان ویژوال بیسیک میسر خواهد شد که به اصطلاح به آن VBA گفته میشود .

کلمه VBA کوتاه شده عبارت Visual Basic For Applications است که شرکت مایکروسافت به منظور افزایش قابلیت نرم افزارهای ارائه شده از قبیل اکسل ، ورد ، اکسس ، پاورپوینت .. این زبان برنامه نویسی (ویژوال بیسیک) را مکمل نرم افزارهای خود قرار داده است .

ماکرونویسی در نرم افزار مایکروسافت ورد (قسمت اول)

قابلیت ماکرونویسی به زبان VBA در نرم افزار مایکروسافت Word بصورت پیشفرض برای کاربران غیرفعال است که شما عزیزان میبایست قبل از شروع ، ابتدا این قابلیت و ابزارهای این بخش را فعال نمایید.

به منظور فعال کردن قابلیت ماکرونویسی ( تب Developer ) به ترتیب زیر عمل کنید :

  1. ابتدا وارد محیط Word Options شوید .
  2. سپس وارد قسمت Customize Ribbon (سمت چپ پنجره Word Options ) شوید .
  3. در پایان تیک مربوط به تب Developer را فعال و روی Ok کلیک کنید .

برای فعال کردن تب Developer از تصویر زیر نیز میتوانید کمک بگیرید :

ماکرونویسی در ورد
آموزش فعالسازی تب Developer در نرم افزار Microsoft Word

همانطور که مشاهده میکنید پس از فعال نمودن تب Developer ، این تب ( Developer ) به سایر زبانه های نرم افزار شما اضافه خواهد شد که ما در جلسات آتی پیرامون دستورات و ابزارهای مهم این بخش صحبت خواهیم کرد .

developerTab
تب Developer در نرم افزار مایکروسافت Word

پیشنهاد سایت : پیشنهاد ما به شما عزیزان و علاقه مندان به یادگیری ، مشاهده یک بار مجموعه آموزشی مقدماتی نرم افزار مایکروسافت ورد می باشد . در صورت وجود هرگونه انتقاد و پیشنهاد پیرامون ” ماکرونویسی در نرم افزار مایکروسافت ورد (قسمت اول) ” میتوانید آن را در قسمت نظرات همین پست ارسال و همچنین در صورت وجود هرگونه سوال پیرامون این مجموعه آموزشی میتوانید آن را در تالار گفتمان سایت مطرح تا در اسرع وقت نسبت به پاسخگویی آن توسط تیم پشتیبانی سایت اقدام گردد.

اکسل لرن
فیسبوک توییتر گوگل + لینکداین تلگرام واتس اپ کلوب

امتیاز شما به مطلب

دوست داشتم: 162
دوست نداشتم: 157
میانگین امتیازات: 1.03

20 دیدگاه در “ماکرونویسی در نرم افزار مایکروسافت ورد (قسمت اول)

الان قسمت های بعدیشو باید از کجا پیدا کنیم؟!
بد نبود یه لینک به قسمت بعدی و قسمت قبلی، زیر مطلبتون اضافه میکردین
باسپاس

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

سلام ممنون از پاسختون
روی برچسب “آموزش پیشرفته ورد” ، که بالای مطلب هست، زدم. بقیه قسمت ها رو راحت پیدا کردم.
برای افراد دیگه ای که دنبالش هستن. این لینک مستقیمش میشه
http://blog.excellearn.ir/category/%D9%85%D8%A7%DB%8C%DA%A9%D8%B1%D9%88%D8%B3%D8%A7%D9%81%D8%AA-%D8%A2%D9%81%DB%8C%D8%B3/%D9%85%D8%A7%DB%8C%DA%A9%D8%B1%D9%88%D8%B3%D8%A7%D9%81%D8%AA-%D9%88%D8%B1%D8%AF/%D8%A2%D9%85%D9%88%D8%B2%D8%B4-%D9%BE%DB%8C%D8%B4%D8%B1%D9%81%D8%AA%D9%87-%D9%88%D8%B1%D8%AF/

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

چجوری میشه برنامه رو نصب کرد؟

من خودم حدود 8 سال پیش ماکرو نوشته بودم که سیستم به محض بالا او مدن …… سرریز میشد و سیستم مجددا ریست می شد
حالا بگم یادم نیست شاید باور نکنید 🙂

موقث باشید

لطفا کامنت تکراری را حذف کنید، خطای داخلی سرور داد ولی ارسال شد

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

ممنون از وقتی که بابت آموزش گذاشتید جناب حسینی. یک سوال هم داشتم از خدمتتون: اگر در فایل وورد جدولی داشته باشیم که در ستونی از این جدول، برای هر رکورد مقداری ثبت شده باشه و بخواهیم که رکوردهایی که مقادیر عددی آن ها برابر با یک مقدار خاص هست (برای مثال برابر با مقدار صفر) از جدول حذف شوند، چگونه می توان این کار را انجام داد؟ می توان از ماکرونویسی استفاده نمود؟ اگر بله روش کار چگونه است؟
(این جدول روزانه توسط نرم افزاری دیگر ایجاد می شود و خروجی وورد آن نیازمند حذف رکوردهای با مقادیر صفر در این ستون می باشد)
پیشاپیش از پاسخگویی تون خیلی خیلی ممنونم

سلام ارادت
متاسفانه بنده تا به امروز این کار رو انجام ندادم ولی با ماکرونویسی قطعا شدنی است.

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

مهندس جان سلام مجدد.
بنده دو تا کد پیدا کردم در این خصوص؛ ولی متاسفانه چون آشنایی خیلی کمی با مباحث ماکرونویسی دارم متوجه خطای این کدها نمیشم. ممنون میشم اگر یه چکی بکنید و بفرمایید مشکل ایم کدها در ران شدن از کجاست.
باز هم سپاس.

کد اول:
این کد رو یکی از دوستان دادن و گفتن میتونید ازش ایده بگیرید، ولی من نمیدونم دقیقا کجاش رو باید تغییرات ایجاد کنم و توسعه بدم.
Sub CheckTableCells()

Dim oCell As Cell
Dim oRow As Row
Dim MyRange As Range

For Each oRow In Selection.Tables(1).Rows
For Each oCell In oRow.Cells
Set MyRange = oCell.Range
MyRange.End = MyRange.End – 1
If Len(MyRange.Text) = 0 Then
MsgBox oCell.RowIndex & ” ” & oCell.ColumnIndex & ” is empty.”
End If
Next oCell
Next oRow

End Sub

کد دوم:
Sub DeleteRow()
    Dim Firstrow As Long
    Dim Lastrow As Long
    Dim Lrow As Long
    With ActiveSheet
        .Select
        Firstrow = .UsedRange.Cells(1).Row
        Lastrow = .UsedRange.Rows(.UsedRange.Rows.Count).Row
        For Lrow = Lastrow To Firstrow Step -1
            With .Cells(Lrow, “A”)
                If Not IsError(.Value) Then
                    If .Value = “Excel” Then .EntireRow.Delete
                End If
            End With
        Next Lrow
    End With
End Sub

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

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

سلام
من قصد دارم درون کد نویسی vba در اکسل کدی رو بنویسم که بتونه یک فایل ورد رو بسازه و بعد از تغییرات ذخیره کنه
این کد رو پیدا کردم
Sub WordTest()
Dim wordApp As Word.Application
Dim wordDoc As Word.Document
Set wordApp = CreateObject(“word. application”)
Set wordDoc = wordApp.Documents.Add
wordDoc.Sections(1).Range.Text = “test for new word document”
wordDoc.SaveAs (“d:\test.docx”)
wordDoc.Close
wordApp.Quit
Set wordApp = Nothing
Set wordDoc = Nothing
End Sub
تیک گزینه microsoft word … v رو هم زدم اما کد با خطا مواجه میشه
بهم می گید ایراد از کجاست؟

با سلام و احترام
لطفا از طریق ربات زیر ، لینک گروه پرسش و پاسخ را دریافت و در گروه تلگرامی ما مطرح نمایید
باتشکر
Masoudhosseini_Bot

سلام
ببخشید من میخوام کدی بنویسم که به محض باز کردن اون فایل ورد یک برنامه ویندوزی مثلا ماشین حساب باز بشه. من اصلا vb کار نکردم.
ممنون

سلام وقتتون بخیر. متاسفانه در قسمت کامنت امکان راهنمایی به خوبی وجود ندارد. خواهشمندم از طریق ربات زیر عضو گروه تلگرامی ما شوید. آنجا در صورت امکان شمارو با تصویر راهنمایی خواهیم نمود.عضویت در گروه تلگرامی ما کاملا رایگان است Masoudhosseini_bot

پاسخ دهید

نشانی ایمیل شما منتشر نخواهد شد. بخش‌های موردنیاز علامت‌گذاری شده‌اند *