Категории
Самые читаемые
vseknigi.club » Разная литература » Газеты и журналы » Интернет-журнал 'Домашняя лаборатория', 2007 №3 - Вудворт
[not-smartphone]

Интернет-журнал 'Домашняя лаборатория', 2007 №3 - Вудворт

Читать онлайн Интернет-журнал 'Домашняя лаборатория', 2007 №3 - Вудворт

Шрифт:

-
+

Интервал:

-
+

Закладка:

Сделать
1 ... 198 199 200 201 202 203 204 205 206 ... 375
Перейти на страницу:
����� ������� ����� ������, ���������� �� ������������ ���� ��������� �������� ������� ����� "��������"-"������".

3.�"������ ������". ����� � ��� ������ �������, �������� ����� ������ ���� � ����������������. ��� ������ ������� ����� �������, ��� � ������ ������ ��� ��"��� ��������, ������������ �������������". � �������, ���� �������� ��� ������, ������� �������� � ������������ �������� �������� �������� � �����. � ������ ������� ���� ��������� �����������: � ������ ��������, � ������ �� ������, � ������� ���������� ������� ������ ������� �� ��������, � ������ ���������, � ����� ���� ��� �����, �������, �� VBA ������� ���������� ������� ��������� �������: ������� ������ ��������, ������������ ������� � ��������, �� ����� ��� ���������� ��������� � ������� �������� (��������, ���� ��������� ������� ���� ������ ���� �������� ������� � ������� �������) �������� �������� � ��� ����� ����� �������� � ������ ����������� �������. ����� ��� ���������� ������ ������� �������� ������ ����������� ��� ��� �������� ������ ��������, ������ ��������� � ��. ��� ��� ����� �������� ��������� � ��������� ������� ������� ����� ������������.

������� � VBA, ��� � � ������ ������ ����������������, ������� ������� ������ � �� ���� ���� ��������. ����� ������ ����� ��������� �����. ���, ����� ������� ����� "�������" � ������� � ��� ������ ������ ���������� �������� ����� ������: ������ �������� � (� ���� ��� ����������� ������� Public �������(40) As String), ��������� (Public ��������(20) As String) � ��. ������ ��� �������� ������ ������� ������ "�������"�� ������ ������� � �� ���� ���������� ������������ ��������� ����� ����������� ������� �������� � ���������: ����� ���������� � ����� ������� �������� ������� "�������� ����� ���������� ������ �������" (Dim ������25 As �������) � ��������� ������ �������� ��������������� �������� ����� �������������� ������� (������ 25.������� (1) ="�������" �.�.�.). ����� ����, ����� � ������ ������ �������� ��������� ���������� ������� ������ ���� ��������, � ��� ������������� ������� ����� ������� �������� �� ����� ��������.

���� ����� ���������� ������� ��� ���� ���������, �� ��������� � ���� �����, ����� ������� � VBA ������.

4.�"�����". ����� � ��� ���������� ���� ��������, ������� ����� ����������� �� ������ �����. ��� ����, ����� � ������ �������� �����, ���� �� ������������ ���� � ��������� �������� ������� ����� "��������"-"UserForm". ����� ������� ������ ���������� ����, � ������� ����� ��������� ������, ��������, ����� � ��. ������ ������� ���������������� ����� � �� ���.�1.6.

���.�1.6. ������ ������� ���������������� �����

5.�"������". ��������� ����� ����������� �� ���������� �� ������ � ���������� �������� ������������, �� � � ���������� ������ �� ������ ���������. ������ ��������� ��������� ����� ������ �� ������������ � Word ������� (������� ��� ���������). ���� ��������� ��������� ������ ��������������� (��������, �������� ����� ������������ ���������� �����), �� ��� ������� �� ������������ ������� ��������� �� �������, �������������� ������� ����� ��������� �� ���� ������ (�������� ��� ����� �������� �������������� ������ ������� � ���� ��������� ��������). � ����� ������ ����� �������� ������ �� ���� ���������� � ���� ������� �� �������� �������, � ������� ��������� ������.

�������� �������� ����

�������� ������� ������ ������������ �� VBA �������� ���� ������ �������� � ������� ���� (���.�1.7). ������ ����� ������� ����� �������� � ��������������� ���������� ����. ��� ����, ����� ������� ��� ��� ������-���� ���������� �������, ���� ������ ��� ���� �������� �� ��� ����� ��� ������� �� ������������ ���� ����� "���������".

���.�1.7. ���� ������ �������� � ������� ����.

����������� ��������� ��������� VBA

��� ������ ��������� ��������� ���� � ���� ������ ��� ���� ����� �������� ����� "Sub ���������� ��� ���������", ����� ���� �������� VBA ��� ������� ����� "End Sub", � ����� ����� ����� ������� ������ ����������� ����� �������� ����� ���������.

�������� VBA � ����� ������������� ��������. �� ��������� ������������ ������������, ����� ��������� ����� �� ��� ���� �������, ��� ���� ��������� �� ��������. ��������, ���� ������� ������� MsgBox (��� ������� �������� �� ����� ���������� ����, ��������, �����, ��� ���� ��������� ������ "��������� ��������� � ���������?") � ������� ����� ��� ����������� ������� ������, �� ��� �������� ����� �� �������� ��������� (��. ����� ���.�1.7.), �� ������� ����� �������� ���������� � ���������� ������ �������, �� ���� � ���, ��� ��������� ����� �������� �� ��������� � � ������ ������ ����� ������, ���������� ������, ������ � ���� ��� ��������� � � ������ ���������.

���� VBA ���������� ��������-���������������. ��� ������, ��� ����� ������ ��� ������� ����� ��������� ������, ��������, ������, �� ������� ������ Basic ��� Pascal, ������� ��������� � ������ ��� 10 ��� �����. �������� ������� VBA ����� ����� ���: <������>.<������, �������� � ������ ������>.<.�>.<��� ������, � ������� ����� ���������� ��������>. ����������� ��������>. ����� �������, ������ ������� ������� ��� �� "� �����": ������� ������������ ��, ��� ��� ���� ���������� �������� � ������, � ����� ���� �������� � �����. ������������� ����������� ������� ������ ����� "�����". ��� ������ ����� �������:

Application.ActiveDocument.PageSetup.Orientation = wdOrientLandscape

��� ������� ������������� ��������� ���������� ����� � ���������. � ������� Application (�� ���� ����������, ���������, � ������ ������ � Word) ���� ��������� � ActiveDocument (�������� ��������, � ���� ��� ������, ���������� ���������, ���� ����������� � Word), � ����� ���������� ���� ��������� � PageSetup (��������� ��������; � ���� ��� ���������� Selection � ��, ��� � ������ ������ ��������, Characters � ��� ����� � ������ � ��.), � ���� ���� ��������� Orientation (���������� �����; � ���� ��� BottomMargin � ������ ������, LeftMargin � ����� ������ � ��.), �������� ������������� "=" �������� wdOrientLandscape � �� ���� ��������� ���������� �����. ����� �� ��� ����� � ������� ��������� ���������� �� ���������� ����� � ��� ����� ���������

1 ... 198 199 200 201 202 203 204 205 206 ... 375
Перейти на страницу:
На этой странице вы можете читать бесплатно книгу Интернет-журнал 'Домашняя лаборатория', 2007 №3 - Вудворт без сокращений.
Комментарии