Строка состояния excel

Программирование на Visual Basic for Applications
AHTOXA
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 147
Зарегистрирован: 17.04.2003 (Чт) 13:38
Откуда: Россия, г. Петрозаводск

Строка состояния excel

Сообщение AHTOXA » 30.04.2003 (Ср) 20:51

Вопрос такой:
Как выводить свои сообщения в строку состояния excel.
Bandit

corgi
ToyMan
ToyMan
 
Сообщения: 1367
Зарегистрирован: 01.10.2002 (Вт) 9:59
Откуда: Россия, Москва

Сообщение corgi » 30.04.2003 (Ср) 20:59

Application.StatusBar=""
Ничто так не ограничивает полёт мысли программиста, как компилятор

AHTOXA
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 147
Зарегистрирован: 17.04.2003 (Чт) 13:38
Откуда: Россия, г. Петрозаводск

Сообщение AHTOXA » 30.04.2003 (Ср) 21:15

Спасибо за ответ
Bandit

Fuzzy
Обычный пользователь
Обычный пользователь
 
Сообщения: 60
Зарегистрирован: 03.12.2002 (Вт) 12:33

Сообщение Fuzzy » 01.05.2003 (Чт) 11:26

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

AHTOXA
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 147
Зарегистрирован: 17.04.2003 (Чт) 13:38
Откуда: Россия, г. Петрозаводск

Сообщение AHTOXA » 01.05.2003 (Чт) 11:46

Не понял вопроса
Bandit

Fuzzy
Обычный пользователь
Обычный пользователь
 
Сообщения: 60
Зарегистрирован: 03.12.2002 (Вт) 12:33

Сообщение Fuzzy » 01.05.2003 (Чт) 11:49

Ну вот когда ты выделишь на листе несколько ячеек, и если в них были числа, то внизу окна, справа от статусбара будет сумма этих чисел выводиться, или если другую функцию выберешь, то количество, или среднее или ещё чего. Вот вопрос заключается в том, что как из кода посмотреть, что именно там выведено? А то и изменить, может быть, можно?

AHTOXA
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 147
Зарегистрирован: 17.04.2003 (Чт) 13:38
Откуда: Россия, г. Петрозаводск

Сообщение AHTOXA » 01.05.2003 (Чт) 11:53

Наверное так:
For a = 1 To Selection.Areas.Count
For r = 1 To Selection.Areas(a).Rows.Count
For c = 1 To Selection.Areas(a).Columns.Count
v = Selection.Areas(a).Rows(r).Columns(c).Text ' достает значение
Selection.Areas(a).Rows(r).Columns(c).Value = r ' изменяет значение
col_idx = Selection.Areas(a).Columns(c).Column
Next c
Next r
Next a
Bandit

Fuzzy
Обычный пользователь
Обычный пользователь
 
Сообщения: 60
Зарегистрирован: 03.12.2002 (Вт) 12:33

Сообщение Fuzzy » 01.05.2003 (Чт) 11:57

Нет, брат, такое я и сам понимаю :).
Да и попроще можно значительно.

Я имел в виду именно объект, куда эксел автоматически выводит сумму или другое что. Как к нему обратиться из кода, имя у него есть какое-то?

AHTOXA
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 147
Зарегистрирован: 17.04.2003 (Чт) 13:38
Откуда: Россия, г. Петрозаводск

Сообщение AHTOXA » 01.05.2003 (Чт) 12:01

По моему он просто суммирует и выводит в StatusBar, а где хранит не знаю, если вообще хранит
Bandit

Fuzzy
Обычный пользователь
Обычный пользователь
 
Сообщения: 60
Зарегистрирован: 03.12.2002 (Вт) 12:33

Сообщение Fuzzy » 01.05.2003 (Чт) 12:02

А вот и не в статусбар, а куда-то ещё


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 6

    TopList