קבל ערך תא ב- Excel VBA (דוגמאות שלב אחר שלב)

קבל ערך תא עם Excel VBA

תא הוא תא בודד והוא גם חלק מטווח, מבחינה טכנית ישנן שתי שיטות לאינטראקציה עם תא ב- VBA והן שיטת הטווח ושיטת התא, שיטת הטווח משמשת כמו טווח ("A2") ערך אשר ייתן לנו את הערך של תא A2 או שנוכל להשתמש בשיטת התא כתאים (2,1) .ערך אשר גם ייתן לנו את הערך של תאי A2.

בין אם זה מצטיין בעבודה או בעבודה ב- VBA, כולנו זקוקים לעבודה עם תא או תאים מכיוון שכל הנתונים יאוחסנו בתאים, כך שהכל מסתכם עד כמה אנו יודעים על תאים ב- VBA. לכן, אם תאים הם חלק כה מכריע ב- VBA, חשוב להבין אותם היטב ואם אתה מתחיל ביחס לתאי VBA, מאמר זה ידריך אותך כיצד להשיג ערכי תאים ב- Excel VBA בפירוט.

דבר ראשון ראשית נוכל להתייחס או לעבוד עם תאים ב- VBA בשתי דרכים כלומר באמצעות מאפיין CELLS ואובייקט RANGE. מדוע CELLS הוא מאפיין ומדוע RANGE הוא אובייקט הוא אנלוגיה שונה ובהמשך המאמר, נגיע לנקודה זו.

דוגמאות לקבלת ערך תא ב- Excel VBA

להלן הדוגמאות של Get Value Value ב- Excel VBA.

אתה יכול להוריד תבנית Excel זה לקבל תא ערך ל- VBA כאן - תבנית VBA לקבל ערך של Excel

דוגמה מס '1 - שימוש במאפיין RANGE או CELLS

לדוגמא, בתא A1 יש לנו ערך של "הודו".

כדי להפנות לתא זה נוכל להשתמש במאפיין CELLS או באובייקט RANGE, בואו נראה בפירוט את שניהם.

שימוש במאפיין טווח

ראשית, התחל את הליך המאקרו.

קוד:

 תת Get_Cell_Value () סוף משנה 

כעת פתח את האובייקט RANGE.

קוד:

 טווח משנה Get_Cell_Value () (סוף משנה 

הטיעון הראשון של אובייקט זה הוא "Cell1" כלומר לאיזה תא אנו מתייחסים. במקרה זה, זהו תא A1, לכן עלינו לספק את כתובת התא במרכאות כפולות עבור אובייקט RANGE.

קוד:

 טווח משנה Get_Cell_Value () ("A1") משנה משנה 

מכיוון שרק תא אחד מתייחס לפרמטרים אחרים אינם רלוונטיים, לכן סגר את התושבת ושם נקודה כדי לראות את רשימת האינטליגנציה.

כפי שניתן לראות מעל הרגע בו הנחנו נקודה אנו יכולים לראות את כל רשימת האינטליגנציה הזמינה של מאפיינים ושיטות של אובייקט טווח.

מכיוון שאנו בוחרים את התא עלינו לבחור בשיטת "בחר" מרשימת האינטליגנציה.

קוד:

 טווח משנה Get_Cell_Value () ("A1"). בחר סוף משנה 

כעת בחר בתא שאינו A1 והפעל את הקוד.

לא משנה איזה תא בחרת ברגע שהפעלת את הקוד הוא בחר בתא שהוזכר, כלומר תא A1.

שימוש בתכונה של תאים

באופן דומה, אנו משתמשים כעת במאפיין CELLS.

קוד:

 טווח משנה Get_Cell_Value () ("A1"). בחר תאים (סיום משנה 

זה לא כמו אובייקט RANGE שבו נוכל לספק את כתובת התא ישירות, אך באמצעות מאפיין CELLS זה איננו יכולים לעשות זאת.

הטיעון הראשון של מאפיין זה הוא "אינדקס שורות" כלומר לאיזו שורה אנו מתייחסים. מכיוון שאנו בוחרים את התא A1 אנו מתייחסים לשורה הראשונה, אז אזכור 1.

הטיעון הבא הוא "אינדקס העמודות" כלומר לאיזה טור אנו מתייחסים. עמודת תא A1 היא העמודה הראשונה, אז הזן 1.

הקוד שלנו קורא CELLS (1, 1) כלומר העמודה הראשונה בשורה הראשונה = A1.

עכשיו שים נקודה ובדוק אם אתה זוכה לראות את רשימת האינטליגנציה או לא.

עם מאפייני CELLS איננו יכולים לראות שום רשימת IntelliSense, לכן עלינו להיות בטוחים לחלוטין במה שאנחנו כותבים. הזן "בחר" כשיטה.

קוד:

 טווח משנה Get_Cell_Value () ("A1"). בחר תאים (1, 1). בחר סוף משנה 

פעולה זו תבחר גם בתא A1.

דוגמה מס '2 - קבל ערך מהתא ב- Excel VBA

הבחירה היא הדבר הראשון שלמדנו, כעת נראה כיצד להשיג ערך מהתאים. לפני שנבחר את התא עלינו להגדיר את המשתנה לאחסון הערך מהתא.

קוד:

 תת Get_Cell_Value1 () עמום CellValue כ- Sub String End 

כעת הזכר את כתובת התא באמצעות אובייקט RANGE או מאפיין CELLS. מכיוון שאתה מתחיל השתמש באובייקט RANGE רק מכיוון שעם אובייקט RANGE אנו זוכים לראות את רשימת האינטליגנציה.

עבור המשתנה המוגדר הניחו סימן שווה וציינו את כתובת התא.

קוד:

 תת Get_Cell_Value1 () עמום CellValue כמחרוזת CellValue = טווח ("A1") תת סוף 

שוב שים נקודה כדי לראות את רשימת האינטליגנציה.

מרשימת vba intellisense בחר מאפיין "ערך" כדי לקבל את הערך מהתא שהוזכר.

קוד:

 תת Get_Cell_Value1 () עמום CellValue כמחרוזת CellValue = טווח ("A1"). ערך סוף משנה 

כעת המשתנה "CellValue" מחזיק את הערך מהתא A1. הראה ערך משתנה זה בתיבת ההודעות ב- VBA.

קוד:

 תת Get_Cell_Value1 () עמום CellValue כמחרוזת CellValue = טווח ("A1"). ערך MsgBox CellValue סוף משנה 

בסדר, הפעל את הקוד וראה את התוצאה בתיבת הודעה.

מכיוון שיש בתא A1 ערך של "INDIA" אותו הדבר הופיע גם בתיבת ההודעות. ככה, לפי ערך VBA של התא אנו יכולים לקבל את ערך התא.

דוגמה מס '3 - השג ערך מתא אחד לתא אחר

אנו יודעים כיצד להשיג ערך מהתא באמצעות vba, כעת השאלה היא כיצד להכניס ערך לתא. בואו ניקח את אותה דוגמה בלבד, עבור תא A1 עלינו להכניס את הערך של "INDIA" ואת זה אפשר לעשות מהקוד שלמטה.

קוד:

 טווח משנה Get_Cell_Value2 () ("A1"). ערך = "INDIA" סוף משנה 

זה יכניס את הערך של "INDIA" לתא A1, באופן דומה כדי לקבל ערך מתא אחד לתא נוכל לכתוב את הקוד כמפורט להלן.

קוד:

 טווח Get_Cell_Value2 () משנה ("A5"). ערך = טווח ("A1"). משנה סוף סוף 

תן לי להסביר לך את הקוד.

"עבור התא A5 אנו זקוקים לערך שהוא מערך התא A1", זה כל מה שהקוד הזה אומר. אז זה יקבל את הערך מתא A1 ל- A5 באמצעות קוד VBA.

דברים שיש לזכור

• הכנסת ערך לתאים וקבלת ערך מהתא מחייבת שימוש במאפיין VBA "VALUE".
• באמצעות מאפיין CELLS אנו יכולים לבחור תא אחד בלבד אך באמצעות אובייקט RANGE אנו יכולים לבחור מספר תאים.