И снова VBA суммирую текст
| Правила | Регистрация | Пользователи | Сообщения за день |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > И снова VBA суммирую текст

И снова VBA суммирую текст

Ответ
Поиск в этой теме
Непрочитано 08.11.2007, 22:03 #1
И снова VBA суммирую текст
Зодчий
 
Конструктор (начинающий)
 
Беларусь, Гродно
Регистрация: 25.01.2007
Сообщений: 44

Здраствуйте господа.Пытаясь сделать мир чище и лучше столкнулся с вопросом:
Коллеги на работе имеют привычку писать технические требования при помощи однострочного текста. Им наверно приколь, а вот я не в восторге, т.к. редоктировать его сущая мука.
Подошёл к проблеме я творчески и решил написать небольшой макросик на VBA( из кучки Text один Mtext). Всё вроди бы и ничего, да MText получается в одну строку, а хотелось разделиль строки ENTER-ом (ну что-бы вобще ничего не делать при переводе из TEXT в MTEXT ).
Подшиваю к сообщению *.dvb c непосредственно этим макросом и ещё
несколько малюток (сумма значений размерных линий и небольшое упрощение расчёта м3 древесины в спецификации).
Может у кого будет время и желание, то киньте глазо.
Жду критику, и советы по расширению возможностей макросов.
Спосибо, что хватило сил дочитать до конца.

Вложения
Тип файла: zip Макросики.zip (15.8 Кб, 84 просмотров)

Просмотров: 3309
 
Непрочитано 09.11.2007, 01:40
#2
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 40,450


Глянь вариант на лиспе: http://dwg.ru/f/showpost.php?p=162618&postcount=21
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Непрочитано 09.11.2007, 07:45
#3
C1


 
Регистрация: 13.06.2005
Сообщений: 314


Цитата:
Сообщение от Зодчий Посмотреть сообщение
Всё вроди бы и ничего, да MText получается в одну строку, а хотелось разделиль строки ENTER-ом
Вместо:
text = text + Obj.TextString + " "
Нужно:
text = text & Obj.TextString & vbCrLf

vbCrLf - ENTER
Плюсом строки лучше не соединять. Можно соединить числа в их сумму.
C1 вне форума  
 
Автор темы   Непрочитано 09.11.2007, 22:58
#4
Зодчий

Конструктор (начинающий)
 
Регистрация: 25.01.2007
Беларусь, Гродно
Сообщений: 44


Цитата:
Сообщение от Кулик Алексей aka kpblc Посмотреть сообщение
Глянь вариант на лиспе: http://dwg.ru/f/showpost.php?p=162618&postcount=21
Спосибо за ссылочку но для меня LISP даже не "непрочитанная" а "неоткрытая" книга
Зодчий вне форума  
 
Автор темы   Непрочитано 09.11.2007, 23:00
#5
Зодчий

Конструктор (начинающий)
 
Регистрация: 25.01.2007
Беларусь, Гродно
Сообщений: 44


Цитата:
Сообщение от C1 Посмотреть сообщение
Нужно:
text = text & Obj.TextString & vbCrLf
И снова спосибо за рульный совет
Зодчий вне форума  
 
Непрочитано 25.11.2007, 11:43
#6
Sleekka

-
 
Регистрация: 24.07.2005
Москва
Сообщений: 1,335


Товарищи, а подскажите пожалуйста как в excel на ВБА при помощи Formulalocal записать формулу вида: =CONCATENATE(data!B2;" - ";'Sh_RD_(st-2yr_12_13)'!M3;M4)
не получается из-за кавычек.
Sleekka вне форума  
 
Непрочитано 25.11.2007, 13:32
#7
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 40,450


Попробуй использовать Chr(34) для указания символа "
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Непрочитано 25.11.2007, 19:53
#8
C1


 
Регистрация: 13.06.2005
Сообщений: 314


Цитата:
Сообщение от Кулик Алексей aka kpblc Посмотреть сообщение
Попробуй использовать Chr(34) для указания символа "
А не проще ли для двойных ковычек их писать дважды "":
"CONCATENATE(data!B2;"" - "";'Sh_RD_(st-2*yr_12_13)'!M3;M4)"
C1 вне форума  
 
Непрочитано 25.11.2007, 20:03
#9
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 40,450


Мне - нет. Я путаться в них начинаю И, по-моему, в некоторых "реинкарнациях" VB такой номер мог и не сработать (хотя тут могу и ошибаться).
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > И снова VBA суммирую текст



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Текст вдоль полилинии или сплайна (по кривой) Denioska AutoCAD 48 10.09.2022 21:55
Пароль к VBA karp_b Программирование 24 29.08.2013 12:43
Как вывести текст в model из приложения написанного на lisp? paradoxvaha AutoCAD 3 16.04.2007 03:54
VBA vs LISP Kosenko Sasha LISP 23 06.03.2007 02:56
Многострочный текст в атрибутах медвежонок AutoCAD 1 09.06.2006 12:05