Путь к файлу

kuman / 10.11.2010, 16:40/00:41
Форум: 
Макросы и скрипты

Собственно понадобилось узнавать полный путь к сохраненному файлу. Т.е. я сохраняю файл, например сюда "c:\work\work1.cdr", как теперь скопировать в буфер обмена и(или) показать полный путь к файлу в диалоговом окне?

Abarmot / 10.11.2010, 17:21

Вот так можна :
   
     Sub Path()
       MsgBox ActiveDocument.FilePath
    End Sub
   

kuman / 10.11.2010, 17:51

Почти :) Только нужен полный путь т.е. именно вид "c:\work\work1.cdr", с именем и расширением.

Добавлено (10.11.2010, 14:51)
---------------------------------------------
Что-то не нашел как исправить свой пост, вопрос снят.
Sub Path()
        MsgBox ActiveDocument.FullFileName
     End Sub

Hepatitis C / 12.02.2015, 15:43

Может кто нибудь подсказать, каким способом можно вставить переменные в виде текста? И

Пытаюсь найти подобные макросы, но они слишком длинные, и не понимаю какую часть кода можно использовать.

Еще интересовало найти какую информацию вообще можно выводить как текст, но пока нашёл на другом ресурсе пост с кодом и надеюсь это оно. ссылка на другой ресурс

    CorelScript.CreateArtisticText Date, 20, 25
With ActiveDocument.Selection.Shapes.Item(1).Text.Story
    .Font = "arial"
    .Size = 10
End With

    CorelScript.CreateArtisticText FullFileName, 20, 15
With ActiveDocument.Selection.Shapes.Item(1).Text.Story
    .Font = "arial"
    .Size = 10
End With