89614
🌱 اینجا محل خدمت است🌱 سایت رسمی اکسللرن: 🔻 https://excellearn.ir محصولات فیزیکی اکسل: 🔻 https://shop.excellearn.ir دونیت(حمایت - Donate): 🔻 https://reymit.ir/excellearn
خاطره از شهید :
روزهای اول کلاس های آموزشی ( سربازی ) بود ، به شدت تلفن های آسایشگاهها شلوغ بود ( دوستانی که رفتند خدمت میدونند ) و بودند افرادی که حتی با وجود گذشتن دو هفته از آموزشی هنوز نتونسته بودند با خونه تماس بگیرند ..
جلسه ی اول کلاس تخریب بود ( کلاس آقا مهدی ) ، همون بسم الله کلاس شروع کرد با سربازا شوخی کردن و گفتن و خندیدند ، یهو گفت کی آ نتونستن هنوز به خونه زنگ بزنن ؟ بیان من موبایلم در اختیارتون هرچقدر دوست دارید برید تماس بگیرید ..
میگفت کارم همینه ! هردوره موبایلم رو به سربازا میدم و کلی دعای خیر پدر و مادر و سرباز جمع میکنم .
میگفت یبار نامزد یکی از سربازا زنگ زد به موبایلم ، سربازه بهش نگفته بود که این شماره تماس مربیم هست ، خلاصه همسرم بهم مشکوک شده بود که این خانم جوون با تو چیکار داره 😞🌹
همون روز اول از سربازا خواهش کرد که وقتی زنگ میزنید بگید شماره مربی است نه خودتون🌹
آخرش هم در حین آموزش دچار حادثه و در نهایت به شهادت میرسند ..
آموزش زیر هدیه به روح آقا مهدی عزیز
🌺تنها کاریه که میتونم انجام بدم مربی🌺
🎗 #توابع
❗️مجموعه آموزشی فرمول نویسی در اکسل
❕قسمت چهارم : توابع آماری
ㄟ(ツ)ㄏ
Visual Basic for Applications
🈹 @vba_excel
🈹 www.excellearn.ir ✍___
🈹 لینک دانلود : yon.ir/bF7i
⁉️ مجموعه آموزشی نقشه های حرارتی + VBA
‼️ چهار قسمت کاملا تصویری و با بالاترین کیفیت
🎗 مدرس : مسعود حسینی
🈹 @vba_excel
⁉️ www.excellearn.ir
🎗 #توابع
❗️مجموعه آموزشی فرمول نویسی در اکسل
❕قسمت سوم : Large&Small
ㄟ(ツ)ㄏ
Visual Basic for Applications
🈹 @vba_excel
🈹 www.excellearn.ir ✍___
💢کادر پیغام (Msgbox)💢
✍دستور msgbox معمولا برای ارسال نتایج به کاربر استفاده می شود وهمچنین با استفاده از این دستور می توانید از کاربر سوال کرده و.......
✅فرم کلی این دستور به شکل زیر خواهد بود
Msgbox(prompt[buttons],[ Title],[Help file],[context])
🎯prompt:
پیغامی که نمایش داده خواهدشد
🎯buttons:
دکمه هایی که نمایش داده خواهند شد
🎯Title:
موضوع کادر محاوره
🎯Help file:
فایل ضمیمه راهنما
🎯context:
فایل ضمیمه راهنما
‼️در ساختار msgboxوجودpromptالزامی است وبقیه اختیاری هستند
حالانوبتیم باشه نوبته تمرینه😍
⁉️برنامه ای بنویسید که در کادر پیغام پیام خوش آمدگویی را درج کند
Sub test()
Msgbox"خوش آمدید"
End sub
✍⛔️لازم بذکر است این تنها یک مثال بود شما دوستان گلم میتونید مثال های مختلفی رو تمرین کنید
🎗مدرس:موالی
🌺🌺هزینه این آموزش صلوات بر محمد وآل محمد🌺🌺
ㄟ(ツ)ㄏ
Visual Basic for Applications
🈹 @vba_excel
🈹 www.excellearn.ir ✍___
💢کاهش حجم و افزایش سرعت اجرایی فایلهای اکسل توسط پسوند XLSB💢
✍همانطور که شما میدونید فرمت پیش فرض نرم افزار اکسل برای ذخیره اطلاعات XLSX هست و در صورتی که فایل شما حاوی کد VBA یا ماکرو باشه برای ذخیره اون معمولاً از فرمت XLSM استفاده میشه.
در اکسل فرمت دیگه ی هم برای ذخیره فایل ها(بدون ماکرو یا حاوی ماکرو) وجود داره که کمتر از اون استفاده میشه و اونهم فرمت XLSB هست.
در ادامه کمی بیشتر با فرمت XLSB آشنا میشیم:
این نوع ذخیره سازی که همان ویژگی های فرمت XLSX و XLSM را دارد، کم حجم ترین نوع ذخیره سازی در نرم افزار اکسل است. حجم فایل در این نوع ذخیره سازی کاهش چشمگیری میابد. سرعت محاسبات در این نوع فایل ها بیشتر از فایل ها با پسوند معمولی میباشد. پسوند فایل حاصل XLSB می باشد.
✅Excel workbook(xlsx)
✅Excel macro_Enabled workbook(xlsm)
✅Excel Binary workbook(xlsb)
مدرس:موالی
🌺🌺هزینه این آموزش صلوات بر محمد وآل محمد🌺🌺
ㄟ(ツ)ㄏ
Visual Basic for Applications
🈹 @vba_excel
🈹 www.excellearn.ir ✍___
🎗 #توابع
❗️مجموعه آموزشی فرمول نویسی در اکسل
❕قسمت اول : Trim&Match
ㄟ(ツ)ㄏ
Visual Basic for Applications
🈹 @vba_excel
🈹 www.excellearn.ir ✍___
💢خطای امنیت ماکروها در اکسل💢
✍درصورتی که ماکروها رادرpcدیگر ذخیره کرده باشیم بصورت پیش فرض ممکن است درpcشما خطا دهد برای جلوگیری از خطا تنظیمات زیر را انجام دهید
Developer------>macro seurity------>macro settings-------->Enabled all macros
🎯توجه داشته باشید درقسمت
Developer macro setting
✅تیک بزنید قسمت trust access......
ودر پایان okکنید 😊
مدرس : موالی
🌺🌺هزینه این آموزش صلوات بر محمد وآل محمد🌺🌺
ㄟ(ツ)ㄏ
Visual Basic for Applications
🈹 @vba_excel
🈹 www.excellearn.ir ✍___
💢 دستوراتی جهت خارج کردن عدد از متن :
✍ در ابتدا نیاز به تعریف تابع با نام دلخواه داریم . نقطه
Function Masoudhosseini(Mytext As String) As Double
✍ نیاز به تعریف دو متغیر جهت بررسی تعداد کارکترهای متن مورد نظر را داریم .
Dim icount As Integer
Dim Mychar As String
✍ با استفاده از تابع Len تعداد کارکترهای متن را شمارش میدیم .
icount = Len(Mytext)
✍ حلقه ای جهت بررسی موارد زیر :
⁉️ اگر عدد بود
⁉️ اگر منفی بود
‼️ اگر ممیز داشت
For i = 1 To icount
If IsNumeric(Mid(Mytext, i, 1)) = True Then
Mychar = Mychar + Mid(Mytext, i, 1)
End If
If Mid(Mytext, i, 1) = "-" Then
Mychar = Mychar + Mid(Mytext, i, 1)
End If
If Mid(Mytext, i, 1) = "." Then
Mychar = Mychar + Mid(Mytext, i, 1)
End If
Next
✍ در انتها خروجی را داخل تابع قرار میدهیم .
Masoudhosseini = Mychar
End Function
💢 جهت دانلود کلیپ آموزشی این مطلب از لینک زیر اقدام کنید :
⁉️ yon.ir/X4i0
ㄟ(ツ)ㄏ
Visual Basic for Applications
🈹 @vba_excel ✍__
🈹 www.excellearn.ir ✍___
🈹 قدرت و کاربرد VBA در نمودارها
‼️ بزودی از رسانه ی تصویری اکسل پیشرفته
🈹 @vba_excel
🈹 www.excellearn.ir
🈹 expression .AdvancedFilter(Action, CriteriaRange, CopyToRange, Unique)
ابزار AdvancedFilter :
با استفاده از این ابزار میتوانیم چندین شرط را روی داده های خودمون اعمال کنیم .
🈹 توضیحات دستور
🎗 منظور از عبارت Action :
این دوست خوبمون Action دو مقدار xlFilterCopy و xlFilterInPlace رو به خودش میگیره که اولی مقادیر خروجی فیلتر را به محدوده مشخصی منتقل و دومی خروجی فیلتر را تنها در محدوده داده ها اعمال میکند .
🎗 منظور از عبارت CriteriaRange :
همان محدوده شرط به همراه تیتر میباشد .
🎗عبارت CopyToRange :
اگر از قسمت Action عبارت xlFilterCopy انتخاب گردد میبایست در این قسمت آدرس خروجی را مشخص کنیم .
🎗قسمت Unique :
اگر این قسمت را True درنظر بگیریم , یعنی عباراتی که تکراری نیستند و عبارت False یعنی تکرار بلامانع است 😉❤️
🌺 صلوات برمحمد و آل محمد 🌺
🎗آموزش تصویری بزودی ..
‼️ @vba_excel
‼️ @talant_ir
⁉️ www.excellearn.ir ⁉️
💢 مجموعه آموزشی Conditional Formatting
💢 قیمت : ۵۰۰۰ تومان
💢 مدرس : استاد طاهرخانی
💢 لینک دانلود : yon.ir/44n8
💢 تفاوت ThisWorkbook با ActiveWorkbook در یک تصویر
🈹 @vba_excel
🈹 www.excellearn.ir
💢 با استفاده از دستورات زیر , فهرستی اتوماتیک همراه با لینک از شیت های اکسل خود تهیه کنید .
#فهرست_اکسل
Sub Masoudhosseini()
Dim isheet As Worksheet
For Each isheet In ActiveWorkbook.Worksheets
If ActiveSheet.Name <> isheet.Name Then
ActiveCell.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _
"'" & isheet.Name & "'" & "!A1", TextToDisplay:=isheet.Name
ActiveCell.Offset(1, 0).Select
End If
Next isheet
End Sub
🌷 هزینه این مطلب : صلوات برمحمد و آل محمد 🌷
⁉️ کلیپ آموزشی این مطلب بزودی ..
____Visual Basic For Applications
🈹 @vba_excel
🈹 www.excellearn.ir
💢 جمعه ای مفید داشته باشید 💢
⁉️ این آموزش تنها ۲ دقیقه از وقت شما را میگیرد .
❗️لینک دانلود :yon.ir/er14
🈹 @vba_excel
🈹 www.excellearn.ir
💢Rangeوcell💢
✍برای اینکه ما دستوراتی که در محیط Vbaنوشتیم رادر صفحه اکسل ذخیره کنیم
از دستور Rangeوcellاستفاده می کنیم
🎯Range=محدوده
🎯cell=سلول
✅درمحیط کدنویسیRangeدرمقیاس باcellکاربرد بیشتری دارد و می تواند به خانه ویا چند دامنه اشاره کند
✅فرم کلی این دستوربه شکل زیر خواهد بود:
Range(cell.[cell2]) as Range
🎯cell:سلول
🎯range:محدوده
حالا نوبتیم باشه نوبت مثال😍
Range("A1")=۱۰
Range("A1:A10")=۵
Range("B1")=۲۰
❌شما دوستان گلم اونقدر مثال بزنید وتمرین کنید که مسلط بشید چرا که خیلی مهم اند🙈
⁉️حالا اگر ستونAوB همه رو میخوایم تو یک کد تعریف کنیم
چطوری😊
Range("A1:A10","B1:B10")=20
✅همچنین می توانید بجای آدرس یک دامنه از نامی که برای دامنه تعریف کرده اید استفاده کنید
Range("test")
✅برای اشاره به یک دامنه در صفحه دیگر به ترتیب زیر عمل می کنیم
Worksheet("sheet1").Range("A10")
✅کد زیر درون خانه پایین فعال مقدار۵رادرج می کند
Activecell.range("A3")=۵
حالا cellچیه🤔
✍درواقعه cellبه خانه های درون صفحه ویا دامنه اشاره می کند
✅فرمول کلی این دستور به شکل زیر خواهد بود:
Cell([Row],[column])
🎯Row:ردیف
🎯column:ستون
واما مثال😉
Cell(2,2)=۵
یعنی تو ستون Bوردیف ۲مقدار۵رو قرار بده
Cell(3,4)=۶
یعنی تو ستون Dوردیف۳مقدار۶رو قرار بده
کمی پیشرفته🙈بریم جلو
✅Worksheets("sheet1").cells(2,3)=۴
درون خانهc2ازصفحه sheet1مقدار۴را درج کن
✅Activecell.cells(2,1)=5
درون خانه پایین فعال مقدار5را درج کن
راهنما💡🎌
🎯worksheet
صفحه های موجوددرفایل جاری
🎯Activecell
سلول فعال
✍⛔️ یادتون باشه که مثالهای ذکر شده را بین
Sub test()
End sub()
🎗مدرس:موالی
🌺🌺هزینه این آموزش صلوات برمحمد وآل محمد🌺🌺
ㄟ(ツ)ㄏ
Visual Basic for Applications
🈹 @vba_excel
🈹 www.excellearn.ir ✍___
💢پنجره ورودی(inputbox)💢
✍پنجره ورودی یک پیغام است که یک کادر متنی دارد وکاربر می تواند در پاسخ به این پنجره مقداری را وارد کند
روی پنجره ورودی فقط دکمه های okوcancel وجود دارند
✅فرم کلی این دستور به شکل زیر خواهد بود:
inputbox(prompt[Title ],[default ],[Xpos ],[Ypos],[ help file,context ])
🎯prompt:
پیغامی که نمایش داده خواهد شد
🎯Title:
موضوع کادر محاوره
🎯default:
متن پیش فرض
🎯Xpos:
مختصات قرارگرفتن پنجره محاوره
🎯Ypos:
مختصات قرار گرفتن پنجره محاوره
🎯helpfile,context:
فایل ضمیمه راهنما
‼️درساختارinputbox
وجودpromptالزامی وبقیه اختیاری است
حالا نوبتیم باشه نوبته تمرینه🤗
برنامه ای بنویسد که درکادر محاوره ازشما درخواست سن تون راداشته باشد❓❓
Sub test()
inputbox" شما چند سال دارید"
End sub()
✅اگر کاربر مقداری وارد نکند ویا دکمهcancelرا انتخاب نماید تابع inputboxرشته ای بطول صفر (معادل" "یاEmpty)رابرمی گرداند
⛔️✍لازم به ذکر است تنها یک مثال بود وشما دوستان گلم میتونید مثال های مختلفی رو تمرین کنید
مثلا میتونید مقدار پیش فرض برای سن تون قراربدید و........😄
🎗مدرس:موالی
🌺🌺هزینه این آموزش صلوات بر محمد وآل محمد🌺🌺
ㄟ(ツ)ㄏ
Visual Basic for Applications
🈹 @vba_excel
🈹 www.excellearn.ir ✍___
لینک گروه پرسش وپاسخ
🈹 https://telegram.me/joinchat/B4zCAz_Av3O8DSXaPDIb7w
🈹 لینک دانلود : yon.ir/bF7i
⁉️ مجموعه آموزشی نقشه های حرارتی + VBA
‼️ چهار قسمت کاملا تصویری و با بالاترین کیفیت
🎗 مدرس : مسعود حسینی
🈹 @vba_excel
⁉️ www.excellearn.ir
⁉️ آموزش ساخت نقشه های حرارتی در اکسل + VBA
🈹 بزودی از کانال اکسل پیشرفته ..
‼️ www.excellearn.ir
⁉️ @vba_excel
🎗 #توابع
❗️مجموعه آموزشی فرمول نویسی در اکسل
❕قسمت دوم : Find&Mid
ㄟ(ツ)ㄏ
Visual Basic for Applications
🈹 @vba_excel
🈹 www.excellearn.ir ✍___
💢نوشتن فارسی درمحیط vba💢
✍برای اینکار می توانید تنظیمات زیر را انجام دهید
✅در ویندوز
Start>Control Panel>Region and Languaga>Administrative>Change system local>Persian
✅و در محیط vba : :
Option>Editor Format>Font>Courier New (Arabic)
مدرس:موالی
🌺🌺هزینه این آموزش صلوات بر محمد وآل محمد🌺🌺
ㄟ(ツ)ㄏ
Visual Basic for Applications
🈹 @vba_excel
🈹 www.excellearn.ir ✍___
‼️ شروع دوره فرمول نویسی و استفاده از توابع در اکسل
ㄟ(ツ)ㄏ
Visual Basic for Applications
🈹 @vba_excel
🈹 www.excellearn.ir ✍___
🈹 آموزش تصویری ساخت گزارش پویا + VBA
‼️ آموزش تابع Trim&Match
💢 لینک دانلود رایگان دو مثال کاربردی : yon.ir/Ga32
🈹 @vba_excel
🈹 www.excellearn.ir
🈹 آموزش دستورات کامنت
🈹 آموزش عبارت Str
⁉️ www.excellearn.ir
‼️ @vba_excel
💢 آموزش تصویری AdvancedFilter
💢 قیمت : ۵۰۰ تومان
💢 لینک دانلود : yon.ir/L92y
🈹 @vba_excel
🈹 www.excellearn.ir
❌تخفیف به مناسبت دهه فجر
✨ فقط تا پایان امشب
✨ ۲۰ درصد تخفیف سبد خرید شما
❌فروشگاه : www.excellearn.ir
💢#ماژول سورت کردن ستون B در تمام شیتهای اکسل
Sub Sort_Column()
Dim wksht As Worksheet
Dim i
i = 1
For Each wksht In ActiveWorkbook.Worksheets
Sheets(i).Select
Columns("B").Select
Selection.Sort Key1:=Range("b1"), _
Order1:=xlAscending, _
Header:=xlGuess, _
OrderCustom:=1, _
MatchCase:=False, _
Orientation:=xlTopToBottom
i = i + 1
Next wksht
End Sub
🌺 صلوات برمحمد وآل محمد 🌺
🎗 ارسال شده توسط جناب آقای سلامت
🈹 @vba_excel
🈹 www.excellearn.ir
❌ اگر فرمهایتان داخل محیط Vba با مشکل بزرگ و کوچک بودن صفحه کاری روبرو هستند , کتابچه زیر را مطالعه کنید .
👇👇👇
🈹 @vba_excel
🈹 Www.excellearn.ir
💢 برگزاری کلاس های آموزشی اکسل پیشرفته VBA بزودی در سراسر ایران
💢 پروژه محور از مقدماتی تا پیشرفته
⁉️ www.excellearn.ir
‼️ @vba_excel
⁉️ لینک دانلود : yon.ir/er14
‼️ آموزش فیلتر بصورت اتوماتیک +vba
💢 این آموزش را رایگان از فروشگاه اینترنتی اکسل لرن تهیه کنید
🈹 @vba_excel
🈹 www.excellearn.ir