Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - VBA

Страница: 1 |

 

  Вопрос: Помогите в Excel Добавлено: 09.10.06 09:43  

Автор вопроса:  Ramil | Web-сайт: www.Ramil.boom.ru | ICQ: 286597559 
Добрый день

В листе элсел несколько ячеек красного цвета
Как можно сделать так чтоб при нажатия кнопки выходил
Msgbox “”
и показывал сколько красных ячеек есть на листе.

Спасибо

Ответить

  Ответы Всего ответов: 3  

Номер ответа: 1
Автор ответа:
 GenyaA



Вопросов: 0
Ответов: 185
 Web-сайт: www.genyaa.nm.ru
 Профиль | | #1
Добавлено: 09.10.06 10:18
Создайте кнопку CommandButton1 и припишите к ней этот код:
Private Sub CommandButton1_Click()
    Dim cc As Range, i as Long
    i = 0
    For Each cc In ActiveSheet.UsedRange
        If cc.Interior.Color = vbRed Then i = i + 1
    Next cc
    MsgBox i
End Sub

Ответить

Номер ответа: 2
Автор ответа:
 Ramil



ICQ: 286597559 

Вопросов: 13
Ответов: 25
 Web-сайт: www.Ramil.boom.ru
 Профиль | | #2
Добавлено: 09.10.06 10:41
Спасибо
большое спасибо.

Ответить

Номер ответа: 3
Автор ответа:
 Demаn



ICQ: 409503304 

Вопросов: 6
Ответов: 18
 Профиль | | #3 Добавлено: 07.11.06 09:56
Добрый вечер, день или ночь, кому как повезёт помогите пожалста =( , надо написать макрос, в листе экселя введены числа, при запуске макроса должно вылезать окно ввода значений от и до, вводишь диапозон и программа выделяет числа из выделенного диапозона(неважно как выделяет), но есть загвоздка, эти числа должны выделяться тока в выделенной мышкой области листа! Не дайте пропасть студенту, помогите ламеру!

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам