Простой макрос

Программирование на Visual Basic for Applications
MaryM
Начинающий
Начинающий
 
Сообщения: 12
Зарегистрирован: 01.06.2005 (Ср) 22:39
Откуда: Москва

Простой макрос

Сообщение MaryM » 01.06.2005 (Ср) 22:45

Задумка элементарная. Хочу сделать макрос word для личного использования. Для этого мне нужно знать то, чего я не знаю:
1. Статистика знаков с пробелами как выводится?
2. Можно ли отправить данные из макроса в, например, таблицу Exel? Если да, то как?
На всякий случай, чтобы я больше не задавала подобных дурацких вопросов, попрошу дать мне ссылку на скачку русского helpa к VBA или словарик функций. Может быть, учебник.
Заранее спасибо
Макросы необходимы каждому писателю

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 02.06.2005 (Чт) 4:40

  1. Document.ComputeStatistics(wdStatisticCharactersWithSpaces)
  2. Код: Выделить всё
    with createobject("Excel.Application")
      with .workbooks.add.worksheets(1)
        .cells(1,1).value="1"
        .cells(1,2).value="2"
        .cells(1,3).value="3"
      end with
      .visible=true
    end with
  3. Alt+F11, F2, F1 :)
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

MaryM
Начинающий
Начинающий
 
Сообщения: 12
Зарегистрирован: 01.06.2005 (Ср) 22:39
Откуда: Москва

Сообщение MaryM » 02.06.2005 (Чт) 13:58

Б. Спасибо. :D
Теперь еще один вопрос. У меня есть документы разных типов. Хотелось бы, чтобы макрос их различал. Для этого я предполагаю вписывать что-нибудь в свойствах документа. Например, там есть такая строка "Группа".
И еще, чтобы макрос смог бы сам вписывать нужное значение, если его нет (выбор пользователя с помощью ComboBox.

Заранее спасибо.
Макросы необходимы каждому писателю

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 02.06.2005 (Чт) 14:18

ActiveDocument.BuiltInDocumentProperties(wdPropertyCategory) = "Гы"
MsgBox ActiveDocument.BuiltInDocumentProperties(wdPropertyCategory)
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

MaryM
Начинающий
Начинающий
 
Сообщения: 12
Зарегистрирован: 01.06.2005 (Ср) 22:39
Откуда: Москва

Разделы

Сообщение MaryM » 22.06.2005 (Ср) 10:58

А можно ли узнавать статистику по разделам (кол-во символов)? Если да, то как?
Макросы необходимы каждому писателю

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 22.06.2005 (Ср) 12:20

ActiveDocument.Sections(1).Range.ComputeStatistics(wdStatisticCharacters)
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

Voronin Michael
Начинающий
Начинающий
 
Сообщения: 21
Зарегистрирован: 10.06.2005 (Пт) 10:49
Откуда: Moscow

Сообщение Voronin Michael » 23.06.2005 (Чт) 16:12

GSerg писал(а):ActiveDocument.BuiltInDocumentProperties(wdPropertyCategory) = "Гы"
MsgBox ActiveDocument.BuiltInDocumentProperties(wdPropertyCategory)


А у меня ошибка - "Object required" выскакивает! Че ему не нравиться?

Igor_123
Осторожный Баянист
Осторожный Баянист
Аватара пользователя
 
Сообщения: 1325
Зарегистрирован: 21.07.2004 (Ср) 13:00
Откуда: Днепропетровск

Сообщение Igor_123 » 23.06.2005 (Чт) 17:22

Нет открытого документа
Водки я вам не обещаю, но погуляем хорошо.
И. Сусанин.

Аватара (с) Тёмыч

MaryM
Начинающий
Начинающий
 
Сообщения: 12
Зарегистрирован: 01.06.2005 (Ср) 22:39
Откуда: Москва

ProgressBar

Сообщение MaryM » 24.06.2005 (Пт) 10:04

Очень хотелось красивый ProgressBar в XP-стиле. Скачала с интернета, а теперь не могу подключить. :cry: В папке нет .ocx. Есть фаил под названием UserControl1, но он открывает VB. Как подключить к VBA?
Макросы необходимы каждому писателю

Igor_123
Осторожный Баянист
Осторожный Баянист
Аватара пользователя
 
Сообщения: 1325
Зарегистрирован: 21.07.2004 (Ср) 13:00
Откуда: Днепропетровск

Сообщение Igor_123 » 24.06.2005 (Пт) 10:16

Скомпилировать в ocx, и подключить
Водки я вам не обещаю, но погуляем хорошо.
И. Сусанин.

Аватара (с) Тёмыч

MaryM
Начинающий
Начинающий
 
Сообщения: 12
Зарегистрирован: 01.06.2005 (Ср) 22:39
Откуда: Москва

Сообщение MaryM » 24.06.2005 (Пт) 23:46

А как определить, в каком разделе находится курсор?
И еще. Можно ли во время выполнения программы как-нибудь копировать/создать контролы с определенными параметрами?
Макросы необходимы каждому писателю

Igor_123
Осторожный Баянист
Осторожный Баянист
Аватара пользователя
 
Сообщения: 1325
Зарегистрирован: 21.07.2004 (Ср) 13:00
Откуда: Днепропетровск

Сообщение Igor_123 » 25.06.2005 (Сб) 16:53

А как определить, в каком разделе находится курсор?

По моему Selection будет содержать эту информацию

И еще. Можно ли во время выполнения программы как-нибудь копировать/создать контролы с определенными параметрами?

Создавать можно, посмотри в поиске.
А что значит определенные параметры?
Водки я вам не обещаю, но погуляем хорошо.
И. Сусанин.

Аватара (с) Тёмыч


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 101

    TopList