*-зберегти книгу з макросами за адресою  ...\Microsoft Office\OFFICExx\XLSTART

* - при відкритті книги задати сервіс - макрос-безпека - середній рівень

2. Функція перетворення Прізвище Ім'я По батькові в Прізвище_ініціали:

.=ЛЕВСИМВ(A2;НАЙТИ(СИМВОЛ(32);A2))&ЕСЛИ(ДЛСТР(A2)-ДЛСТР(ПОДСТАВИТЬ(A2;СИМВОЛ(32);""))=1;ПСТР(A2;НАЙТИ(СИМВОЛ(32);A2)+

1;1);ПСТР(A2;НАЙТИ(СИМВОЛ(32);A2)+1;1)&"."&ПСТР(A2;НАЙТИ(СИМВОЛ(32);

A2;НАЙТИ(СИМВОЛ(32);A2)+1)+1;1))&"."

***************************************************************************************************

3. Як створити, запустити та переглянути макрос:

Для створення макросу задаємо: Серсвіс - Макроси - Запусти макрос.

Вводимо назву макросу(Автоформат), добавляємо назву клавіши для запуску макрос( Ctrl +W).

Запускаємо макрос та задаємо набір операцій,наприклад:

1. Виділємо електронну таблицю  ( Ctrl +А), або клацаємо по сірій клітинц
2. і в верхньому лівому куті ЕТ. .
3. Задаємо:Формат - Стовбець- Автопідбір ширини.
4. Знімаємо виділення ЕТ, для цього клацаємо по комірці А1.

Для  перегляду дії макроса натискуємо Ctrl +W в англійскій розкладки клавіатури 

або Сервіс - Макрос - Автоформат - Виконати.

Для  переглядучи редагування коду  макроса Сервіс - Макрос - Автоформат - Змінити або Alt + F8.

Приклад коду макроса Автоформат:

Sub Автоформат()

'

' Автоформат Макрос

' Макрос записан 13.10.2015 (A2)

'

' Сочетание клавиш: Ctrl+W

'

   Cells.Select

   Selection.Columns.AutoFit

   Range("A1").Select

End Sub