Сохранить выделение ячеек

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

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

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Сохранить выделение ячеек (Автосброс выделения при открытии формы)

SGerman

Дата: Среда, 08.06.2016, 14:27 | Сообщение № 1

Группа: Пользователи

Ранг: Участник

Сообщений: 97

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

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

Excel 2003

Здравствуйте !
На листе эксель есть фиксированная область вверху листа, где размещены кнопки. При нажатии на одну из них открывается форма (UserFofm), на которой пользователь указывает один из доступных видов операции над ячейками, которые он перед этим выделил и потом жмет "выпорлнить" на этой же форме.
Однако при открытии формы (даже просто при нажатии кнопки) выделение снимается самим Екселем.

Как заставить Эксель оставить ячейки (или текущую ячейку если выбрана только она) выделенными ?

Спасибо за помощь

Мудрость приходит со старостью. Но иногда старость приходит одна :)

Ответить

SGerman

Дата: Среда, 08.06.2016, 14:33 | Сообщение № 2

Группа: Пользователи

Ранг: Участник

Сообщений: 97

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

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

Excel 2003

Пробовал так (подсмотрел в "магнитофоне" Excel):

[vba]

Код

Private Sub cbDelGarb_Click()
If Not Application.CutCopyMode Then
Application.CutCopyMode = xlCopy 'True
End If
frmDelGarb.Show (Modal)
Application.CutCopyMode = False

End Sub

[/vba]
[moder]Для оформления кода используйте кнопку #[/moder]

Мудрость приходит со старостью. Но иногда старость приходит одна :)

Сообщение отредактировал Pelena - Среда, 08.06.2016, 14:34

Ответить

SGerman

Дата: Среда, 08.06.2016, 14:34 | Сообщение № 3

Группа: Пользователи

Ранг: Участник

Сообщений: 97

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

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

Excel 2003

Пардон, забыл добавить:

Никакой реакции

Мудрость приходит со старостью. Но иногда старость приходит одна :)

Ответить

Pelena

Дата: Среда, 08.06.2016, 14:37 | Сообщение № 4

Группа: Админы

Ранг: Местный житель

Сообщений: 19174

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

Замечаний: ±

Excel 365 & Mac Excel

Перед вызовом формы запоминать выделенный диапазон, при нажатии кнопки Выполнить восстанавливать выделение. Нет?

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816

Ответить

_Boroda_

Дата: Среда, 08.06.2016, 14:38 | Сообщение № 5

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

Ранг: Местный житель

Сообщений: 16672

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

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

2003; 2007; 2010; 2013 RUS

У кнопки свойство TakeFocusOnClick поставьте в False
Еще можно выделенный диапазон засунуть в переменную (можно в глобальную)
[vba]

Код

Private Sub CommandButton1_Click()
Dim d_ As Range
d_ = Selection

[/vba]

Если не понятно - покажите свой файл

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995

Ответить

nilem

Дата: Среда, 08.06.2016, 14:39 | Сообщение № 6

Группа: Авторы

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

Сообщений: 1613

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

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

Excel 2013, 2016

SGerman, привет
нет, у меня не снимается выделение ячеек
вот файлик, попробуйте
или что-то не так понял?

К сообщению приложен файл: _Test2.xlsm (26.0 Kb)

Яндекс.Деньги 4100159601573

Ответить

SGerman

Дата: Среда, 08.06.2016, 14:53 | Сообщение № 7

Группа: Пользователи

Ранг: Участник

Сообщений: 97

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

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

Excel 2003

>nilem

Посмотрел Ваш пример, но не понял.. Ваша "кнопка" у меня не определяется как объект. Она просто нарисована в ячейках ? Там есть хитрый код

Unload me

В этом секрет ?

Мудрость приходит со старостью. Но иногда старость приходит одна :)