Excel 2007

@koschei · Регистрация: 29.05.2012

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

Можно ли сменить hotkey в excel 2007? Если нет, то как в нем создать макрос, чтобы на Ctrl+Shift+S появлялось меню "Сохранить как". Желательно подробную инструкцию, а то я не сумел разобраться как.

Или плюнуть на этот геморрой и ставить Openoffice или Libreoffice?

@kalbasiatka · 20.05.2014, 23:47

Visual Basic

Sub сохранить_как()
    With Application.FileDialog(msoFileDialogSaveAs)
        .AllowMultiSelect = False
        .InitialFileName = ThisWorkbook.Path & "" & ThisWorkbook.Name
        If .Show = 0 Then Exit Sub
        FileSelected = .SelectedItems(1)
    End With
    ThisWorkbook.SaveAs FileSelected 'SaveCopyAs
End Sub

Alt + F8
Выбрать нужный макрос
кнопка "свойства"
В свойствах макроса назначить сочетание клавиш

@Казанский · 21.05.2014, 02:08

вариант

Visual Basic

1
2
3

Sub сохранить_как()
    Application.Dialogs(xlDialogSaveAs).Show
End Sub

@kalbasiatka · 21.05.2014, 07:56

Ошибочка у меня закралась, кнопка "параметры", если что.

@koschei · 21.05.2014, 08:05 **[ТС]**

А нет, это я болван...

Заработало. Спасибо!

@koschei 30 / 30 / 1 Регистрация: 29.05.2012 Сообщений: 233
		1
	Excel 2007 20.05.2014, 18:04. Показов 1116. Ответов 4 Метки нет (Все метки) Можно ли сменить hotkey в excel 2007? Если нет, то как в нем создать макрос, чтобы на Ctrl+Shift+S появлялось меню "Сохранить как". Желательно подробную инструкцию, а то я не сумел разобраться как. Или плюнуть на этот геморрой и ставить Openoffice или Libreoffice? 0

@kalbasiatka 416 / 263 / 83 Регистрация: 27.10.2012 Сообщений: 861
	21.05.2014, 07:56	4
	Ошибочка у меня закралась, кнопка "параметры", если что. 0

@koschei 30 / 30 / 1 Регистрация: 29.05.2012 Сообщений: 233
	21.05.2014, 08:05 [ТС]	5
	А нет, это я болван... Заработало. Спасибо! 0