Није тајна да већина корисника Екцел-а, када креира табеле на листовима, пре свега размишља о сопственој удобности и погодности. Тако се рађају лепе, шарене и гломазне табеле са сложеним „заглављима“, које се, у исто време, уопште не могу филтрирати или сортирати, а о аутоматском извештају са пивот табелом боље је уопште и не размишљати.
Пре или касније, корисник таквог стола долази до закључка да „можда није тако леп, али може да функционише“ и почиње да поједностављује дизајн свог стола, усклађујући га са класичним препорукама:
- једноставно заглавље у једном реду, где ће свака колона имати своје јединствено име (име поља)
- један ред – једна завршена операција (посао, продаја, књижење, пројекат итд.)
- нема спојених ћелија
- без паузе у виду празних редова и колона
Али ако направите заглавље у једном реду од заглавља на више нивоа или поделите једну колону на неколико, то је прилично једноставно, онда реконструкција табеле може потрајати много времена (нарочито код великих величина). То значи следећу ситуацију:
| Of |  | do |  |
Што се тиче база података, десна табела се обично назива флат (флат) – према таквим табелама је најбоље градити извештаје изведених табела (пивот табле) и вршити аналитику.
Можете да конвертујете дводимензионалну табелу у равну табелу помоћу једноставног макроа. Отворите Висуал Басиц Едитор преко картице Програмер – Висуал Басиц (Програмер — Висуал Басиц Едитор) или пречица на тастатури други+ФКСНУМКС. Убаците нови модул (Инсерт – Модул) и копирајте текст овог макроа тамо:
Суб Редесигнер() Дим и Ас Лонг Дим хц Ас Интегер, хр Ас Интегер Дим нс Ас Ворксхеет хр = ИнпутБок("Сколько строк с подписами сверху?") хц = ИнпутБок("Сколько столбцов с подписами слева?") Апплицатион.СцреенУпдатинг = Нетачно и = 1 Постави инпдата = Избор Постави нс = Радни листови. Додај за р = (хр + 1) У инпдате.Редови.Број за ц = (хц + 1) За инпдате.Колоне.Број за ј = 1 До хц нс. Ћелије(и, ј) = инпдата.Целлс(р, ј) Следеће ј За к = 1 То хр нс.Целлс(и, ј + к - 1) = инпдата.Целлс(к, ц) Следеће к нс.Целлс( и, ј + к - 1) = инпдата.Целлс(р, ц) и = и + 1 Следеће ц Следеће р Крај под Затим можете затворити ВБА едитор и вратити се у Екцел. Сада можемо изабрати оригиналну табелу (у потпуности, са заглављем и првом колоном са месецима) и покренути наш макро кроз Програмер – Макрои (Програмер — Макрои) или комбинација притискања други+F8.
Макро ће уметнути нови лист у књигу и креирати нову, реконструисану верзију изабране табеле на њој. Са таквом табелом можете радити „у потпуности“, користећи читав арсенал Екцел алата за обраду и анализу великих листа.
- Шта су макрои, где убацити макро код у ВБА, како их користити
- Креирање извештаја са изведеним табелама
- Алат за редизајн КСНУМКСД табела на равне из ПЛЕКС додатка