рейтинг волейболистов в реальном времени.

Автор Paha_L, 02.12.2015, 13:07

« назад - далее »

Paha_L

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

вот например по двойному клику, но тут скорость падает
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
ActiveCell.Value = ActiveCell.Value + 1
End Sub

cheshiki1

может вместо Worksheet_BeforeDoubleClick использовать  Worksheet_SelectionChange подойдет?
п.с. в вашем коде на хватает строчки
Cancel = True 'это чтобы после двойного клика не переходить в режим редактирования ячейки

GWolf

#2
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Count = 1 And Target.Column = 2 Then
        Target = Target.Value + 1
    End If
End Sub


как-то так
Путей к вершине - множество. Этот один из многих!

Paha_L

#3
как сделать, чтобы максимальное число в столбике показывал зеленым, а минимальное - красным?

Наверное, правильнее поблагодарить за решение и создать новую тему (вопрос не по этой теме) [МОДЕРАТОР]

GWolf

Цитата: Paha_L от 03.12.2015, 10:07
как сделать, чтобы максимальное число в столбике показывал зеленым, а минимальное - красным?
один из вариантов: условное_форматирование
Цитировать
Наверное, правильнее поблагодарить за решение и создать новую тему (вопрос не по этой теме) [МОДЕРАТОР]
было бы не плохо ...
Путей к вершине - множество. Этот один из многих!