Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Ссылка на ячейку другого листа / 3 сообщений из 3, страница 1 из 1
06.11.2013, 00:14
    #38453834
КД
КД
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ссылка на ячейку другого листа
В книге на Лист1 программно добавляются строки, на Лист2 тоже, только через 3. Ссылки должны формироваться следующим образом: Лист2!D8 = Лист1!I9, Лист2!D12 = Лист1!I10, Лист2!D16 = Лист1!I11 и т.д. Как это лучше сделать?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.11.2013, 08:49
    #38453943
AndreTM
AndreTM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ссылка на ячейку другого листа
Раз "программно" - ну так и допишите ссылки в "программе" :)
Код: vbnet
1.
Sheets("Лист2").[D8].FormulaLocal = "=Лист1!I9"

и т.д., в момент "добавления" строки. Или разом:
Код: vbnet
1.
2.
3.
For i = 8 To 16 Step 4
  Sheets("Лист2").Cells(i, 4).FormulaLocal = "=Лист1!I" & (i/4 + 7)
Next
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.11.2013, 11:06
    #38454109
КД
КД
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ссылка на ячейку другого листа
Отлично! Спасибо большое!
А вот это: (i/4 + 7) - какая-то эмпирическая формула?
Что-то у меня мозга не хватило на вывод закономерности. Кстати, я еще это (вернее, чуть модифицированное) выражение округлял до целого:
Sheets("Лист2").Cells(i, 4).FormulaLocal = "=Лист1!I" & Round(i/3 + 6, 0)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Ссылка на ячейку другого листа / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]