Страницы: 1
RSS
Приведение таблицы к нормальной форме
 
Здраствуйте, планетяне. Помогите, пожалуйста, решить проблему. Получаю я постоянно таблицу, но использовать для сводных ее нельзя. Формат получаемой таблицы постоянно одинаковый, хотя может рости вниз (добавляются новые бренды) и влево (появлятся регионы).  
Хочется написать макрос, который бы трансформировал таблицу в нормальную, которую (нормальную) можна было бы использовать в сводных.    
 
Мучаюсь уже пол-дня. Нарыл кучу похожих тем, но все они не похожи. Подбросьте простенький макрос, я уже дальше сам его приловчу (благодаря Планете немного в VBA разобрался)
 
{quote}{login=yavorsky90}{date=26.01.2011 06:09}{thema=Приведение таблицы к нормальной форме}{post}Подбросьте макрос  
{/post}{/quote}  
Подбрасываю:
 
Ошибочка :(  
Фрагмент должен быть такой:  
 
   H = N * M / 2  
   ReDim NormArr(H, 5)  
   For J = 1 To M / 2  
       C = 2 * J - 1  
       For I = 1 To N  
           R = (J - 1) * N + I  
           NormArr(R, 1) = RegArr(1, C)  
           NormArr(R, 2) = BrArr(I, 1)  
           NormArr(R, 3) = BrArr(I, 2)  
           NormArr(R, 4) = SaleArr(I, C)  
           NormArr(R, 5) = SaleArr(I, C + 1)  
       Next  
   Next  
   '
 
C.M., спасибо большое за помощь. Вы, правда, структуру финальной таблицы немного изменили, но все равно работать намного удобнее. Ещё раз спасибо.
 
{quote}{login=yavorsky90}{date=27.01.2011 12:38}{thema=}{post}Вы, правда, структуру финальной таблицы немного изменили{/post}{/quote}  
Как понял... Можно подправить (?)
 
Да нет, спасибо. Время и так экономится. А я сам попробую на выходных.
Страницы: 1
Читают тему
Наверх