Ba asiri ba ne cewa yawancin masu amfani da Excel, lokacin ƙirƙirar tebur akan zanen gado, da farko suna tunanin jin daɗi da jin daɗin kansu. Wannan shine yadda kyau, launuka masu ban sha'awa, tebur mai ban sha'awa tare da hadaddun "headers", waɗanda, a lokaci guda, ba za a iya tacewa ko daidaita su ba, kuma yana da kyau kada kuyi tunanin rahoton atomatik tare da tebur pivot kwata-kwata.
Ba da dade ko ba dade, mai amfani da irin wannan tebur ya zo ga ƙarshe cewa "ba zai zama da kyau sosai ba, amma yana iya aiki" kuma ya fara sauƙaƙe ƙirar teburinsa, yana kawo shi cikin layi tare da shawarwarin gargajiya:
- mai sauƙi mai layi ɗaya, inda kowane shafi zai sami sunansa na musamman (sunan filin)
- layi daya - aiki ɗaya da aka kammala (yarjejeniya, siyarwa, aikawa, aiki, da sauransu)
- babu sel da aka haɗa
- ba tare da raguwa a cikin nau'i na layuka marasa komai da ginshiƙai
Amma idan kun yi rubutun layi daya daga cikin matakai masu yawa ko raba ginshiƙi ɗaya zuwa da yawa, abu ne mai sauƙi, sa'an nan kuma sake gina tebur na iya ɗaukar lokaci mai yawa (musamman a manyan masu girma). Yana nufin yanayi mai zuwa:
| Of |  | do |  |
Dangane da bayanan bayanai, ana kiran teburin daidai (lebur) - bisa ga irin waɗannan tebur ɗin cewa ya fi dacewa don gina rahotannin tebur na pivot (Tables) da gudanar da nazari.
Kuna iya canza tebur mai girma biyu zuwa tebur mai faɗi ta amfani da macro mai sauƙi. Bude Editan Kayayyakin Kayayyakin Kayayyakin Ta hanyar shafin Developer - Kayayyakin Kayayyakin Kayayyakin Kayayyakin (Mai Haɓakawa - Editan Kayayyakin gani) ko gajeriyar hanyar keyboard alt+F11. Saka sabon tsari (Saka - Module) da kwafi rubutun wannan macro a can:
Sub Redesigner() Dim i As Long Dim hc As Integer, hr As Integer Dim ns As Worksheet hr = InputBox("Сколько строк с подписями сверху?") hc = InputBox ("Сколько строк с подписями сверху?") hc = InputBox ("Сколько строк с подписями сверху?") Karya i = 1 Saita inpdata = Zaɓi Saitin ns = Taswirar Aiki. Ƙara Don r = (hr + 1) Zuwa inpdata.Rows.Count For c = (hc + 1) Zuwa inpdata. Rukunin. Ƙidaya Don j = 1 Zuwa hc ns. Kwayoyin (i, j) = inpdata.Cells(r, j) Na gaba j Domin k = 1 Zuwa hr ns.Cells(i, j + k - 1) = inpdata.Cells(k, c) Na gaba k ns.Cells( i, j + k - 1) = inpdata.Cells(r, c) i = i + 1 Na gaba c Gaba r Ƙarshen Ƙarshe Kuna iya rufe editan VBA kuma ku koma Excel. Yanzu za mu iya zaɓar tebur na ainihi (gaba ɗaya, tare da taken da shafi na farko tare da watanni) kuma mu gudanar da macro ta hanyar. Developer - Macros (Developer - Macros) ko danna hade alt+F8.
Macro zai saka sabon takarda a cikin littafin kuma ya ƙirƙiri sabon sigar tebur ɗin da aka sake ginawa akansa. Kuna iya aiki tare da irin wannan tebur "cikakke", ta amfani da dukkan arsenal na kayan aikin Excel don sarrafawa da kuma nazarin manyan jeri.
- Menene macros, inda za a saka macro code a cikin VBA, yadda ake amfani da su
- Ƙirƙirar Rahotanni tare da PivotTables
- Kayan aiki don sake tsara tebur na XNUMXD zuwa masu fa'ida daga ƙari na PLEX