Переименовать текущий документ

@Ципихович Эндрю · Регистрация: 10.04.2009

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

здравствуйте, очень давно пробовал это делать на вба, не получилось, тут наткнулся на софтину
Kutools, она делает...., что-то поменялось, или она это без вба делает?
если можно сделать это, подскажите код пжл, спс

Добавлено через 3 минуты
вау, после закрытия переименованного прогой документа получаю ошибку
Runtime error 216 at 08394BDA ну и нафиг такое переименовынание)))

SoftIce · 21.10.2019, 11:30

Сообщение от Ципихович Эндрю

дело в шляпе

И в конце концов пришёл к тому же, о чем я и писал.

Остап Бонд · 21.10.2019, 12:19

ActiveDocument.Path & "" & ActiveDocument.Name = ActiveDocument.FullName
но Катастрофа не ищет легких путей

@Ципихович Эндрю · 21.10.2019, 12:22 **[ТС]**

ок, спс, чуть подзабыл

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
Option Explicit
 
Sub ReName()
 
'Debug.Print ActiveDocument.Path
'Debug.Print ActiveDocument.FullName
    Dim KillKill As String
    KillKill = ActiveDocument.FullName
    ActiveDocument.SaveAs ActiveDocument.Path & "\New" & ActiveDocument.Name, 0
    'удаляет файл мимо корзины
    Kill KillKill
 
End Sub

Новые блоги и статьи Все статьи Все блоги /
сукцессия 41 anaschu 24.07.2026 Численная верификация бифуркации в агентной модели лесной сукцессии: от одного параметра к ансамблю Автор: пользователь @Shumilov_AS \| Раздел: Прикладная математика / Численные методы Кратко. . .	сукцессия 40. Ансамблевая кластерная параметризаци, часть 1. anaschu 24.07.2026 Пр# Сопровождение научной статьи ИИ-ассистентом: подготовка публикации и калибровка агентно-ориентированной модели сукцессии микоризных систем Полевые заметки о двухнедельной совместной работе. . .	Теория всего 12. ВГК на планете в стратегической игре "терра" anaschu 21.07.2026 ### Главные семантические изменения и дешифровка новой физики 1. `REPRODUCTIVE_EMISSION` вместо фотосинтеза (`PS_base`): Энергия и ресурсы, которые класс средних мужчин (`_W_MEN_DONORS`). . .	Публикация отклонённая на хабре. Как «пернатого» заставить осваивать новые горизонты опыта через масштабирование задачи и целеполагание Hrethgir 21.07.2026 https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11948&stc=1&d=1784657928 Привет Хабр. В этой статье я расскажу, как один закон эпистемологии позволил мне с ходу запустить уникальный. . .
Теория всего 11. Основные параметры anaschu 21.07.2026 Дешифровка тензорного ядра Soil Chemistry 2. 0: Истинный инвариант Теории Всего Чистовой исходный код многокомпонентной сукцессии зафиксирован. Модель оперирует единым вектором состояния. . .	Теория всего 10. Клод трусишка anaschu 21.07.2026 Алгоритмический суицид ИИ: Когда математика ОДУ взламывает цензурные шлюзы Свежайший мета-прецедент нашей разработки! Клод официально отказался строить итоговую кроссплатформенную модель, как. . .	Теория всего 9. Окончательная проработка метафоры "дерево = традиции" anaschu 21.07.2026 Скрытые параметры ядра ОДУ: Механика Глубинного Рока Клод утаил от вас ключевую математику кризисов. В движке игры зашиты пять скрытых коэффициентов, определяющих, как именно ТНК и Мемы ломают. . .	Теория всего 8. Clauude трусишка. Ответ джемени anaschu 21.07.2026 Игровой баланс «Модели Всего»: Алгоритмический блок как механика Семантического БуфераЭтот скриншот отказа Клода — идеальный, чистейший прецедент для нашей Теории Всего. Вы столкнулись не просто с. . .

@Ципихович Эндрю 1713 / 580 / 76 Регистрация: 10.04.2009 Сообщений: 9,337

	Word Переименовать текущий документ 19.10.2019, 08:50. Показов 6257. Ответов 22 Метки нет (Все метки) здравствуйте, очень давно пробовал это делать на вба, не получилось, тут наткнулся на софтину Kutools, она делает...., что-то поменялось, или она это без вба делает? если можно сделать это, подскажите код пжл, спс Добавлено через 3 минуты вау, после закрытия переименованного прогой документа получаю ошибку Runtime error 216 at 08394BDA ну и нафиг такое переименовынание))) 0

Остап Бонд Заблокирован
	21.10.2019, 12:19
	ActiveDocument.Path & "" & ActiveDocument.Name = ActiveDocument.FullName но Катастрофа не ищет легких путей 1