Модераторы: mihanik
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Формула ячейки в которой из разных листов Excel-a 
V
    Опции темы
bas_sanya
Дата 19.2.2007, 23:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 2
Регистрация: 19.2.2007

Репутация: нет
Всего: нет



Здрасте всем!! Такая проблема!! Есть некая книга Excel в ней 3 листа!! Пишу макрос и столкнулся с такой проблемой: мне нужно например на листе "Лист2" создать формулу например такую:   FormulaR1C1 = "=RC[1]-Лист1!RC". Казалось бы все просто, но есть вопрос. Я изначально не знаю как будет назван лист, но знаю в каком порядке они будут расположены. Вопрос заключается в следующем, как мне указать в формуле не имя листа, а его номер по счету! 
Если вопрос глупый простите, только учусь!! 
Очень нужно узнать как это сделать!!!! И можно ли это сделать вообще!!

PM MAIL   Вверх
Akina
Дата 19.2.2007, 23:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 26
Всего: 454



Цитата(bas_sanya @  20.2.2007,  00:11 Найти цитируемый пост)
Пишу макрос

Цитата(bas_sanya @  20.2.2007,  00:11 Найти цитируемый пост)
создать формулу 


Либо ты пишешь макрос, либо формулу. Сперва пойми что именно ты делаешь, а потом вопросы задавай...


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
RockClimber
Дата 20.2.2007, 00:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 848
Регистрация: 5.5.2006
Где: планета 013 в тен туре

Репутация: 7
Всего: 15



Можно в макросе обратиться к листу по номеру и узнать его имя:
Код

Dim i As Long   ' Это номер листа (начинается с 1)
Dim sheet_name As String   ' имя листа

sheet_name = Sheets(i).Name

Потом, если есть такая необходимость, пишешь формулу типа "=" & sheet_name & "!R1C1" и т. д.


--------------------
Хорошо кинутый дятел далеко летит, крепко встревает, долго торчит.
PM MAIL GTalk   Вверх
bilya
Дата 20.2.2007, 03:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 112
Регистрация: 3.1.2007

Репутация: 1
Всего: 1



bas_sanya,  Воспользутесь Item(i)
К примеру, следующий код активирует третий лист в активной книге
 
Код

ActiveWorkbook.Sheets.Item(3).Activate

 smile 
PM MAIL   Вверх
ArNic
Дата 20.2.2007, 12:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 278
Регистрация: 3.1.2007

Репутация: нет
Всего: нет



Я думаю вопрос решен!
PM MAIL ICQ   Вверх
bas_sanya
Дата 20.2.2007, 20:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 2
Регистрация: 19.2.2007

Репутация: нет
Всего: нет



Спасибо все кто откликнулся!! Все сделал, все работает!!! Огромное спасибо еще раз! Приятно знать что есть люди которые готовы помоч!!
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Программирование, связанное с MS Office"
mihanik staruha

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами



  • Несанкционированная реклама на форуме запрещена
  • Пожалуйста, давайте своим темам осмысленный, информативный заголовок. Вопль "Помогите!" таковым не является.
  • Чем полнее и яснее Вы изложите проблему, тем быстрее мы её решим.
  • Оставляйте свои записи в "Книге отзывов о работе администрации"
  • А вот тут лежит FAQ нашего подраздела


Если Вам понравилась атмосфера форума, заходите к нам чаще!
С уважением mihanik и staruha.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Программирование, связанное с MS Office | Следующая тема »


 




[ Время генерации скрипта: 0.0501 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.