Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Excel VBA (часть 3)

Модерирует : ShIvADeSt

 Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213

Открыть новую тему     Написать ответ в эту тему

ShIvADeSt



Moderator
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

 
 
Обсуждаем вопросы только по Excel VBA
(программирование макросов, скриптов, пользовательских функций и т.п.).
Приветствуются ссылки на ресурсы и справочную литературу по теме.
 
Вопросы по работе с MS Excel, не относящиеся к программированию, задаем в теме Excel FAQ

 
Обратите внимание, этот топик для помощи в изучении и использовании VBA. Посему запросы типа "Напишите мне такой-то макрос, я VBA не знаю и знать не хочу" не приветствуются.
Древняя мудрость: "Накорми голодного рыбой и он погибнет, научи его ловить рыбу и ты спасешь его."(R)
 
Предыдущие ветки топика: Часть 1, Часть 2
 
Информация общего характера:
  • Список соответствия имен функций в английской и русской версиях Excel
  • Описание Microsoft Excel File Format (eng.)
     
    Рекомендации:
    Если у Вас есть проблема, не решаемая стандартными средствами Excel (об этом можно уточнить здесь) или требующая автоматизации, попробуйте для начала записать макрос самим Excel через меню Сервис (Tools) - Макрос (Macro) - Начать запись (Record New Macro). Подробнее здесь. В большинстве случаев получившийся код (Сервис-Макрос-Макросы-Изменить) Вас не удовлетворит, но подскажет, какие объекты-методы-свойства использовать.  
    Другой Ваш помощник - Просмотр объектов (Object Browser). Ну и встроення помощь (F1), естественно.
     
    Если Вы в тупике, покажите Ваш код (или часть кода) здесь.  Если вылазит ошибка, цитируйте ее полностью. Если код слишком большой, используйте тeг [more].
    Используйте отладчик - Breakpoints (F9), Watches (Shift-F9), Steps (F8 и др.) Сильно облегчает поиск ошибок.

     
    Рекомендуется к прочтению:
  • Первые шаги с Excel VBA
  • Excel VBA: Приёмы программирования
  • WinApi. Лекция из курса "Основы офисного программирования и язык VBA" (для продвинутых)
  • Daily Dose of Excel (eng.) - тематический блог: советы по работе с Excel и прочие материалы
  • Excel Macros & Excel VBA Code Tips, Tricks (eng.) - советы, трюки и уловки
  • Mr. Excel (forum) (eng.) - весьма оживленный форум по Excel&VBA.
  • Приемы, хитрости, трюки и нюансы работы в Microsoft Excel - сайт "Планета Excel", целиком посвященный Excel и всему, что с ним связано.
  • Microsoft Excel: Таблицы и VBA. Справочник. Вопросы и Ответы. Советы. Примеры.  
     
    Родственные топики:
  • Вопросы по работе с MS Excel - Excel FAQ - часть 1, часть 2, часть 3
  • Технические проблемы с MS Office 2003 или Office XP.
  • Word VBA все вопросы по Word VBA туда
  • Access все вопросы по программированию в Access туда
  • Книжульки по VBA - книги по программированию с использованием VBA
     
    Конкретные вопросы:
    Форма-заставка
    Как запустить макрос при изменении положения курсора или значения ячейки
  • Пример 1
  • Пример 2
  • Пример 3 (проверка области)
  • Пример 4
  • Пример 5
    Зацикливание в функции Change или SelectionChange
     
    Ранжирование без пробелов (макрос включает функции сортировки массива и удаления дубликатов, работает и в Excel 2007)
  • под Office 97
     
    Добавление в главное меню своего пункта, ассоциированного с макросом
    Создание ярлыка на рабочем столе
    Снятие защиты листа при забытом пароле
    Смена раскладки клавиатуры
    Скролл формы колесом прокрутки мыши
    Оптимизация кода по быстродействию использованием массивов
    Найти "чужое" окно и нажать в нем кнопку (вписать текст в текстовое поле)
    Работа с UNICODE-символами в VBA: запись, чтение из ячейки, перевод в ASС и обратно
    Как программно подключить дополнительные библиотеки (например, "Microsoft Scripting Runtime" или "Microsoft ActiveX Data Objects 2.8 Library) через References
     
    Перечень основных ColorIndex'ов из MSDN
     

    Смежные темы:
    Программы » Microsoft Office 2019 & 365 | 2016 | 2013 | 2010 | 2007 | 2003
    Программы » OneNote | Outlook 2013 & 2016 & 2019 | Outlook 2010 | Microsoft Mathematics & Math Solver
    Программы » Word FAQ | Excel FAQ | Access FAQ
    Прикладное программирование » Word VBA | Access VBA  
    Андеграунд » Microsoft Office 2019 | 2016 | 2013 | 2010 | 2007 | 2003
    Андеграунд » OneNote | Visio | SharePoint Server | Project Server | Exchange Server
    Андеграунд » Надстройки (add-ins) и коммерческие макросы Excel
    Андеграунд » Самостоятельная сборка дистрибутивов Оffice 2007/2010/2013/2016 | MUI для Office 2007

  • Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 10:16 11-01-2010 | Исправлено: ALeXkRU, 16:42 03-08-2021
    grbdv

    BANNED
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    JekG
    В общем случае эту сложную конструкцию можно заменить:
    Cells.SpecialCells(xlCellTypeLastCell).Formula = "бла бла"

    Всего записей: 1163 | Зарегистр. 20-08-2011 | Отправлено: 01:52 17-08-2012
    Mishel917

    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Всем доброго времени суток!
     
    На листе Excel создана таблица с данными, напрмер в диапазоне B5:E10.
     
    Вопрос, - каким макросом можно сохранить лист (или книгу) с данными таблицы в формат XLM?
     
    Добавлено:
    ... в формат XML?

    Всего записей: 40 | Зарегистр. 28-07-2012 | Отправлено: 22:41 17-08-2012
    grbdv

    BANNED
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Mishel917
    Ты так и не научился курить маны? Или в гугле забанен?
    SaveAsXMLData  
     
    Добавлено:
    SaveAs FileFormat:= xlXMLSpreadsheet еще в помощь, если чо...
     
    Добавлено:
    Держи. Перезалил

    Всего записей: 1163 | Зарегистр. 20-08-2011 | Отправлено: 22:48 17-08-2012
    Mishel917

    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    grbdv
     
    Большое спасибо ! Я гуглил, но этот список превзошол все ожидания...
     
    С этим вопросом задают ещё такой, - каким макросом сохранённые данные в XML формате вывести на печать в PDF формате?

    Всего записей: 40 | Зарегистр. 28-07-2012 | Отправлено: 23:09 17-08-2012
    grbdv

    BANNED
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Mishel917
    Обычный вывод на печать... На любой установленный виртуальный принтер, поддерживающий PDF. novaPDF - у меня, к примеру.
     
    PrintOut
     
    Ты хэлп начнешь читать когда нибудь?!  
    Нажми в окне редактора F2 - Object Browser, введи в поиск интересующий тебя термин и уже вопрос практически решен. Дальше - F1.  
     
    Добавлено:
    Сорри. Это я про книгу. А XML - это же простой текстовый файл. Вопрос наверное к XML-редакторам. Если есть библиотеки, API, подключить и печатать... если уж все так необходимо из екселя делать... Не совсем ясна задача...

    Всего записей: 1163 | Зарегистр. 20-08-2011 | Отправлено: 23:21 17-08-2012
    Mishel917

    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Задача такая. В налоговой накладной на листе Excel в графе “товары/услуги” пишут длинную запись. Подобрав оптимальный шрифт – Magneto № 10,5 и структуру бланка, таких длинных записей в накладной на одном листе формата А4 можно разместить всего четыре. Если необходима пятая запись, то её записывают на втором листе. Задача состоит в том чтобы получить больше записей на одном листе формата А4. Очевидно, если сохранить Дкумент.xls в формат .xml и распечатать в pdf формате, то таким образом можно получить больше записей на одном листе А4?

    Всего записей: 40 | Зарегистр. 28-07-2012 | Отправлено: 23:52 17-08-2012
    grbdv

    BANNED
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Mishel917
    Цитата:
    Задача такая. В налоговой накладной на листе Excel в графе “товары/услуги” пишут длинную запись. Подобрав оптимальный шрифт – Magneto № 10,5 и структуру бланка, таких длинных записей в накладной на одном листе формата А4 можно разместить всего четыре. Если необходима пятая запись, то её записывают на втором листе. Задача состоит в том чтобы получить больше записей на одном листе формата А4. Очевидно, если сохранить Дкумент.xls в формат .xml и распечатать в pdf формате, то таким образом можно получить больше записей на одном листе А4?

    Мишель, прости, но... вот все это... все, что выше... ты все это серьезно? Ты xml в глаза-то видел? Может мы о разных вещах говорим?
     
    Единственное преимущество, которое даст тебе xml-вариант хранения xls-документа, это то, что ты его архиватором сожмешь более эффективно (раза в два-три). А экранное и печатное представления останутся теми же. Должны, по идее, остаться... Так задумано...
     
    Да и постановка задачи не православна. Щаз влазит три, завтра же будет поле еще длинней. И уже три не будет влазить...
     
    Меня смущает твое "очевидно". Поэтому я все с оговорками и многоточиями (я любитель, не профи). Можешь ты продемонстрировать свое "очевидно"?

    Всего записей: 1163 | Зарегистр. 20-08-2011 | Отправлено: 00:18 18-08-2012
    Mishel917

    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Как пример, для себя взял программу OPZ. Там есть текстовый редактор и компактное размещение текста в pdf формате.

    Всего записей: 40 | Зарегистр. 28-07-2012 | Отправлено: 00:55 18-08-2012
    grbdv

    BANNED
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Mishel917
    Мы говорили об xls --> xml. Не так ли? Причем тут OPZ и прочая хрень?

    Цитата:
    взял программу OPZ. Там есть текстовый редактор и компактное размещение текста в pdf формате.

    Компактней, чем в Excel? Ты чо седни курил?  
     
    Добавлено:
    Все. Хватит. Оффтоп голимый. Вопросы только по VBA. За все остальное пойдешь в кнопку.

    Всего записей: 1163 | Зарегистр. 20-08-2011 | Отправлено: 01:05 18-08-2012
    Mishel917

    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    grbdv
     
    Провёл пробу. Формат pdf уплотняет текст документа.xls через xml на 30%, для других вариантов текста уплотнение может достигать 40%. Остаётся эту технологию закодировать а VBA. Перехожу на вопросы по VBA.

    Всего записей: 40 | Зарегистр. 28-07-2012 | Отправлено: 13:16 18-08-2012
    Dogmatek

    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    У меня вопрос, как можно запустить макрос программным путем (из другого макроса), при этом в случае, если макрос не найден, программа продолжала работать.
     
    Метод Application.Run "Макрос", в случае если его не существует, программа прерывается.
    Каким образом можно узнать существует ли данный макрос или нет?

    Всего записей: 44 | Зарегистр. 25-01-2005 | Отправлено: 18:04 18-08-2012
    grbdv

    BANNED
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Dogmatek
    Поставь обработчик ошибок...  
     
    В сторону "Microsoft Visual Basic for Applications Extensibility" (VBE6EXT.OLB) посмотреть, может там есть какой функционал для явной проверки наличия процедуры.
     

    Всего записей: 1163 | Зарегистр. 20-08-2011 | Отправлено: 18:21 18-08-2012
    Mishel917

    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Всем доброго времени суток!
     
    Для книги Excel из одного листа создан собственный xml-файл. Вопрос, - каким кодом vba для этого xml-файла создать собственный pdf-файл, для последующей печати pdf-файла?
    Или так, -  как распарсить XML документ в VBA и создать на основе полученных данных PDF-файл?

    Всего записей: 40 | Зарегистр. 28-07-2012 | Отправлено: 23:28 19-08-2012
    grbdv

    BANNED
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Mishel917
    Их какого приложения идет печать на pdf документа xml?
     
    Думаю, надо подключить VBScript или работать через его объект.
    И, будь ласка, выложи оба pdf, распечатанные с xls и из xml.

    Всего записей: 1163 | Зарегистр. 20-08-2011 | Отправлено: 23:51 19-08-2012
    Mishel917

    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Здесь http://sts.gov.ua/elektronna-zvitnist/platnikam-podatkiv-pro-ele/programne-zabezpechennya-/opz-programne-zabezpechennya/ скачать приметы форматирования электронных документов. Пример отпечатать в Excel. Для выбранного создать собственный xml-файл (Сохранить XML). Для XML-файла в программе создаётся PDF для печати. Сравнить высоту текста в А4.

    Всего записей: 40 | Зарегистр. 28-07-2012 | Отправлено: 00:37 20-08-2012
    grbdv

    BANNED
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Mishel917
    Щаз, разбежались твой говносайт на говносуржике пережевывать! Тут РУССКОЯЗЫЧНЫЙ п. 1. главы VI Соглашения по использованию форум. Ты нюх совсем, походу, потерял. Тебе и так все на блюдце с каемкой несут под все твои капризы.
     
    Выкладывай СВОИ экземпляры готовых пдф на ргхост или разговор окончен.

    Всего записей: 1163 | Зарегистр. 20-08-2011 | Отправлено: 01:03 20-08-2012
    Mishel917

    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

    Цитата:
    Их какого приложения идет печать на pdf документа xml?  

     
    Непосредственно печать pdf документа проводится в отдельном приложении, технологии не знаю, там же может быть и парсинг перед печатью. Но может всё это возможно не выходя из VBA?
     
     
     

    Всего записей: 40 | Зарегистр. 28-07-2012 | Отправлено: 01:08 20-08-2012
    grbdv

    BANNED
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Mishel917
    Слушай, ты русский язык понимаешь?
     
    Вот ты писал:
    Цитата:
    Провёл пробу. Формат pdf уплотняет текст документа.xls через xml на 30%, для других вариантов текста уплотнение может достигать 40%

     
    Вот я писал:
    Цитата:
    И, будь ласка, выложи оба pdf, распечатанные с xls и из xml.  

     
    Дальше ты начинаешь финтить и в упор не хочешь выкладывать ни экономию (фуфло, туфта имо), ни хотя бы просто образцы. Ты не отвечаешь на прямо заданный вопрос - откуда ты печатаешь, из какого приложения.  
     
    Будешь дальше себя так же вести - я буду добиваться для тебя если не бана, то запрета на пост здесь. Не обессудь. А пока - выполни все мои просьбы, плз. Это ведь тебе надо, не мне...
     
     
    Добавлено:
    Напомню - обсуждаем ТОЛЬКО Ексель, ВБА и все связанное с этим. Остальное - фтопку.  
    Ну подключить сторонние библиотеки или API (нюансы - к вендору на форум) - поможем. Все остальное - оффтоп.

    Всего записей: 1163 | Зарегистр. 20-08-2011 | Отправлено: 01:36 20-08-2012
    psiho

    Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

    Цитата:
    У меня вопрос, как можно запустить макрос программным путем (из другого макроса), при этом в случае, если макрос не найден, программа продолжала работать.

    Вот Вам примерчик:
    http://rghost.ru/39886352

    Всего записей: 247 | Зарегистр. 26-10-2006 | Отправлено: 08:07 20-08-2012
    grbdv

    BANNED
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    psiho
    Цитата:
    Поставь обработчик ошибок...  

    Вот спецом не стал код выкладывать, чтобы хоть как-то чела заинтересовать. Не получилось :)
     
    Бзв, а за And и Description отвечаешь?
    Цитата:
    If Err.Number = 1004 And (Err.Description = "Не найден ...

     
    Бзв, что по второй части моего ответа у тебя сэмпла не случилось?

    Всего записей: 1163 | Зарегистр. 20-08-2011 | Отправлено: 08:33 20-08-2012
    Открыть новую тему     Написать ответ в эту тему

    Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213

    Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Excel VBA (часть 3)


    Реклама на форуме Ru.Board.

    Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
    Modified by Ru.B0ard
    © Ru.B0ard 2000-2024

    BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

    Рейтинг.ru