ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Проблема с динамическими таблицами
10 сообщений из 10, страница 1 из 1
Проблема с динамическими таблицами
    #35967492
Eugene771
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Eugene771
Гость
Необходимо сделать копию таблицы в определенный момент времени и чтобы эта копия не обновлялась вместе с основной таблицей. И почему код:
Function USER()
Worksheets(«Книга2»).Cells(1, 1) = Worksheets(«Книга1»).Cells(1, 1).Value
USER = 1
End Function

выдает ошибку, можно ли как нибудь из функций выполнять операции приcвоения одних ячеек другим без дальнейшей связи этих ячеек.
...
Рейтинг: 0 / 0
04.05.2009, 17:27:49
| Ответить | Цитировать | Написать  
Проблема с динамическими таблицами
    #35967563
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
White Owl
Участник
Eugene771 можно ли как нибудь из функций выполнять операции приcвоения одних ячеек другим без дальнейшей связи этих ячеек.Нет, нельзя в принципе.
...
Рейтинг: 0 / 0
04.05.2009, 17:56:24
| Ответить | Цитировать | Написать  
Проблема с динамическими таблицами
    #35967598
Eugene771
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Eugene771
Гость
Неужели в моменте времени нет способа получить значение ячейки и это значение загнать в какую нибудь константу, в любом языке программирования это возможно. Вот с датами то это получается, переводим в текст и все.
...
Рейтинг: 0 / 0
04.05.2009, 18:07:50
| Ответить | Цитировать | Написать  
Проблема с динамическими таблицами
    #35967599
anor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
anor
Участник
Eugene771,

Код: plaintext
 Worksheets("Книга1").Cells( 1 ,  1 ) = Worksheets("Книга2").Cells( 1 ,  1 ).Value

хотя я бы всё таки, по программистской привычке, делал присвоение через промежуточную переменную.

Код: plaintext
1.
2.
a = Worksheets("Книга1").Cells( 1 ,  1 )
Worksheets("Книга2").Cells( 1 ,  1 ).Value = a
...
Рейтинг: 0 / 0
04.05.2009, 18:07:58
| Ответить | Цитировать | Написать  
Проблема с динамическими таблицами
    #35967606
Eugene771
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Eugene771
Гость
И еще, VBA для того и есть в Exel, чтобы через него управлять всеми функциями программы.
...
Рейтинг: 0 / 0
04.05.2009, 18:09:44
| Ответить | Цитировать | Написать  
Проблема с динамическими таблицами
    #35967615
Eugene771
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Eugene771
Гость
Важно то, что присвоение через Worksheets в функцию не вставляется, в ячейку не вставляется, а процедуры также в ячейку не вставляются. А я хотел иметь один Лист инициализации, на котором при запуске программы все функции исполнились бы один раз. А рабочие функции положить на лист с динамической таблицей и они бы исполнялись синхронно, но очень важно иметь возможность составлять снимки таблицы в разные моменты времени и потом с ними работать, но как это сделать пока найти не могу.
...
Рейтинг: 0 / 0
04.05.2009, 18:15:30
| Ответить | Цитировать | Написать  
Проблема с динамическими таблицами
    #35967634
Eugene771
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Eugene771
Гость
Вообще тогда зачем DDE нужен, если мы даже с текущими данными нчего чсделать не можем,не то чтобы обратиться к данным 5 минут назад, а неплохо было бы просто каждые 5 минут предположим загонять данные в элементы массива.
...
Рейтинг: 0 / 0
04.05.2009, 18:22:54
| Ответить | Цитировать | Написать  
Проблема с динамическими таблицами
    #35967663
Eugene771
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Eugene771
Гость
Для тех кто считает что так делать нельзя:
Worksheets("Лист3").Range("A1:M24") = Worksheets("Лист1").Range("A1:M24").Value

Теперь осталось как то это в функцию поместиь и все.
...
Рейтинг: 0 / 0
04.05.2009, 18:37:38
| Ответить | Цитировать | Написать  
Проблема с динамическими таблицами
    #35967887
Eugene771
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Eugene771
Гость
Function USER1(Cell As Range)
Set CellValue = Worksheets("Лист3").Range("A1:M24")
CellValue = Worksheets("Лист").Range("Table1").Value
USER1 = CellValue
End Function

Почти решение, но не работает. Подскажите ошибку.
...
Рейтинг: 0 / 0
04.05.2009, 21:27:46
| Ответить | Цитировать | Написать  
Проблема с динамическими таблицами
    #35968259
Taranaga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Taranaga
Участник
Это нужно было?
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Function qqq(SourceRange As Range, TargetRange As Range)
TargetRange = SourceRange.Value
End Function

Sub www()
Call qqq(Sheets("Лист1").Range("A1:M24"), Sheets("Лист3").Range("A1:M24"))
End Sub
...
Рейтинг: 0 / 0
05.05.2009, 09:20:57
| Ответить | Цитировать | Написать  
10 сообщений из 10, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Проблема с динамическими таблицами
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=35967615&tid=2179509]:
 0ms
get settings:
 5ms
get forum list:
 10ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 194ms
get topic data:
 6ms
get forum data:
 1ms
get page messages:
 26ms
get tp. blocked users:
 1ms
others: 186ms
total:  433ms
созд. / загр.: 433ms
x
x
Закрыть


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