Замена для данной книги для вставки CTRL+V на вставку значен

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Замена для данной книги для вставки CTRL+V на вставку значен (Макросы/Sub)

koyaanisqatsi

Дата: Суббота, 11.06.2016, 13:12 | Сообщение № 1

Группа: Проверенные

Ранг: Ветеран

Сообщений: 713

Репутация: 15 ±

Замечаний: 0% ±

Excel 2010

Здравствуйте.

Как заменить правила вставки по CTRL+V для данной книги на вставку значений ?

Желательно чтобы это был не запуск макроса по горячим клавишам и в праймари свойствах книги было описано каким образом можно вставлять данные. Но также чтобы спец вставки по контестному меню тоже работали.

Причем данный хочется брать из другой книги.

Спасибо.

К сообщению приложен файл: 0741268.xlsx (9.2 Kb)

Сообщение отредактировал koyaanisqatsi - Суббота, 11.06.2016, 13:19

Ответить

Kuzmich

Дата: Суббота, 11.06.2016, 17:41 | Сообщение № 2

Группа: Проверенные

Ранг: Ветеран

Сообщений: 711

Репутация: 156 ±

Замечаний: 0% ±

Excel 2003

Вытащите на панель команду "вставить значения" ( Сервис - Настройка - Категории-Правка, Команда-вставить значения)
Скопировав из С5 формулу вы встаете в нужную ячейку и кликаете этот ярлычок(квадратик с цифрами12) - вставляются
только значения

Ответить

koyaanisqatsi

Дата: Суббота, 11.06.2016, 20:55 | Сообщение № 3

Группа: Проверенные

Ранг: Ветеран

Сообщений: 713

Репутация: 15 ±

Замечаний: 0% ±

Excel 2010

Kuzmich,
Обычно люди пользуются сочетанием клавиш. И в этой книге была бы актуальна вставка именно 123. Вот и хочется ее сделать дефолтной.

Ответить

Manyasha

Дата: Суббота, 11.06.2016, 22:03 | Сообщение № 4

Группа: Модераторы

Ранг: Старожил

Сообщений: 2198

Репутация: 898 ±

Замечаний: 0% ±

Excel 2010, 2016

Цитата koyaanisqatsi, 11.06.2016 в 13:12, в сообщении № 1

чтобы это был не запуск макроса по горячим клавишам

а как еще? Можно при открытии/активации книги на onKey повесить макрос вставки значений, а при закрытии/деактивации его убирать
[vba]

Код

Sub pasteValue()
Selection.PasteSpecial Paste:=xlPasteValues
End Sub
Private Sub Workbook_Open()
Application.OnKey "^v"
Application.OnKey "^v", "pasteValue"
End Sub

[/vba]
Можно 2 кнопки вывести куда-нибудь на ленту с аналогичными макросами, типа on/off (назначить макрос на ctrl+v и убрать назначение)

К сообщению приложен файл: 0741268-1.xlsm (16.1 Kb)

ЯД: 410013299366744 WM: R193491431804

Ответить

SLAVICK

Дата: Суббота, 11.06.2016, 23:06 | Сообщение № 5

Группа: Модераторы

Ранг: Старожил

Сообщений: 2290

Репутация: 766 ±

Замечаний: 0% ±

2019

Цитата koyaanisqatsi, 11.06.2016 в 13:12, в сообщении № 1

Желательно чтобы это был не запуск макроса по горячим клавишам

Цитата koyaanisqatsi, 11.06.2016 в 20:55, в сообщении № 3

Обычно люди пользуются сочетанием клавиш

ну так а кто мешает пользоваться сочетанием клавиш?
ctrl alt v
потом два раза стрелку вниз
enter
По началу непривычно - но потом, на порядок быстрее чем мышь дергать

Иногда все проще чем кажется с первого взгляда.

Ответить

koyaanisqatsi

Дата: Воскресенье, 12.06.2016, 01:08 | Сообщение № 6

Группа: Проверенные

Ранг: Ветеран

Сообщений: 713

Репутация: 15 ±

Замечаний: 0% ±

Excel 2010

Manyasha, Как вариант. Класно получилось.
Останется только помнить когда надо формулы и условное форматирование перетаскивать ) А так все отлично. Спасибо.

Ответить

Страница 1 из 1
1