אני מעריץ ענק של סדרת סרטי מטריקס. זו יצירה מדהימה בתקופתה ואחת מסדרות סרטי המדע הבדיוני האהובות עלי.
אם ראית את מטריקס, אין סיכוי שלא תזכור את רצף הקוד הנופל.
חשבתי ליצור את זה באקסל, אבל מישהו הבין אותי בזה. הוא כבר נוצר וזמין כאן.
ניטין מהטה, שיצרה זאת, השתמשה בכמה פונקציות אקסל, עיצוב מותנה וסרגל גלילה כדי ליצור אפקט זה.
שיניתי אותו להסרת סרגל הגלילה והשתמשתי בקוד VBA במקום זאת. עכשיו אתה יכול פשוט ללחוץ על כפתור ההפעלה והמספרים יתחילו לרדת מעצמם. משהו כפי שמוצג להלן:
אפקט המספרים הנופלים במטריצה ב- Excel
להלן השלבים ליצירת אפקט המספרים הנופלים במטריקס ב- Excel:
- בשורה הראשונה בטווח A1: AP1, הזן מספרים אקראיים בין 0 עד 9. תוכל להזין ידנית את המספרים האלה של הפונקציה RANDBETWEEN. זכור להמיר מספרים אלה לערכים.
- הקטן את רוחב העמודה כך שהוא יהיה גלוי במסך יחיד.
- בטווח A2: AP32, הזן את הנוסחה: = INT (RAND ()*10)
- העתק והדבק את הקוד שלהלן במודול ב- VBA
#אם VBA7 אז הצהרת הציבור PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds So Long) 'עבור 64 סיביות מערכות #Else Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)' למערכות 32 סיביות #סוף אם תת מטריקס מספר () i = 1 Do While i <= 40 טווח DoEvents ("AR1"). Value = ii = i + 1 Sleep 50 Loop End Sub Sub
קוד זה מעלה יזין את המספר מ -1 עד 4o בתא AR1. הקוד Sleep 50 יעכב את הזנת המספרים ב -50 אלפיות השנייה. אם תפעיל קוד זה, תוכל לראות את הערך ב- AR1 יעלה מ -1 ל -40.
כעת עלינו לציין שלושה כללי עיצוב מותנים כדי לתת צבע למספרים אלה.
כלל עיצוב מותנה מספר 1
- בחר את הטווח A2: AP32, עבור לדף הבית -> עיצוב מותנה -> כלל חדש
- בתיבת הדו -שיח כלל עיצוב חדש, לחץ על 'השתמש בנוסחה כדי לקבוע אילו תאים לעצב' והזן את הנוסחה הבאה:
= MOD ($ AR $ 1,15) = MOD (ROW ()+$ 1,15)
- לחץ על כפתור העיצוב והגדר את צבע הגופן ללבן
- לחץ על אישור
כלל עיצוב מותנה מספר 2
- כאשר הטווח A2: AP32 נבחר, עבור אל בית -> עיצוב מותנה -> נהל כלל
- בתיבת הדו -שיח מנהל כללי עיצוב מותנה, לחץ על כלל חדש
- בתיבת הדו -שיח כלל עיצוב חדש, לחץ על 'השתמש בנוסחה כדי לקבוע אילו תאים לעצב' והזן את הנוסחה הבאה:
= MOD ($ AR $ 1,15) = MOD (ROW ()+$ 1+1,15) - לחץ על כפתור העיצוב והגדר את צבע הגופן לירוק בהיר
- לחץ על אישור
כלל עיצוב מותנה מס '3
- כאשר הטווח A2: AP32 נבחר, עבור אל דף הבית -> עיצוב מותנה -> נהל כלל
- בתיבת הדו -שיח מנהל כללי עיצוב מותנה, לחץ על כלל חדש
- בתיבת הדו -שיח כלל עיצוב חדש, לחץ על 'השתמש בנוסחה כדי לקבוע אילו תאים לעצב' והזן את הנוסחה הבאה:
= OR (MOD ($ AR $ 1,15) = MOD (ROW ()+A $ 1+2,15), MOD ($ AR $ 1,15) = MOD (ROW ()+A $ 1+3,15), MOD ($ AR $ 1,15) = MOD (ROW ()+A $ 1+4,15), MOD ($ AR $ 1,15) = MOD (ROW ()+$ 1+5,15)) - לחץ על כפתור העיצוב והגדר את צבע הגופן לירוק בהיר.
- לחץ על אישור.
בהתבסס על מספר השורה והערך בשורה הראשונה, עיצוב מותנה יצבע את הטקסט בירוק, ירוק בהיר או לבן.
כעת בחר את כל טווח התאים (A1: AP32) והפוך את הרקע לשחור.
כשלב אחרון, הכנס צורה/כפתור והקצה מאקרו זה לצורה/כפתור זה.
הערה: מכיוון שיש בו קוד VBA, שמור את הקובץ עם סיומת .xls או .xlsm.
זהו זה! עכשיו קנה לעצמך כוס קפה, עמד בצל ותהנה מהמטריקס יורד גשם דיגיטלי 🙂
