Нужно реализовать макрос преобразующий слово сейчас во время( дата число и тд)

@dan24 · Регистрация: 19.01.2013

Студворк — интернет-сервис помощи студентам

В моём представление это выглядит так:

Visual Basic
1
2
3
4
5
6
7
8
9
Sub Ìàêðîñ1()
'
' Ìàêðîñ1 Ìàêðîñ
'if Then Now
'
    Selection.TypeText Text:="сейчас"
' строчка выше получилась путём написания слова в доксе.
    If Text = "сейчас" Then Now
End Sub

как ему объяснить , что если любая переменная = "сейчас" то делать тото.
как его заставить проверять все слова? достаточно if да?

@ViterAlex · 25.02.2013, 22:03

Все слова "сейчас" в документе заменит на текущую дату

Visual Basic
1
2
3
4
5
6
7
With Selection.Find
  Selection.HomeKey wdStory
  .ClearFormatting
  .Text = "сейчас"
  .Replacement.Text = FormatDateTime(Now, vbShortDate)
  .Execute Replace:= wdReplaceAll
End With

@dan24 · 25.02.2013, 22:06 **[ТС]**

Добавлено через 56 секунд
Спасибо. А можно построчное пояснение, а то я перый раз с этим языком

@ViterAlex · 25.02.2013, 22:06

Сравнение?

Visual Basic
1
If a = b Then MsgBox "а равно b"

@dan24 · 25.02.2013, 22:21 **[ТС]**

А можно полный код. От начала и до конца. а то ошибку выводит Expectid End Sab

Добавлено через 1 минуту
ну там всякие функции вызываются. они не понятны особенно 2, 3 строчки

Добавлено через 29 секунд
5, 6 тоже не понятны(

Добавлено через 8 минут
Спс запустилось. пойду разбираться.

@Андрэич · 26.02.2013, 00:12

Сообщение от ViterAlex

Все слова "сейчас" в документе заменит на текущую дату

Думаю, врядли их нужно менять, но только отображать (или использовать в коде) при каждом обращении, что-то вроде того:

Visual Basic
1
Iif (InStr(Nz(Значение), "cейч")>0, Format(Now), Format(DateValue(Trim(Значение))))

@Казанский · 26.02.2013, 00:28

А можно заменить все слова "сейчас" на автоматически обновляемую дату (т.е. поле вида { TIME }).
Действия прекрасно записываются в макрос и воспроизводятся

:

Ctrl+Home, Ctrl+F, найти: сейчас.
Вставка - Дата и время - выберите нужный формат - Обновлять автоматически.
Ctrl+Shift+влево, Ctrl+C (скопировать поле).
Ctrl+H, найти: сейчас, заменить на: ^c (содержимое буфера обмена) - Заменить все.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	Установка Emscripten SDK (emsdk) и CMake на Windows для сборки C и C++ приложений в WebAssembly (Wasm) 8Observer8 30.01.2026 Чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. Система контроля версиями Git. . .	Подключение Box2D v3 к SDL3 для Android: физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .
Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image 8Observer8 27.01.2026 Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .	Влияние грибов на сукцессию anaschu 26.01.2026 Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .	Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android 8Observer8 26.01.2026 Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .

@dan24 167 / 106 / 30 Регистрация: 19.01.2013 Сообщений: 847
	25.02.2013, 22:06 [ТС]
	Добавлено через 56 секунд Спасибо. А можно построчное пояснение, а то я перый раз с этим языком 0

@dan24 167 / 106 / 30 Регистрация: 19.01.2013 Сообщений: 847
	25.02.2013, 22:21 [ТС]
	А можно полный код. От начала и до конца. а то ошибку выводит Expectid End Sab Добавлено через 1 минуту ну там всякие функции вызываются. они не понятны особенно 2, 3 строчки Добавлено через 29 секунд 5, 6 тоже не понятны( Добавлено через 8 минут Спс запустилось. пойду разбираться. 0

@Казанский 15155 / 6428 / 1731 Регистрация: 24.09.2011 Сообщений: 9,999
	26.02.2013, 00:28
	А можно заменить все слова "сейчас" на автоматически обновляемую дату (т.е. поле вида { TIME }). Действия прекрасно записываются в макрос и воспроизводятся : Ctrl+Home, Ctrl+F, найти: сейчас. Вставка - Дата и время - выберите нужный формат - Обновлять автоматически. Ctrl+Shift+влево, Ctrl+C (скопировать поле). Ctrl+H, найти: сейчас, заменить на: ^c (содержимое буфера обмена) - Заменить все. 2