საიდუმლო არ არის, რომ Excel-ის მომხმარებლების უმეტესობა, ფურცლებზე ცხრილების შექმნისას, პირველ რიგში საკუთარ კომფორტსა და კომფორტზე ფიქრობს. ასე იბადება ლამაზი, ფერადი და უხერხული მაგიდები რთული „სათაურებით“, რომელთა გაფილტვრა და დახარისხება საერთოდ შეუძლებელია და ჯობია საერთოდ არ იფიქროთ ავტომატურ ანგარიშზე კრებსითი ცხრილით.
ადრე თუ გვიან, ასეთი ცხრილის მომხმარებელი მიდის დასკვნამდე, რომ "შეიძლება არც ისე ლამაზია, მაგრამ შეუძლია იმუშაოს" და იწყებს მისი მაგიდის დიზაინის გამარტივებას, კლასიკურ რეკომენდაციებთან შესაბამისობაში მოყვანას:
- მარტივი ერთსტრიქონიანი სათაური, სადაც თითოეულ სვეტს ექნება თავისი უნიკალური სახელი (ველის სახელი)
- ერთი ხაზი – ერთი დასრულებული ოპერაცია (გარიგება, გაყიდვა, განთავსება, პროექტი და ა.შ.)
- არ არის გაერთიანებული უჯრედები
- წყვეტების გარეშე ცარიელი რიგებისა და სვეტების სახით
მაგრამ თუ თქვენ გააკეთებთ ერთსტრიქონიან სათაურს მრავალ დონისგან ან გაყოფთ ერთ სვეტს რამდენიმე სვეტად, ეს საკმაოდ მარტივია, მაშინ ცხრილის რეკონსტრუქციას შეიძლება დიდი დრო დასჭირდეს (განსაკუთრებით დიდ ზომებში). ეს ნიშნავს შემდეგ მდგომარეობას:
| Of |  | do |  |
მონაცემთა ბაზების თვალსაზრისით, სწორ ცხრილს ჩვეულებრივ უწოდებენ ბრტყელ (ბრტყელს) - სწორედ ასეთი ცხრილების მიხედვით არის საუკეთესო კრებულის ცხრილების (pivot tables) ანგარიშების აგება და ანალიტიკის ჩატარება.
თქვენ შეგიძლიათ ორგანზომილებიანი ცხრილი ბრტყელ მაგიდად გადააქციოთ მარტივი მაკროს გამოყენებით. გახსენით Visual Basic რედაქტორი ჩანართის საშუალებით დეველოპერი – Visual Basic (დეველოპერი - Visual Basic რედაქტორი) ან კლავიატურის მალსახმობი Alt+F11. ჩადეთ ახალი მოდული (ჩასმა – მოდული) და დააკოპირეთ ამ მაკროს ტექსტი იქ:
Sub Redesigner() Dim i როგორც გრძელი Dim hc როგორც მთელი რიცხვი, hr როგორც მთელი რიცხვი Dim ns როგორც სამუშაო ფურცელი hr = InputBox("Сколько строк с подписями сверху?") hc = InputBox("Сколько столбцов со подписями слева?") Application.Screen False i = 1 Set inpdata = Selection Set ns = Worksheets.Add For r = (hr + 1) to inpdata.Rows.Count for c = (hc + 1) to inpdata.Columns.Count For j = 1 to hc ns. უჯრედები(i, j) = inpdata.Cells(r, j) შემდეგი j k = 1-დან სთ-მდე ns.Cells(i, j + k - 1) = inpdata.Cells(k, c) შემდეგი k ns.Cells( i, j + k - 1) = inpdata.Cells(r, c) i = i + 1 შემდეგი c შემდეგი r ბოლოს ქვე შემდეგ შეგიძლიათ დახუროთ VBA რედაქტორი და დაბრუნდეთ Excel-ში. ახლა ჩვენ შეგვიძლია ავირჩიოთ ორიგინალური ცხრილი (სრულიად, სათაურით და პირველი სვეტით თვეებით) და გავატაროთ ჩვენი მაკრო დეველოპერი – მაკრო (დეველოპერი - მაკრო) ან დაჭერით კომბინაცია Alt+F8.
მაკრო წიგნში ახალ ფურცელს ჩასვამს და მასზე შერჩეული ცხრილის ახალ, რეკონსტრუქციულ ვერსიას შექმნის. თქვენ შეგიძლიათ იმუშაოთ ასეთ ცხრილთან "სრულად", Excel-ის ინსტრუმენტების მთელი არსენალის გამოყენებით დიდი სიების დამუშავებისა და ანალიზისთვის.
- რა არის მაკროები, სად ჩავსვათ მაკრო კოდი VBA-ში, როგორ გამოვიყენოთ ისინი
- ანგარიშების შექმნა PivotTables-ით
- ინსტრუმენტი PLEX დანამატიდან XNUMXD ცხრილების ბრტყელ მაგიდებზე გადამუშავებისთვის