Excel2007. Присвоить клавиатурное сочетание - Microsoft Office Excel

kzld · 02.09.2012, 13:26

Excel2007. Присвоить клавиатурное сочетание для "ФОРМАТ ПО ОБРАЗЦУ". Как ?

kuklp · 03.09.2012, 11:34

Например так, в модуль книги:

Код:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Application.OnKey "^+{v}"
End Sub

Private Sub Workbook_Open()
    Application.OnKey "^+{v}", "ЭтаКнига.MyFormat"
End Sub
Public Sub MyFormat()
    Selection.PasteSpecial Paste:=xlPasteFormats
End Sub

сочетание ctrl+shift+v

02.09.2012, 13:26	#1
kzld Форумчанин Регистрация: 24.01.2009 Сообщений: 625	Excel2007. Присвоить клавиатурное сочетание Excel2007. Присвоить клавиатурное сочетание для "ФОРМАТ ПО ОБРАЗЦУ". Как ?

03.09.2012, 11:34	#2
kuklp Участник клуба Регистрация: 02.05.2010 Сообщений: 1,390	Например так, в модуль книги: Код: `Private Sub Workbook_BeforeClose(Cancel As Boolean) Application.OnKey "^+{v}" End Sub Private Sub Workbook_Open() Application.OnKey "^+{v}", "ЭтаКнига.MyFormat" End Sub Public Sub MyFormat() Selection.PasteSpecial Paste:=xlPasteFormats End Sub` сочетание ctrl+shift+v mailto: kuklp60@gmail.com, ящики для благодарностей: WM Z206653985942, R334086032478, U238399322728

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Проблемы с диаграммами в Excel2007	yursanch	Microsoft Office Excel	6	02.02.2011 16:47
Portable Excel2007	kzld	Microsoft Office Excel	4	19.12.2010 22:12
создание базы в excel2007	raynold	Microsoft Office Excel	1	04.06.2010 09:27
Блокировка столбца в Excel2007	HAMMAN	Microsoft Office Excel	3	15.12.2009 12:21