שם הכותב: תאריך: 12 מרץ 2015

טכנולוגיות עסקיות בניהול – שיעור 2

 

EXCEL – VBA

 

כרטסת (לשונית) מפתחים-

קובץ -> אפשרויות ->

1. התאמה אישית של רצועת הכלים -> בכרטסת (שמופיעה בצד שמאל) יש לסמן וי על "מפתחים".

2. מרכז יחסי אמון -> הגדרות מרכז יחסי אמון -> הגדרות מאקרו -> סימון האופציה הרביעית (האופציה של "לא מומלץ..")

3. סגירת האקסל ופתיחה מחדש כדי להתחיל לעבוד.

 

* כאשר שומרים קובץ שיש בו תכנות יש לשמור אותו עם הסיומת xlsb (b = בינארי, האופציה השלישית כאשר עושים "שמירה בשם").

 

אקסל-
נחלק לשני חלקים: אקסל עם גיליונות ואקסל עם תכנות (VBA).

המעבר מאקסל לתכנות מתבצע ע'י לחיצה על Alt + F11 ומתכנות לאקסל ע'י לחיצה על האיקס.

פעולות שנרצה לבצע בעזרת נוסחאות => נבצע באקסל, פעולות אוטומטיות ע'י המחשב => תכנות.

 

תהליך העבודה-

 

  • Insert -> Module (איזור התכנות בVBA)

    * בצד שמאל מופיע הפירוט של הפרויקט.

    * ניתן לפתוח מס' Module או לכתוב מס' תוכניות ב Module אחד (ההפרדה בין ה Module תיעשה כשכל אחד מהם מטפל בנושא אחר, בתוכן אחר).

     

  • SUB + רווח + שם קוד של התוכנית + אנטר (בלחיצה על אנטר המחשב משלים לבד סוגריים באותה השורה ובשורה מתחת נכתב "End Sub").

    * אין חשיבות לכתיבה באותיות גדולות או קטנות.

    * להוספת תוכניות- יורדים לשורה מתחת ל "End Sub" וחוזרים על התהליך.

    * כללים לכתיבת שם הקוד-

    1. אין רווחים.

    2. אות ראשונה גדולה בתחילת כל מילה חדשה.

    3. אנגלית בלבד.

    4. אין סימנים.

    5. ספרות יכולות להיות רק בסוף.

     

  • פנייה לתא (פעולת השמה)-

    בתכנות, כשרוצים לפנות לתא מסוים ולסמן בתוכו ערך:

    Range + סוגריים ובתוכם גרשיים ומס' התא + השמה (=) של ערך רצוי (לדוג': Range("A1")=28).

    * סימון = – פעולת השמה (לגרום לזה שהמחשב ייבצע את צד ימין ויעביר את התוצאה לצד שמאל).

    לדוג': Range(E2)=E2+1 -> לגרום למחשב לקחת את הערך שבתאE2 , להוסיף לו 1 ואת הערך שהתקבל לשים בתא E2 (בדוגמא הזאת זה חזרה לאותו התא).

    * טווח תאים- לטווח של תאים מסמנים נקודתיים (לדוג': Range("A1:E1")).

    * גרשיים בצד ימין- לקיחת מה שנמצא בתוך הגרשיים כמו שזה.

    לדוג': שמות, נוסחאות (=A1+A2 ואז המחשב לוקח את הפתרון).

    * גרש עליון- המחשב ייקח בדיוק את מה שרשום אחרי הגרש.

    * שווה מופיע פעמיים- בפעם הראשונה זו פעולה ההשמה ובפעם השנייה זה ערך השוויון (לדוג' Range(E2)="= E2+1").

     

  • בחירת תא (פעולת תזוזה)-

    Range("A1").Select- כדי שהסמן יקפוץ מהיכן שנמצא באותו הרגע אל התא שכתוב בRange וייבצע עליו את הפעולה.

    נקודה- מפעילה פעולה בעולם התכנות.

  • לחצן לביצוע פעולות-

    לשונית מפתחים -> הוסף -> פקדי טופס -> לחיצה על 'לחצן' (ימני עליון) -> צירוף פעולה ע'י לחיצה על שם התוכנית -> אישור

     

  • נתינת שם לטווח תאים-

    Range + סוגריים ובתוכם גרשיים וטווח התאים + פעולת שם (נקודה + Name, בלי רווח) + השמה.

    לדוגמא: Range("A1:A10").Name = "AllData"

     

  • ניקוי טווח תאים- (במידה וטווח תאים כבר מוגדר כשם כלשהו)

    Range + סוגריים ובתוכם גרשיים ושם הטווח + פעולת מחיקה (נקודה + Clear, בלי רווח).

    לדוגמא: Range("AllData").Clear

     

  • עיצוב גופן- (במידה וטווח תאים כבר מוגדר כשם כלשהו)

    * צבע-

    Range + סוגריים ובתוכם גרשיים ושם הטווח + פעולת גופן (נקודה + Font, בלי רווח) + פעולת צבע (נקודה + Color, בלי רווח) + השמה לצבע הרצוי (צבע נכתב כ Vb ואז הצבע באנגלית באות גדולה בהתחלה וללא רווח).

    לדוגמא: Range("AllData").Font.Color=VbGreen

    * הדגשה-

    Range + סוגריים ובתוכם גרשיים ושם הטווח + פעולת גופן (נקודה + Font, בלי רווח) + פעולת הדגשה (נקודה + Bolt, בלי רווח) + השמה לTRUE (כדי שיתקיים) או FULSE (כדי לא יתקיים).

    לדוגמא: כדי שתהיה הדגשה- Range("AllData").Font.Bolt=TRUE

     

  • פונקציות טקסט-

    * פונקציות שעובדות אותו הדבר גם באקסל וגם בתכנות-

    (לצורך הדוג': נתונה המחרוזת עם התווים A1="ABCD", אם היה רווח הוא גם היה נחשב בספירה).

    LEFT- חותכת מידע מההתחלה (הכיוון הוא כיוון השפה). לדוג': LEFT(A1,2) יהיה AB.

    הכתיבה באקסל תהיה: Range("A2")="=LEFT(A1,2)"

    הכתיבה בתכנות (VBA) תהיה: Range("A2")=LEFT(Range("A1"),2)

    RIGHT- חותכת מידע מהסוף (הכיוון הוא כיוון השפה). לדוג': RIGHT(A1,2) יהיה CD.

    MID- צריך לקבוע איפה להתחיל (המספר הראשון בסוגריים) וכמה לחתוך (המספר השני בסוגריים). לדוג': MID(A1,2,2) יהיה BC.

    LEN- מחזירה את כמות התווים במחרוזת. לדוג': LEN(A1) יהיה 4.

    TRIM-

    * פונקציות שעובדות רק בתכנות-

    INSTR

    VAL (= VALUE באקסל)

 

 

לצילום השיעור

 



3 − = אחד

תואר ראשון
תואר שני
מרצים