- Любовные романы
- Фантастика и фэнтези
- Ненаучная фантастика
- Ироническое фэнтези
- Научная Фантастика
- Фэнтези
- Ужасы и Мистика
- Боевая фантастика
- Альтернативная история
- Космическая фантастика
- Попаданцы
- Юмористическая фантастика
- Героическая фантастика
- Детективная фантастика
- Социально-психологическая
- Боевое фэнтези
- Русское фэнтези
- Киберпанк
- Романтическая фантастика
- Городская фантастика
- Технофэнтези
- Мистика
- Разная фантастика
- Иностранное фэнтези
- Историческое фэнтези
- LitRPG
- Эпическая фантастика
- Зарубежная фантастика
- Городское фентези
- Космоопера
- Разное фэнтези
- Книги магов
- Любовное фэнтези
- Постапокалипсис
- Бизнес
- Историческая фантастика
- Социально-философская фантастика
- Сказочная фантастика
- Стимпанк
- Романтическое фэнтези
- Ироническая фантастика
- Детективы и Триллеры
- Проза
- Юмор
- Феерия
- Новелла
- Русская классическая проза
- Современная проза
- Повести
- Контркультура
- Русская современная проза
- Историческая проза
- Проза
- Классическая проза
- Советская классическая проза
- О войне
- Зарубежная современная проза
- Рассказы
- Зарубежная классика
- Очерки
- Антисоветская литература
- Магический реализм
- Разное
- Сентиментальная проза
- Афоризмы
- Эссе
- Эпистолярная проза
- Семейный роман/Семейная сага
- Поэзия, Драматургия
- Приключения
- Детская литература
- Загадки
- Книга-игра
- Детская проза
- Детские приключения
- Сказка
- Прочая детская литература
- Детская фантастика
- Детские стихи
- Детская образовательная литература
- Детские остросюжетные
- Учебная литература
- Зарубежные детские книги
- Детский фольклор
- Буквари
- Книги для подростков
- Школьные учебники
- Внеклассное чтение
- Книги для дошкольников
- Детская познавательная и развивающая литература
- Детские детективы
- Домоводство, Дом и семья
- Юмор
- Документальные книги
- Бизнес
- Работа с клиентами
- Тайм-менеджмент
- Кадровый менеджмент
- Экономика
- Менеджмент и кадры
- Управление, подбор персонала
- О бизнесе популярно
- Интернет-бизнес
- Личные финансы
- Делопроизводство, офис
- Маркетинг, PR, реклама
- Поиск работы
- Бизнес
- Банковское дело
- Малый бизнес
- Ценные бумаги и инвестиции
- Краткое содержание
- Бухучет и аудит
- Ораторское искусство / риторика
- Корпоративная культура, бизнес
- Финансы
- Государственное и муниципальное управление
- Менеджмент
- Зарубежная деловая литература
- Продажи
- Переговоры
- Личная эффективность
- Торговля
- Научные и научно-популярные книги
- Биофизика
- География
- Экология
- Биохимия
- Рефераты
- Культурология
- Техническая литература
- История
- Психология
- Медицина
- Прочая научная литература
- Юриспруденция
- Биология
- Политика
- Литературоведение
- Религиоведение
- Научпоп
- Психология, личное
- Математика
- Психотерапия
- Социология
- Воспитание детей, педагогика
- Языкознание
- Беременность, ожидание детей
- Транспорт, военная техника
- Детская психология
- Науки: разное
- Педагогика
- Зарубежная психология
- Иностранные языки
- Филология
- Радиотехника
- Деловая литература
- Физика
- Альтернативная медицина
- Химия
- Государство и право
- Обществознание
- Образовательная литература
- Учебники
- Зоология
- Архитектура
- Науки о космосе
- Ботаника
- Астрология
- Ветеринария
- История Европы
- География
- Зарубежная публицистика
- О животных
- Шпаргалки
- Разная литература
- Зарубежная литература о культуре и искусстве
- Пословицы, поговорки
- Боевые искусства
- Прочее
- Периодические издания
- Фанфик
- Военное
- Цитаты из афоризмов
- Гиды, путеводители
- Литература 19 века
- Зарубежная образовательная литература
- Военная история
- Кино
- Современная литература
- Военная техника, оружие
- Культура и искусство
- Музыка, музыканты
- Газеты и журналы
- Современная зарубежная литература
- Визуальные искусства
- Отраслевые издания
- Шахматы
- Недвижимость
- Великолепные истории
- Музыка, танцы
- Авто и ПДД
- Изобразительное искусство, фотография
- Истории из жизни
- Готические новеллы
- Начинающие авторы
- Спецслужбы
- Подростковая литература
- Зарубежная прикладная литература
- Религия и духовность
- Старинная литература
- Справочная литература
- Компьютеры и Интернет
- Блог
Интернет-журнал 'Домашняя лаборатория', 2007 №3 - Вудворт
Шрифт:
Интервал:
Закладка:
����, ��� ��� ����� � ProgressBar'�� ������ ����� ����� ��� ("�" � ���������� ����������� ���������� �����):
Private Sub UserForm_Activate()
Me.Repaint
For t=1 to n
������������� ������� ��������� � �����.
Label3.Width = ((t/n)*250)
Me.Repaint
Next t
Unload Me
End Sub
����������, � ��� �������� ��������� � ���������. ����� ��������� ��� ������������ ProgressBar � ����� �����, ������ ��� ������� ������ ������� �������. ����� ��������� �� ���� ����� ��������� ProgressBar'��, ��� ����, ��������, ���������� ���������� ����� �������, � ������ � ��� ������� �����.
�������� ������� ���������� � ��������� ������ ������ ��������� ���������� �������� � �������� ���������� "��� ����������� �����������": ��������, ����� ��� ��������� ��������� ��������� ���������� ������������ ������������ ���������� ������.
�����, �������, ������������ �������� ��������� (������ "Dialogs(wdDialogFileSummarylnfo).Comments"), �� ����� ������� ����� ������ � ������� ���������� ����������� ���������� ����� � �������� Word:
ActiveDocument.Variables.Add Name:="x1", Value:="�����"
ActiveDocument.Variables.Add Name:="x2", Value:=12
��������� ��� ���������� ����� ����� � ������� ������� �������:
y1 = ActiveDocument.Variables("x1").Value
y2 = ActiveDocument.Variables("x2").Value
����� ��� � ������� ���� �������, �������� �������� � ��������� ���������� ������ ������ �����! ����� �������� ����� �������� � �������� ��������� ���������� ��� ��������: ����������� ���������, ������� ����������� � �.�. �� �� �������, ��� ��� ��������� �������� ��������� ���������� ���������� ��������� �� � ���������� ��������� � � ������� �������
For Each per In ActiveDocument.Variables
Debug.Print per.Name + " " + per.Value
Next per
��������� ��� ���������� ����� ������������ �������� � ���� �������, ��� �� ����� � ������ ����� �����������.
������� � �������, �������� � �������� ������ ������������ Microsoft Word 97/2000/�� � �� ���� �� ��������, ����� ������, ������������� �� ���, ����� ���� ������ � ��������� � ��������� � ����� ��������� ���� � ������� Microsoft Word 97/2000/�� (*.dot), ���� � ��������� Word (*.doc). ��� ���� ����� ����� ���� ���������:
1.����� ������ ������������ ��������� � Normal.dot, �� ��� �������� ������, ����� ������ Word.
2.����� ������ ������������ ��������� � �������, ������� �������� ��� ���������� � �� ���� ������� � ����� ��������������� ������ Word, �� ��� ����� �������� ������, ����� ������ Word, �� �� ����� ������, �������� ������ � ������� ����������� ���� "������-������� � ����������".
3.����� ������ ������������ ��������� � �������, �� ������� �������� ���������, ��������, � ����� �� ��������, ����������� � ����� �������� ������������ Word[14] � �� ���������, �� ��� �������� �����, ����� ���� ������ ������������ �� ���������� � ������� ��������, ��������� �� ��� ������.
4.����� ������ ������������ ��������� � �����-���� ���������, �� ��� �������� �����, ����� ������� ���� ��������.
������ ������������ ����� ���������� �� ������ ������� ��� ��������� � ������ � ������� ����������� ���� "�����������" (������ � ������� � ���������� � �����������).
���������� � ���, ����� ������ ��� ���������� ������ �� Word'� ���� ������, � ����� ���, ��� ��� ������������� � ��� ���������� �� ������ (����� ������������ ��� �� ��������� ��� ����� �������� Word), ����������� � ��������� �������. ���������� �� � ���, ��� ������ ������������� ������ ��� ����� ������ �������� �������, ��������� � ����� ������� � ������������ ��� ���������� ������ ���������� � �������.
������ ������ ������ ������������, ���������� ������, �������� � ������������ ��� ����������� �� �������, ������� ������� �� ����� ������, ����������� ���� ������, � ����� ������� � ������.
������ ����� ������ � ������� � ������ ����� � ��������� VBA. ��� ��������� ������ ���������� ����� ������ ���������� �����������������.
�������� �� ��, ��� � ���������� ������ ��� ���������� �� ������� �����������, ��� ���� ������ ��������� � � Normal.dot, � �����-���� ������� ��� ���������, ���� �������� Word'�� �� �����������. ������� ���� � ��������� ����������� ������� (�� ���� ���������� � ����� ��������������� ������ Word) ���� ������ � ����� �� ��������� � ������, ��� � � Normal.dot, �� ��� ������� ������, ���������� ���� ������ (������������� �� ����� ������), ����������� ������ �� Normal.dot, � �� �� ����������� �������.
���� ��� ������� Word � ����� ������� �� ����������� ������� Normal.dot, �� �� ��������� Word'�� �� ��������� ���������� �� ���������. � ���� ���������� ����������� ����� ������� ������������.
����� ������ � ����� ������� ��� ������� ������ (��� ���� �� ����� ��������, ��� ������ ���������) ���� � ��������� �������: "�������� ��������"-"������, �� ������� ������� ��������" � "Normal.dot" � "������, ����������� ��������� ����� ����� ��������������� ������ Word ��� ���� "������� � ����������".
������ � ������� ����� �������� ���������� � ������ �� ������, ��� ���� �� ����� � ��������� ����������� ��� ����������� �� ����, ��� ������ ���������. ���� ������ ���������� (������, ������ ���������� ������ � ���), �� ������ ������ �� ��������.
������� � ������������� � ���������������� ������� � ������� ������ � ����� ���������������� ������ �������� ��������� �������� �� ����������. ������ � ��������� ����� ������ ����������� �������������

