قسمت اول آموزش انبارداری
❗️ زمان آموزش : ۰۴:۵۸
❗️حجم : ۱۶ مگابایت
❗️لینک دانلود : http://yon.ir/0ycV
___Visual Basic For Applications
🆔 @vba_excel ✍__

دموی قسمت اول آموزش انبارداری
❗️ سایت : www.excellearn.ir
___Visual Basic For Applications
🆔 @vba_excel ✍__

قسمت دوم آموزش انبارداری
❗️ زمان آموزش : ۰۶:۵۵
❗️حجم : ۲۰ مگابایت
❗️لینک دانلود : yon.ir/kTkF
___Visual Basic For Applications
🆔 @vba_excel ✍__

دموی قسمت دوم آموزش انبارداری
❗️ سایت : www.excellearn.ir
___Visual Basic For Applications
🆔 @vba_excel ✍__

#Form
قسمت سوم آموزش انبارداری
❗️ زمان آموزش : ۰۷:۰۰
❗️حجم : ۱۸ مگابایت
❗️لینک دانلود :yon.ir/rn1g
___Visual Basic For Applications
🆔 @vba_excel ✍__

مجموعه کتابهای آموزشی vba
❗️ سایت : yon.ir/nA7r
___Visual Basic For Applications
🆔 @vba_excel ✍__
❗️ @excelroom
❗️ @hsExcel_bot

دموی قسمت سوم آموزش انبارداری
❗️ سایت : www.excellearn.ir
___Visual Basic For Applications
🆔 @vba_excel ✍__

قسمت چهارم آموزش انبارداری
❗️ زمان آموزش : ۰۳:۰۰
❗️حجم : ۱۶ مگابایت
❗️لینک دانلود : yon.ir/eA5q
___Visual Basic For Applications
🆔 @vba_excel ✍__

📘 #Education
سلام دوستای گلم 🙈❤️
بعد مدتها آموزش نوشتاری خواهیم داشت 👏
چیزی از آرایه ها خاطرتون هست ؟
جواب کاربران همیشه حاضر در صحنه : دقیقا هیچی 😄

میخوام با دو تابع LBound و UBound آشناتون کنم😍🌺
اول از هرچیزی باید معنی دو تابع رو بدونیم تا برای همیشه ملکه ی ذهنه ما بشه، یه رمز گشایی کنیم اول ببینیم L و U مخفف چی هست.
L = Lower کمترین
U = Upper بیشترین
حالا Bound یعنی چی ؟
یعنی حد و مرز ، بهتره بگم میشه بازه.
LBound کمترین مقدار بازه
UBound بیشترین مقدار بازه
قبول ؟☺️👏
حالا یه مثال بسیار بسیار سخت خیلی سخت😱

Dim Masoud(1 To 10 ) As integer
Dim Min , Max As integer

✍ دوتا متغیر تعریف کردیم از نوع عدد .
Min = LBound ( Masoud )
Max = UBound ( Masoud )

✍ حالا گفتیم که کمترین و بیشترین مقادیر آرایه Masoud رو در نظر بگیر .

Msgbox " min : " & " " & Min & vbNewLine & " max : " & " " & Max

✍ نتیجه رو بررسی کنید 😍❤️
🌺🌺هزینه آموزش : صلوات برمحمد و آل محمد🌺🌺

______Visual Basic for Applications
♻️ @vba_excel ✍____
♻️ www.excellearn.ir ✍___
⚠️ @excelRoom
⚠️ @hsExcel_Bot

📚 #Education
سلام و وقت بخیییر👏😍
حوصله دارید ادامه آموزش رو باهم پیش ببریم ؟
کدوم آموزش 🤔 ممممم ترکیب آرایه ها با حلقه ها چطوره ؟

بریم سرااغ مثال جهت درک بیشتر طلب 🏃

✍ ماژولی ایجاد کنید .
✍ آرایه ای به نام Nme از نوع رشته و کلمه تعریف کنید .
Dim Nme ( 1 To 4 ) As String
✍ حالا تک تک آرایه هارا مقدار دهی کنیم .
Nme(1)="Ali"
Nme(2)="Mehdi"
Nme(3)="Shima"
Nme(4)="Elahe"
✍حلقه ای ایجاد میکنیم که از کمترین مقدار تا بیشترین مقدار آرایه ، حلقه را به گردش آورد .
For i = Lbound(Nme) To Ubound(Nme)
Cells(i,1)=Nme(i)
Next

✍ تمام شد ، حالا نتیجه رو بررسی کنید😍❤️

🌺🌺هزینه آموزش : صلوات برمحمد و آل محمد🌺🌺

______Visual Basic for Applications
♻️ @vba_excel ✍____
♻️ www.excellearn.ir ✍___
⚠️ @excelRoom
⚠️ @hsExcel_Bot

📒 #KelidMiyanBar
سلام دوستای گلم 👏❤️😍
امروز یه پست خیلی خیلی مهم داریم !
بله ، کلیدهای میانبر لازمه ی هرکاربر اکسل است .

1_ Ctrl + S
📘 ذخیره کردن تغییرات درکارپوشه
2_ Ctrl + W , Alt + F4
📙 بستن فایل کار‌پوشه فعلی
3_ Ctrl + ;
📔 برای درج تاریخ فعلی سیستم
4_ Ctrl + shift + ;
📕 درج ساعت فعلی سیستم
5_ Ctrl + A
📒 انتخاب تمامی سلولهای یک کاربرگ
6_ Ctrl + Z
📗 لغوکردن عمل قبلیundo
7_Ctrl + Y
📙 لغودستور undo و اجرای مجدد آخرین فرمان Rendo
8_ Ctrl + F
📔 جستجوی مقادیر ومتنها
9_ Ctrl + H
📘 جایگزین کردن محتوای سلولها با داده های دیگر
10_ Delete ، Ctrl + -
📗 حذف کامل سلولهای انتخاب شده
11_ Ctrl + C
📒 کپی کردن محتوای سلولها
12_ Ctrl + V
📙 قراردادن محتوای حافظه درمحل دلخواه
13_ Ctrl + X
📗 انتقال محتوای سلولها ب سلولهای دیگر
14_ Shift + Space
📘 انتخاب کامل سطری که یکی ازسلولهای ان فعال است
15_ Ctrl + Space
📙 انتخاب کامل ستونی که یکی از سلولهای ان فعال است
16_ Ctrl + Shift + =
📒 درج سلولهای جدید دریک کاربرگ
17_ Ctrl + Shift + F
📔 تغییر مشخصات فونت سلولها
18_ Shift+F3
📗 دسترسی بنام توابع واستفاده از آنها
19_ Ctrl + P
📕 چاپ تمام یا بخشی از یک کاربرگ یا کارپوشه
20_ Ctrl + O
📙 چاپ همزمان چند کارپوشه
21_ Ctrl + F2
📘 مشاهده پیش نمایش چاپ اطلاعات کاربرگ
22_ Alt + F11
📘 وارد شدن به محیط ویژوال
23_ shift + F11
📙 ایجاد شیت جدید

🌺🌺هزینه آموزش : صلوات برمحمد و آل محمد🌺🌺
این مطلب توسط کاربر محترم سرکار خانم موالی تهیه شده است.
🌷انتشار این مطلب دارای ثواب می باشد 🌷
بدون شک ادامه دارد ..

______Visual Basic for Applications
♻️ @vba_excel ✍____
♻️ www.excellearn.ir ✍___
⚠️ @excelRoom
⚠️ @hsExcel_Bot

📒 #KelidMiyanBar
🎗قسمت دوم کلیدهای میانبر
🎗با تشکر از خانم موالی عزیز
24_ " + Ctrl
📘 کپی سطر بالایی (ترفند برنامه نویسی)
25_ Ctrl + 1
📙 برای باز کردن پنجره format cell
26_ Ctrl + F2
📗 پیش نمایش چاپ
27_ F12
📕 میانبر save as
28_ F2
📘 برای ورود به cell بجای دابل کلیک
29_ F11
📙 برای ایجاد chart برروی یک جدول
30_ Ctrl + 9
📗 مخفی کردن سطرها
31_ Ctrl + 0
📒 مخفی کردن ستون ها
32_ Ctrl + Shift + 9
📕 نمایش سطر مخفی
33_ Ctrl + Shift + 0
📙 نمایش ستون مخفی
34_ Alt + F1
📘 برای رسم نمودار درشیت فعال
35_ F4
📕 میتوانید کاری ک آخرین بار انجام داده اید دوباره انجام بدهید
36_ Shift + F2
📔 میتونید برای یک سلول کامنت یا یادداشت بذارید
37_ F4
📗 جهت مطلق کردن آدرس دهی


✨هزینه آموزش : صلوات برمحمد و آل محمد✨💫
این مطلب توسط کاربر محترم سرکار خانم موالی تهیه شده است.

بدون شک ادامه دارد ..

______Visual Basic for Applications
♻️ @vba_excel ✍____
♻️ www.excellearn.ir ✍___
⚠️ @excelRoom
⚠️ @hsExcel_Bot

دموی قسمت چهارم آموزش انبارداری
❗️ سایت :yon.ir/OcJB
___Visual Basic For Applications
🆔 @vba_excel ✍__

🎁 #Match
مسابقه کدنویسی همراه با جایزه(2)
🔖نفرات برنده: 1 نفر
💰جایزه: رمز مجموعه آموزشی انبارداری
🕙 پایان مسابقه : راس ساعت ۱۹
❓سوال: در پست بعدی
_____
🆔 @vba_excel
🆔 @adm_masoudhosseini2

🎁 #Match
♦️سوال مسابقه :
💠 ابتدا یک متغیر از نوع رشته و دارای ۱ تا ۵ آرایه
💠 سپس متغیری از نوع عدد
💠 تشکیل حلقه ی For و گردش آن را از کوچکترین تا بزرگترین مقدار آرایه
💠 حال دو سوال با استفاده از inputbox :
🌀 نام فروشنده
🌀 مقدار فروش
💠 در پایان به ترتیب در سلول ها ذخیره شود.

🎁جایزه مسابقه : رمز دانلود مجموعه آموزشی انبارداری
⛔️ این مسابقه به پایان رسید .

_____Visual basic for applications____
🆔 @vba_excel
🌐 www.excellearn.ir

🎁 #Match
دوستانی که پاسخ صحیح ارسال کردند :

1_ ابراهیم امیری🏅
2_ آقای صفوی🏅
3_ جناب حبیبیان🏅
4_محمد نیک عیش🏅

باتشکر از سایر عزیزان که شرکت کردند هرچند به جواب صحیح اشاره نکردند اما خودشون رو محک زدند.

🏅 هر چهار نفر عزیز برنده اعلام میشوند.
⛔️ این مسابقه به پایان رسید .
_____Visual basic for applications____
🆔 @vba_excel
🌐 www.excellearn.ir

🎁 #Match

سلام خدمت دوستای قدیمی و دوستای جدید 😍❤️
بریممم سراغ پاسخ مسابقه ی دیروز ..

✍ یک ماژول ایجاد کنید .
✍ گفتیم که ابتدا یک متغیر از نوع رشته و دارای ۵ آرایه تعریف کنید .

Dim Seller( 1 To 5 ) As String
✍ بعد چی گفتیمم ؟؟ 🤔
گفتیم سپس متغیری از نوع عدد .
Dim Q1 As Long

✍ حالا از کوچترین تا بزرگترین مقدار آرایه ، حلقه تشکیل میدیم .

For i = Lbound(Seller) To Ubound(Seller)

✍در ادامه سوال نام مشتری و مقدار فروش رو خواهیم داشت ..

Seller(i)=inputbox("لطفا نام مشتری را درج کنید ")
Q1=inputbox("لطفا مقدار فروش را وارد نمایید "
✍حالا نوبت ذخیره کردن رسید
Cells(i + 1 , 1)=Seller(i)
Cells(i + 1 , 2 ) = Q1
Next i

✍ پایان ، سخت بووود 😞 معذرت میخوام.
بزودی کلیپش رو تهیه میکنم و مجددا توضیح میدم . نگران نباشید 🌺🌺

_____Visual basic for applications____
🔖 @vba_excel
🔖 www.excellearn.ir
🔖 @excelRoom
🔖 @hsExcel_Bot

🎁 #Match
سلام خدمت دوستان عزیز و همراهان همیشگی😍🌺
🌀 کلیپ آموزشی جواب مسابقه تقدیم شما عزیزان
🌀 در این ماه عزیز التماس دعا داریم
🎗حسینی
_____Visual basic for applications____
🔖 @vba_excel
🔖 www.excellearn.ir
🔖 @excelRoom
🔖 @hsExcel_Bot
👇👇👇👇👇👇👇👇👇

📒 #KelidMiyanBar
🎗قسمت سوم کلیدهای میانبر

38_ Ctrl + D
📘 عمل Copy,Past سلول بالا
39_ Alt+ D + S
📙 جهت sort کردن
40_ Ctrl + +
📔 برای اضافه کردن سطر وستون
41_ Ctrl + -
📕 برای حذف کردن سطر وستون
42_ F11
📗 برای رسم نمودار درشیت مجزا
43_ Ctrl+ F3
📙 برای بازکردن پنجره name manger
44_ Ctrl + Home
📘 رجوع به اولین سلول شیت
45_ Ctrl + End
📒 رجوع به آخرین سلول حاوی اطلاعات
46_ Ctrl + PGDOWN
📕 شیت بعدی اکسل رو فعال میکنه
47_ Ctrl + Shift + L
📓 ابزارفیلتر رو برای اطلاعات شیت اکسل فعال میکنه
48_ Ctrl + T
📙 محدوده ای رو که دراکسل انتخاب کردین روبهtableتبدیل میکنه
49_ Ctrl+N
📔 ورکبوک جدید
50_ Ctrl + B
📕 برای ضخیم کردن نوشته ها در سلول
51_ Ctrl + shift + end
📗 از سلول فعلی تا آخرین سلول شیت رو انتخاب میکنه
52_ % + ctrl + shift
📔 فرمت سلولهای انتخابی رو به فرمت ٪ تغییر میدهد
53_ Alt + ==
📓 عمل جمع کردن
54_ ctrl + shift + v
📙 پنجره paste special رو باز میکنه .
55_ ctrl + page up
📕 شیت قبل


✨🌷هزینه آموزش : صلوات برمحمد و آل محمد🌷✨💫
این مطلب توسط کاربر محترم سرکار خانم موالی تهیه شده است.


______Visual Basic for Applications
♻️ @vba_excel ✍____
♻️ www.excellearn.ir ✍___
⚠️ @excelRoom
⚠️ @hsExcel_Bot

سلاام عصرتون بخیر 😍❤️❤️
💫سوپر گروپ پرسش و پاسخ هم مختص VBA با اساتید برجسته شروع به فعالیت نمود 💫
دیگه چه خبر 🤔 مم مهمش همین بود فکر کنم ..
بریم یه آموزش داشته باشیم بعد مدتها ، اون هم یه آموزش پرکاربرد 😱😱

✍ بنده در تک تک آموزش های تصویریم از عبارت و نامهایی به عنوان مثال :

Rng1 , LastRow , RW1 ..

استفاده میکنم و ذکر هم میکنم که قصد دارم آخرین ردیف پر را پیدا کنم .
خاطرتون هست ؟

Rng=Cells(Rows.Count, "A").End(xlUp).Row

✍ دستور فوق رو میبینید ؟

Cells

✍ دو تا بخش دارد یکی ردیف و دیگری ستون :

Cells(Radif,Soton)

✍ حالا من چی گفتم ؟

Cells(Rows.Count , " A " )

✍ یعنی تمام ردیف های ستون A ، حالا چطور اخرین ردیف پر پیدا میشه ؟

..End(Xlup).Row

✍ عبارت End(Xlup) یعنی از پایین اخرین سلول پر ،حالا عبارت Row یعنی چی ؟ یعنی شماره ردیف

پس همه با هم میشن :
💫شماره ردیف اخرین سلول پر از ستون A💫

🌷 هزینه این آموزش صلوات بر محمد و آل محمد 🌷

لینک سوپر گروه :
🆔 https://telegram.me/joinchat/B4zCAz_Av3O8DSXaPDIb7w

______Visual Basic for Applications
📘 @vba_excel ✍____
📙 www.excellearn.ir ✍___
📕 @excelRoom
📒 @hsExcel_Bot