מעצב מחדש שולחן

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

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

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

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

Of

do

מבחינת מסדי נתונים, הטבלה הנכונה נקראת בדרך כלל שטוחה (שטוחה) – לפי טבלאות כאלה עדיף לבנות דוחות של טבלאות ציר (טבלאות ציר) ולבצע אנליטיקה.

ניתן להמיר טבלה דו מימדית לטבלה שטוחה באמצעות מאקרו פשוט. פתח את עורך Visual Basic דרך הכרטיסייה מפתח – Visual Basic (מפתח - עורך Visual Basic) או קיצור מקלדת אחר+F11. הכנס מודול חדש (הכנס - מודול) והעתיקו לשם את הטקסט של המאקרו הזה:

Sub Redesigner() Dim i As Long Dim hc As Integer, hr As Integer Dim ns As Worksheet hr = InputBox("Сколько строк с подписями сверху?") hc = InputBox("Сколько столбцов столбцов с полбцов с полбцов с полбцов с полбцов с полбцов с полбцов с полбцов с полбцов с полбцов с полбцов с полбцов с полбцов с полбцов с полбцов с подписями сверху?") False i = 1 הגדר inpdata = קבוצת בחירה ns = גליונות עבודה. הוסף עבור r = (hr + 1) To inpdata.Rows.Count עבור c = (hc + 1) To inpdata.Columns.Count עבור j = 1 To hc ns. Cells(i, j) = inpdata.Cells(r,j) Next j For k = 1 To hr ns.Cells(i, j + k - 1) = inpdata.Cells(k,c) Next k ns.Cells( i, j + k - 1) = inpdata.Cells(r, c) i = i + 1 הבא c הבא r End Sub  

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

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

• מהן פקודות מאקרו, היכן להכניס קוד מאקרו ב-VBA, כיצד להשתמש בהן
• יצירת דוחות עם טבלאות PivotTables
• כלי לעיצוב מחדש של XNUMXD טבלאות לכאלה שטוחות מהתוסף PLEX