|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
30.08.2012, 10:47 | #1 |
Пользователь
Регистрация: 29.03.2011
Сообщений: 86
|
Правка макроса по обработке txt файла
Добрый день, знатоки Excel-я!
Вчера сделал запрос о помощи в макросе, но ответ так и не получил, наверное слишком много вопросов - решил упростить задачу ... Excel 2003. Макрос создан макрорекордером и обрабатывает txt файл с балансом. Все вроде бы настроил, но остается проблема съехавших влево подитогов по строкам - это в самом тексте (их нужно вернуть на место) и необходимо добавить столбец с последующей простановкой двух определенных символов по условию. Макрорекордером пользоваться умею, а дальше пока знаний не хватает. Помогите, пожалуйста!!!! Все в примере |
30.08.2012, 11:06 | #2 | |
Старожил
Регистрация: 02.05.2009
Сообщений: 3,907
|
Цитата:
Анализ,обработка данных Недорого
|
|
30.08.2012, 11:31 | #3 |
Пользователь
Регистрация: 29.03.2011
Сообщений: 86
|
Правка макроса по обработке txt файла
Понял, исправляюсь.
Архив тот же плюс в нем исхоный файл txt. |
30.08.2012, 12:05 | #4 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Думаю, там нужен вообще другой подход.
Но муторно, рутина... Поэтому все молчат И вообще - я бы из этого текстового файла делал два листа - в одном актив, в другом пассив. Шапки рисуем кодом, как у Вас уже сделано, а далее читаем построчно файл, смотрим чтоб с позиции например 25 были два символа-числа и с помощью Cdbl(Trim(mid())) наполняем таблицу. Одновременно для одной таблицы ищем "Итого по активу", для второй "Итого по пассиву" - значит пора подводить черту и со следующей строки будут итоги (хотя это видно и по тому, что в 25/2 числа, а в начале строки пусто). Если итоги не нужны - тогда вообще просто - смотрим позицию Mid(2,5) - если число, то строку обрабатываем в первую таблицу. Ну а если Mid(2,12)="П А С С И В", то далее пора второй лист начинать.
webmoney: E265281470651 Z422237915069 R418926282008
Последний раз редактировалось Hugo121; 30.08.2012 в 12:26. |
30.08.2012, 12:27 | #5 |
Старожил
Регистрация: 02.05.2009
Сообщений: 3,907
|
Ловите
Код:
Анализ,обработка данных Недорого
|
30.08.2012, 12:42 | #6 |
Пользователь
Регистрация: 29.03.2011
Сообщений: 86
|
ОК! Если так все сложно, пожалуйста напишите пример как хотябы строку с итогами передвинуть на одну ячейку вправо используя ключевое слово. Может быть я пойму и тогда сам разбирусь. Я вполне обучаемый, просто долго "втыкаю".
Не может быть что бы такую процедуру нужно было описывать огромным кодом. Что-то я опечален..... |
30.08.2012, 12:47 | #7 |
Пользователь
Регистрация: 29.03.2011
Сообщений: 86
|
Ай да doober, ай да ...... молодец!
Спасибо, буду разбираться. Не сочтите за наглость и тупость если что-то уточнить придется |
30.08.2012, 12:50 | #8 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Шапку doober только забыл присобачить (сорри за каламбур )
И суперски обошёл рутину - что-то я не подумал, что там можно цикл использовать... Ну для шапки у Вас код есть.
webmoney: E265281470651 Z422237915069 R418926282008
|
30.08.2012, 12:56 | #9 |
Старожил
Регистрация: 02.05.2009
Сообщений: 3,907
|
Буду только после 22 по Москве,тогда и отвечу
Анализ,обработка данных Недорого
|
30.08.2012, 12:57 | #10 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Сергей, может для надёжности объявить
Dim sd As Double Или где-то уйдёт в ошибку (не проверял)?
webmoney: E265281470651 Z422237915069 R418926282008
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Правка EXE файла посредством bin/hex редактора. Вопрос о возможности увеличения длинны строки | Вадим Мошев | Общие вопросы по программированию, компьютерный форум | 7 | 25.02.2012 00:02 |
чтение и правка *.txt.string.bin | Yungo161 | Общие вопросы Delphi | 8 | 24.01.2012 15:09 |
Запуск макроса при открытии файла | ПавелАлександрович | Microsoft Office Excel | 4 | 04.03.2011 10:07 |
Как скопировать текст с файла 1.txt и записать в 2.txt | Kasper1 | Общие вопросы по Java, Java SE, Kotlin | 1 | 14.12.2010 05:56 |