حساب حسابه

موضوعات حسابداری اقتصاد بورس اکسل مالیاتی علمی بهداشتی دین و زندگی و اطلاعات عمومی

حساب حسابه

موضوعات حسابداری اقتصاد بورس اکسل مالیاتی علمی بهداشتی دین و زندگی و اطلاعات عمومی

IF های تو در تو در اکسل

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

مقدار سلول A13 برابر است با:

  • A: اگر مقدار سلول A1 از ۰ تا ۲۰ باشد.
  • B: اگر مقدار سلول A1 از ۲۰ تا ۴۹ باشد.
  • G: اگر مقدار سلول A1 از ۵۰ تا ۸۴ باشد.
  • E: اگر مقدار سلول A1 از ۸۵ تا ۱۰۰ باشد.

در مساله ی بالا، در سلول A13 به تناسب اینکه چه عددی بین ۰ تا ۱۰۰ در سلول A1 نوشته شده باشد پیامی درج میگردد. با استفاده از ساختار if های تو در تو میتوان فرمول زیر را نوشت:

IF(A1>=50;IF(A1>=85;”E”;”G”);IF(A1>=20;”B”;”A”))

در فرمول بالا بجای آرگومان دوم و سوم از توابع if استفاده شده، حال در فرمول بالا در هریک از آرگومان ها دوم و سوم برای ریز تر کردن بازه ها میتوان مجدداً از ساختارهای if دیگر نیز استفاده کرد و به همین ترتیب تا تعداد ۶۴ تابع if تو در تو میتوان در فرمول نویسی تابع if در اکسل لحاظ نمود.

رمز گذاری بر روی vba

برای اینکه بخواهید محیط ویژوال بیسیک (vba) فایل اکسل خود را رمزگذاری کنید به این روش عمل کنید :

ابتدا پس از باز کردن فایل اکسل و زدن کلیدهای ترکیبی (alt+F11) ، وارد منوی tools شده و گزینه VBAProject Properties... را انتخاب کنید


پس از باز شدن پنجره زیر ، بر روی تب protection کلیک کنید
سپس با تیک زدن بر روی lock project for viewing و در کادرهای فرم ، رمز عبور مورد نظر را وارد کنیدپس از کلیک کردن بر روی دکمه ok ، فایل اکسل را ذخیره و فایل را ببندید. پس از باز کردن فایل اکسل و زدن کلید های ترکیبی (alt+F11)  ، کادری نمایش داده می شود که با وارد کردن رمز عبور خود وارد محیط vba خواهید شد


پاک کردن اطلاعات شیت با استفاده از کد vba

ابتدا به تب developer رفته و از گزینه زیر یک دکمه بر روی صفحه اکسل خود درگ کنید.


سپس با زدن دکمه new بر روی پنجره ای که باز شده است ، وارد محیط vba اکسل شوید و کد زیر را در رویداد کلیک دکمه کپی کنید :

 

Dim soal As Integer


("آیا شما می خواهید اطلاعات داخل شیت را خالی کنید؟", vbYesNo + vbQuestion, "خالی کردن اطلاعات")

 

If soal = vbYes Then

    Cells.ClearContents

Else

بعد از خارج شدن از محیط vba بر روی دکمه ایجاد شده کلیک کنید و با باز شدن پنجره سوال و انتخاب دکمه yes تمام اطلاعات داخل شیت پاک خواهد شد.


نحوه‌ی تبدیل سطر به ستون در اکسل

اگر بخواهیم داده ها و اطلاعاتی که به صورت سطری ثبت کردیم را به صورت ستونی یا بالعکس دربیاریم به این صورت عمل می کنیم :

 

پس از باز کردن نرم افزار اکسل ، سلول های مربوط به سطر یا ستون رو به حالت انتخاب درآورده و با راست کلیک بر روی آن گزینه copy را انتخاب ، سپس بر روی یک سلول که خالیست راست کلیک کرده و گزینه past spicial را انتخاب و پس از تیک زدن بر روی گزینه Transpose دکمه  ok را میزنیم.

 

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

حل معضل ترافیک با ایده الون ماسک


نام الون ماسک همواره با  ماجراجویی های عجیب و غریب بهمراه بوده است. ماجراجویی هایی مانند سرمایه گذاری هنگفت بر روی خودرهای برقی و یا ساخت موشک های چند بار مصرف. در سال های آتی وقتی که سوار بر خودروی خود به راحتی  سوار بر اسکیت های ویژه با سرعت ۲۰۰ کیلومتر بر ساعت از زیر خیابان های شلوغ و پرترافیک عبور می کنید برایتان یک نام خاص خواهد بود.

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

BORING نام شرکتی است که در حال طراحی یک مجموعه شاه راه های زیر زمینی است که خودرو ها به راحتی و با استفاده از آسانسور های ویژه وارد آنها می شوند.در ادامه خودرو ها به سرعت به محل مورد نظر خود منتقل می شوند. بدین ترتیب میتوانند از ترافیک سنگین عبور کرد به همین راحتی.

چالش ترافیک در شهر های بزرگ مانند تهران به یکی از معضلات عمده تبدیل شده است .در سال های اخیر هم تلاش دولتمردان و دست اندر کاران موجب کاهش این مشکل نشده است .راه کارهایی مانند توسعه حمل و نقل مترو،توسعه خطوط BRT و حتی دو طبقه کردن اتوبان ها هم نتوانسته است این معضلات را حل کند.سوال این است که آیا فناوری تازه و ابتکار نوظهور ماسک میتواند به یاری شهرهای شلوغی مثل تهران بیاید ؟

در نظر اول میتوان گفت بله .راه اندازی و احداث متروی تهران نشان میدهد امکان حفر تونل های زیر زمینی اگرچه با مشکلاتی در این شهر همراه است اما کاری شدنی است . نکته مهم این است که این تونل ها در عین کاهش ترافیک، امکان استفاده از خودروی شخصی را برای مردم فراهم می کنند. در شهری مانند تهران فرهنگ نادرست استفاده از خودروی شخصی با عث شده است تا علیرغم مشکلات متعدد بازهم مردم این کار را ادامه دهند.شاید ایده تازه ماسک بتواند به این نیاز پاسخی تازه بدهد.

تونل های شرکت BORING دارای ۹ متر قطر بوده و امکان حرکت همزمان دو خودرو را فراهم می کند. راننده در طی مسیر نیاز نیست کنترل خودرو را در اختیار بگیرد و خدورو بر روی اسکیت های کنترل شده و با فناوری هایپر لوپHYPERLOOP منتقل می شود. ترکیب این فناوری ها سرعت خودرو را به ۲۰۰ کیلومتر بر ساعت خواهد رساند.این فناوری می تواند انقلاب بزرگی در عملیات های امداد و نجات و خدمات اورژانس در شهر های شلوغ مانند تهران برپا کند.