Vlad_Psycho Опубликовано 23 ноября, 2005 Жалоба Поделиться Опубликовано 23 ноября, 2005 Я никогда на VB не программировал, мне просто нужно отредактировать макрос в Word. Sub Test_1() ' ' Test_1 Macro ' Macro recorded 21.11.2005 by Vlad ' Selection.Extend Selection.Extend Selection.Extend Selection.Copy Selection.EscapeKey Selection.EndKey Unit:=wdLine Selection.TypeParagraph Selection.PasteAndFormat (wdPasteDefault) Dim strYo As String Yo = ????????????????????????????????? Что тут писать надо? ChangeFileOpenDirectory "C:\Documents and Settings\Vlad\Desktop\test\" ActiveDocument.SaveAs FileName:=Yo, FileFormat:= _ wdFormatDocument, LockComments:=False, Password:="", AddToRecentFiles:= _ True, WritePassword:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:= _ False, SaveNativePictureFormat:=False, SaveFormsData:=False, _ SaveAsAOCELetter:=False End Sub Ссылка на комментарий Поделиться на другие сайты Поделиться
yuriks Опубликовано 23 ноября, 2005 Жалоба Поделиться Опубликовано 23 ноября, 2005 Попробуй Yo = Selection.Text тодько напиши ето после Selection.Copy (или перед) Ссылка на комментарий Поделиться на другие сайты Поделиться
Рекомендуемые сообщения
Для публикации сообщений создайте учётную запись или авторизуйтесь
Вы должны быть пользователем, чтобы оставить комментарий
Создать учетную запись
Зарегистрируйте новую учётную запись в нашем сообществе. Это очень просто!
Регистрация нового пользователяВойти
Уже есть аккаунт? Войти в систему.
Войти