Дмитрий, спасибо !

Добрый день.
Запускаю такой макрос из книги Excel:
Sub dddd()
Set wd1 = CreateObject("Word.Document")
Set wd2 = wd1.Application
wd2.Selection.Typetext "123 абв"
wd1.SaveAs "D:\1\123абв.docm", wdFormatXMLDocumentMacroEnabled
wd2.Quit
End Sub

Word-файл, созданный этим кодом, не открывается, даёт ошибку - см.скрин

В чём причина?

Нашёл ответ, нужно так:
Написать на "Найти" - \(*\)
на "Заменить на" - (слово)

Добрый день.
Как через "Найти и заменить" заменить всё то, что заключено в скобки на определенное слово?

Было:
(корова) яблоко (крокодил) морковь
огурец (мышь) картофель лук (медведь)

Стало:
(слово) яблоко (слово) морковь
огурец (слово) картофель лук (слово)

Заранее спасибо.
P.S. Win 8.1 Office 2016 64-bit.
Пишу на "Найти" - (*)
на "Заменить на" - (слово)
Не работает при включенной/выключенной галке "Подстановочные знаки"

Дмитрий, спасибо.
Нашёл ваш код на другом форуме, хотел написать, не успел, вы уже написали.
Потестил, всё нормально.
Думал может мне придётся 1 переименовать на 001, 2 на 002 и т.д. , ан-нет код и так работает как нужно при названии файлов: 1.docx, ... 9.docx, 10.docx, ... 100.docx.

Спасибо.

Добрый день.
В папке "Фон" на диске D есть 100 файлов .docx
Их названия: 1.docx, 2.docx, 3.docx, ... 99.docx, 100.docx
В каждом файле по одной странице, максимум два.

Нужен макрос, который бы собрал в один файл все 100 файлов: он должен сначала взять 1.docx, потом 2.docx, потом 3.docx и так далее.
Заранее спасибо.

TheBestOfTheBest, спасибо, понял.
Насчёт другого момента создам отдельную тему.

Доброе утро.
Прилагаю файл, где покрашенные ячейки (C1:F8) стали как бы автоматически вычисляемыми, то есть:
Напишите туда 9/3 и нажмите ЭНТЕР - в ячейке появится 3
А если в обычную ячейку написать 9/3 и нажать ЭНТЕР - в ячейке появится 09.мар (09.03.2016)

Напишите туда 8/4 и нажмите ЭНТЕР - в ячейке появится 2
А если в обычную ячейку написать 8/4 и нажать ЭНТЕР - в ячейке появится 08.апр (08.04.2016)

Напишите туда 30/7 и нажмите ЭНТЕР - в ячейке появится 4,28571428571429
А если в обычную ячейку написать 30/7 и нажать ЭНТЕР - в ячейке появится 30.июл (30.07.2016)

При этом я вообще не нажимаю =
Макросы отсутствуют.

Кто может объяснить эту фичу?

P.S. Подозреваю, что ячейки становятся такими вследствии этого:
1) У вас в настройках разделитель копеек должен быть - запятая, а разделитель разрядов - пробел
2) Напишите в ячейку 440.710 и нажмите Enter
3) Напишите в другую ячейку 550.890 и нажмите Enter
4) Выделите эти две ячейки и выполните в окне Immediate Selection.Replace ".", ","
5) Во первых точки просто удалились, вместо того чтобы замениться на запятые
6) Ну а во вторых эти ячейки стали такими же чудными, как я писал выше
7) Попробуйте на этих ячейках написать 4/5 или 6/7 или 25/6 и нажать Enter, и попробуйте написать тоже самое в других ячейках.

P.P.S. Самое интересное, что если 4-шаг (замену точку на запятую) выполнить вручную (как обычно через Ctrl+H) точки нормально поменяются на запятые