Closed TopicStart new topicStart Poll

Страницы: (1) 1 
balabol
дата: [ i ]
  • *
  • Мастер
  • Репутация: 939
  • Статус: Давай пообщаемся!
  • Member OfflineМужчинаСвободен
Программисты, привет!
Необходима реальная помощь - написать программку, которая требуется для работы.
Поясняю суть задачи:
Все исходные материалы находятся в книге Excel.
Книга содержит несколько листов.
Необходимо один лист сохранить как текстовый файл с кодировкой кодовой страницей 866 (под DOS).
При этом в исходном листе применяется автофильтр для отбора значений по определенному критерию.

Желательно чтобы:
1. Программа могла вытаскивать из книги Excel один лист самостоятельно, не открывая сам файл. Однако возможен вариант, чтобы книга состояла из одного листа. (В таком случае я этот лист из базы данных скопирую в новую книгу и сохраню отдельным файлом).
2. Программа была бы екзешным файлом. Дело в том, что я, самостоятельно, все это могу проделать и вручную - через буфер обмена скопировать в текстовый файл, а потом произвести перекодировку Штирлицем. Но моя бухгалтерия пока такими знаниями не обладает, а производить ежемесячно такие манипуляции придется, так что такая программа очень бы облегчила жизнь.
3. Если автофильтр нежелателен, то его можно и убрать...


Поможете? Плюс в репу гарантирую, могу и сэксиков подбросить. С остальным пока напряг.
KOsyak
дата: [ i ]
  • Group Icon
  • Мастер
  • Репутация: 316
  • Статус: %username%
  • Member OfflineПара М+ЖВ поиске
Задача 1 в 1 под VB .. он по моему и не на такое способен для офиса..


идя в том что все же оплата репой и сексо - не канает pardon.gif

balabol
дата: [ i ]
  • *
  • Мастер
  • Репутация: 939
  • Статус: Давай пообщаемся!
  • Member OfflineМужчинаСвободен
QUOTE (Kosyak @ 19.06.2006 - время: 00:14)
Задача 1 в 1 под VB .. он по моему и не на такое способен для офиса..


идя в том что все же оплата репой и сексо - не канает pardon.gif

Ну и сколько хочешь за готовую прогу?

Оплата - почтовым переводом устроит? Но после опробывания в работе.
xTriplex
дата: [ i ]
  • Group Icon
  • Мастер
  • Репутация: 269
  • Статус: Давай пообщаемся!
  • Member OfflineМужчинаСвободен
10-и минутная задачка на VB for Applications...

Завтра на работе набрасаю...о результатах сообщу...жди...
shvalentin
дата: [ i ]
  • *
  • Новичок
  • Репутация: нет
  • Статус: Давай пообщаемся!
  • Member OfflineМужчинаСвободен
Дай примерный исходный файл и файл который должен получиться.
Помагу!
xTriplex
дата: [ i ]
  • Group Icon
  • Мастер
  • Репутация: 269
  • Статус: Давай пообщаемся!
  • Member OfflineМужчинаСвободен
Вот посмотри...я в макросах не особо силен...за пару минут накинул на работе...больше времени небыло конец месяца...то сервер упадет, то клиент споткнеться... devil_2.gif

В макросе нет никакой защиты от дурака (это пока... biggrin.gif ), с автофильтром тоже пока не дружит...

В принципе можно и exe'шник склепать, чтоб допустим сидел в трэе и к екселю конектился и выдирал что надо или прогу, которая будет открывать файл, показывать тебе список листов, из которого сам выберишь, что конвертить, но с этим разбираться надо...до выходных у меня времени в обрез...если никто дельного не предложит за это время - пиши в личку...где-то за неделю разберусь и прогу сваяю...но тут уже плюсиком в репе не отделаешься...
Да и макрос можно довести до ума...тут уж по твоему желанию...

Ладно, увлекся что-то...итак по пунктам...

1 - Берешь мой файл, ложешь гденить в тихом и укромном месте... biggrin.gif

2 - Открываешь (не забудь поставить уровень безопасности, разрешающий запуск макросов)...

3 - Правый клик по панели инструментов - Настройка...

4 - Вкладка команды, Категории - Макросы....вытягиваешь настраиваемую кнопку на панель...

5 - Правый клик по кнопке с рожей, назначить макрос...

6 - Выбираешь Convetr2DOS... Устанавливаешь Находиться в: Convert.xls

7 - Сохраняешь Convert.xls...закрываешь его

8 - Открываешь нужную книгу...на ней нужную страницу...тискаешь кнопу...вводишь имя файла и расширение (автоматом опятьже пока расширение не добавляеться)...

9 - Закрываешь переименованную книгу в экселе (твой оригинал цел и не вредим, т.к. под другим именем)...

УСЕ!!!

З.Ы. На всякий случай когда будешь тестить сделай бэкап...мало-ли чего...
З.З.Ы. Жду плюсик...

З.З.З.Ы Жду предложений по дальнейшей разработке...

Да, кстати...выложи свой файл, чтоб было от чего отталкиваться...
balabol
дата: [ i ]
  • *
  • Мастер
  • Репутация: 939
  • Статус: Давай пообщаемся!
  • Member OfflineМужчинаСвободен
xTriplex
Спасибо огромное за помощь!

Прикладываю лист из книги, который необходимо конвертировать в ДОС(архивирован RAR 3.50).- ну это для того, что бы если будет время и желание мог взглянуть.
Дальше я постараюсь добить сам.
От меня респект за помощь, а если все срастется, то респект еще и за сам макрос!
xTriplex
дата: [ i ]
  • Group Icon
  • Мастер
  • Репутация: 269
  • Статус: Давай пообщаемся!
  • Member OfflineМужчинаСвободен
QUOTE (balabol @ 12.07.2006 - время: 22:47)
xTriplex
Спасибо огромное за помощь!

Прикладываю лист из книги, который необходимо конвертировать в ДОС(архивирован RAR 3.50).- ну это для того, что бы если будет время и желание мог взглянуть.
Дальше я постараюсь добить сам.
От меня респект за помощь, а если все срастется, то респект еще и за сам макрос!

Так у тя там связи с другими таблицами...ты бы комплектом выложил, а то лажа получаеться....
balabol
дата: [ i ]
  • *
  • Мастер
  • Репутация: 939
  • Статус: Давай пообщаемся!
  • Member OfflineМужчинаСвободен
Выложу чуть позже, т.к. сейчас всю форму переделываю.
Хотя брошу старую, так, для обдумывания. Она тоже содержит связи с другими таблицами, но при открытии нажми "не обновлять" а потом открывай лист "Льготы" - оттуда надо вытащить инфу, которая хранится в столбце "В". (это при условии использовании автофильтра)
Сейчас делаю разные листы для 5 различных категорий льгот - для каждого свой. Там уже автофильтр будет не нужен.
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)

Страницы: (1) 1

Closed TopicStart new topicStart Poll0


Рекомендуем почитать также топики:

Голосование

Проблем с сеткой

Странно тормозит локалка

Caesar

Комп не выключается



>