دانلود برنامه تست MMPI در اکسل با ماکرو VBA دارای داده های سوال بیش از 100 عدد

دانلود برنامه تست MMPI در اکسل با ماکرو VBA دارای داده های سوال بیش از 100 عدد

تست MMPI یا Minnesota Multiphasic Personality Inventory یکی از قدیمی‌ترین، معتبرترین و پرکاربردترین تست‌های روان‌شناسی برای ارزیابی ویژگی‌های شخصیتی و اختلالات روانی است.

تست MMPI چیست؟

MMPI یک آزمون خودسنجی روان‌شناختی است که نخستین بار در سال 1943 توسط هاتاوی (Hathaway) و مک‌کینلی (McKinley) در دانشگاه مینه‌سوتا طراحی شد. هدف اولیه این تست، کمک به تشخیص اختلالات روانی در بیماران روان‌پزشکی بود.

نسخه‌های مختلف آن عبارتند از:

• MMPI (نسخه اصلی 1943)

• MMPI-2 (نسخه بازنگری‌شده 1989 – رایج‌ترین نسخه فعلی)

• MMPI-2-RF (نسخه بازنگری مجدد و کوتاه‌شده، سال 2008)

• MMPI-A (برای نوجوانان)

کاربردهای MMPI

• تشخیص اختلالات روانی مانند افسردگی، اضطراب، اسکیزوفرنی، هیستری و...

• ارزیابی شخصیتی در استخدام‌های خاص (پلیس، نظامی، امنیتی)

• استفاده در روان‌درمانی و مشاوره برای درک بهتر بیمار

• مطالعات پژوهشی در روان‌شناسی و روان‌پزشکی

• ارزیابی صلاحیت روانی در موارد قضایی یا حقوقی

نمونه تصاویر در زمانم اجرا

درباره برنامه تست MMPI در اکسل با ماکرو VBA دارای داده های سوال بیش از 100 عدد

این کد یک آزمون روانسنجی MMPI (مینهسوتا) "Minnesota Multiphasic Personality Inventory" را در اکسل پیادهسازی کرده است. اجازه دهید بخشهای اصلی کد را توضیح دهم:

1. Sub StartMMPI_Test()

این تابع آزمون را شروع میکند و:

• ورقۀ داده ("data") و لیست سوالات را پیدا میکند

• اگر ورقۀ آزمون قبلی وجود دارد، آن را حذف میکند

• ورقۀ جدیدی برای آزمون ایجاد میکند

• عنوان آزمون و بخشهای مختلف رابط کاربری را تنظیم میکند

• دو دکمه برای پاسخ "بله" و "خیر" اضافه میکند

• متغیرهای لازم برای ردگیری سوالات و پاسخها را مقداردهی میکند

• اولین سوال را نمایش میدهد

2. Sub ShowNextQuestion()

این تابع:

• شمارۀ سوال فعلی و تعداد کل سوالات را بررسی میکند

• اگر به آخر سوالات رسیده باشد، نتایج را نمایش میدهد

• در غیر این صورت، سوال بعدی را از لیست سوالات میخواند و نمایش میدهد

3. Sub AnswerYes() و Sub AnswerNo()

این توابع پاسخ کاربر را ثبت میکنند و به سوال بعدی میروند

4. Sub SaveAnswer(response As String)

این تابع:

• پاسخ کاربر را ذخیره میکند

• شمارۀ سوال و پاسخ را در ورقۀ آزمون ثبت میکند

• شمارۀ سوال و ردیف پاسخ را افزایش میدهد

• سوال بعدی را نمایش میدهد

5. Sub ShowMMPI_Result()

این تابع مهم نتایج آزمون را محاسبه و نمایش میدهد:

• دادههای پاسخهای کاربر را جمعآوری میکند

• برای هر مقیاس (مثل افسردگی، پارانویا و...) امتیاز محاسبه میکند

• ورقۀ جدیدی برای نتایج ایجاد میکند

• نتایج را در قالب جدول زیبا نمایش میدهد شامل:

  • نام مقیاس

  • امتیاز خام

  • درصد پاسخهای مثبت

  • سطح خطر

  • تفسیر روانشناختی

  • پیشنهادات درمانی

• نتایج را با رنگبندی مناسب (سبز، نارنجی، قرمز) برای سطوح مختلف خطر نمایش میدهد

ویژگیهای کلی کد:

• از فونت فارسی (B Nazanin) استفاده شده است

• رابط کاربری گرافیکی ساده و کاربرپسند دارد

• دادههای آزمون در ورقۀ "data" ذخیره شده است

• نتایج در ورقۀ جداگانه با نام "MMPI_Result" نمایش داده میشود

• کد به خوبی ساختاردهی و کامنتگذاری شده است

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

برای شما کاربران عزیز پیشنهاد دانلود داده می شود.