|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
14.07.2011, 20:35 | #1 |
Регистрация: 14.07.2011
Сообщений: 3
|
Дублирование строк для бухгалтерских проводок
Здравствуйте, помогите найти функцию, как из одной таблицы, сделать новую, при этом из каждой строки сделать 3 строчки.
Пример Исходная строка: 2011-6 1-6-2011 11500890 1300 Debiteuren - klanten 6666 12347 Leo Batenburg 145,00 Надо получить: 2011-6 1-6-2011 11500890 1300 Debiteuren - klanten 6666 12347 Leo Batenburg 145,00 2011-6 1-6-2011 11500890 8010 Goederen 19% groep 1 6666 12347 Leo Batenburg -121,85 2011-6 1-6-2011 11500890 1503 Af te dragen BTW 19% 6666 12347 Leo Batenburg -23,15 При этом данные столбцов 1,2,3,6,7,8 дублируются столбцы 4 и 5 - всегда имеют те же самые 3 значения а столбец 9 содержит формулу (разделяется сумма продажи на сумму без НДС и НДС отсдельно) Таблица большая, приходит каждый месяц, нужно для экспорта из программы учета товара в бухгалтерскую программу. Никак по другому, как через эксель программы друг с другом не коннектятся. ПС. Пользуюсь excel 2010 Спасибо заранее за помощь. |
14.07.2011, 20:51 | #2 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Данные в массив, создаём пустой в 3 раза больше, перебор исходного массива и перекладывание в новый массив.
Выгрузка нового массива.
webmoney: E265281470651 Z422237915069 R418926282008
|
14.07.2011, 21:19 | #3 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Только насчёт процентов не сходится - я вроде 19 считал...
Проценты сами подкорректируйте, как Вам нужно. Код:
webmoney: E265281470651 Z422237915069 R418926282008
Последний раз редактировалось Hugo121; 14.07.2011 в 21:25. |
15.07.2011, 05:43 | #4 |
Регистрация: 14.07.2011
Сообщений: 3
|
Hugo121
Спасибо за помощь, если бы вы еще объяснили, что с этим делать. А то мои познания дальше функций и сортировок не распространяются... |
15.07.2011, 05:48 | #5 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Файл давайте - сделаю кнопку...
webmoney: E265281470651 Z422237915069 R418926282008
|
15.07.2011, 05:56 | #6 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Хотя... вот Вам файл.
Открываете его, потом свой файл (копию!!! ), потом жмёте Alt+F8 и выбираете макрос Lanatje, ОК.
webmoney: E265281470651 Z422237915069 R418926282008
|
16.07.2011, 11:22 | #7 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Что-то пропал заказчик...
Я не тогровец, поэтому в процентах не специалист... Там вероятно так нужно делать (тогда цифры сходятся): Код:
webmoney: E265281470651 Z422237915069 R418926282008
|
16.07.2011, 12:22 | #8 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
заказчик пошел нынче какой-то ветренный - то пропадет, то появится снова...
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
19.07.2011, 15:21 | #9 |
Регистрация: 14.07.2011
Сообщений: 3
|
Извините, что пропала - отчетный период сами понимаете...
Просто нашла в программе возможность экспорта не готовых проводок, а самого списка продаж и моих знаний хватило на эту операцию )) Поэтому вопрос закрылся до следующего месяца.... Но все равно большое спасибо, буду осваивать. Новый месяц не горами, да и для других клиентов пригодится Что касается формул - то для второй строки = -1 * округление (значение / 1,19), 2 знака, для третьей = -1 * округление (значение / 1,19 * 0,19) вместе три строки должны давать в сумме 0 Большое спасибо за оперативную и качественную помощь! |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
TStringList и дублирование строк | us4us | Общие вопросы Delphi | 4 | 25.04.2011 22:30 |
Аналог "Сквозных строк" для формирования итоговых строк на печать. | kotyambala | Microsoft Office Excel | 0 | 05.05.2010 13:40 |
дублирование строк в таблице | windrun | БД в Delphi | 0 | 27.02.2010 22:53 |
дублирование строк в документ | varelik | Общие вопросы Delphi | 0 | 02.12.2009 17:05 |
Дублирование(файл) | ТРОЯН=) | Помощь студентам | 5 | 30.03.2009 10:33 |