Поднятие значения!

Вход

Регистрация

Напомнить пароль

= Мир MS Excel/Поднятие значения! - Мир MS Excel

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

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

Поднятие значения!

иван

Дата: Пятница, 14.09.2012, 12:23 | Сообщение № 1

Группа: Гости

Помогите пожалуйста как поднять значение на +1 в разных ячейках!

Ответить

Alex_ST

Дата: Пятница, 14.09.2012, 12:34 | Сообщение № 2

Группа: Друзья

Ранг: Участник клуба

Сообщений: 3213

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

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

2003

[vba]

Code

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Cancel = True
    On Error Resume Next
    Target = Target + 1
End Sub

[/vba]

С уважением,
Алексей
MS Excel 2003 - the best!!!

Ответить

RAN

Дата: Пятница, 14.09.2012, 12:56 | Сообщение № 3

Группа: Друзья

Ранг: Экселист

Сообщений: 5660

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

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

2010

И сразу макрос! biggrin

Вставить в любую ячейку 1, скопировать, выделить нужные ячейки, специальная вставка - сложить.

Быть или не быть, вот в чем загвоздка!

Ответить

Alex_ST

Дата: Пятница, 14.09.2012, 13:06 | Сообщение № 4

Группа: Друзья

Ранг: Участник клуба

Сообщений: 3213

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

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

2003

Андрей,
каков вопрос таков и ответ biggrin

ИМХО, мой макрос работает в 100%-ном в соответствиями с поставленной задачей. И достаточно одного даблклика, а не написания в свободной ячейке, копирования и специальной вставки.

С уважением,
Алексей
MS Excel 2003 - the best!!!

Сообщение отредактировал Alex_ST - Пятница, 14.09.2012, 13:08

Ответить

Поднятие значения!

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