перенос значений из массива в ячейки / Microsoft Office

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / перенос значений из массива в ячейки

7 сообщений из 7, страница 1 из 1

перенос значений из массива в ячейки

#33172742

p2x4

Гость

Господа, проясните почему функция указанная ниже не передаёт значения диапазону ячеек?

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.

Function sort(rng As Range, out As Range)
    Dim cel As Range
    Dim us() As Double
    Dim I As Integer
    I =  0 
    For Each cel In rng
       ReDim Preserve us(I +  1 )
       us(I) = cel.Value
       I = I +  1 
    Next cel
    Call BubbleSort(us(), I +  1 )
    I =  0 
    For Each cell In out
       cell.Value = us(I)  'По моему тут затык!?
       I = I +  1 
    Next cell
            
End Function

...

Рейтинг:

0 / 0

19.07.2005, 10:37:41

| Ответить | Цитировать | Написать

перенос значений из массива в ячейки

#33172798

big-duke

Участник

Сообщения: 6 245

Рейтинг: 0 / 0

так cel или cell ?
option explicit rules

...

Рейтинг:

0 / 0

19.07.2005, 10:56:38

| Ответить | Цитировать | Написать

перенос значений из массива в ячейки

#33173774

p2x4

Гость

Иначе говоря, можно ли из фунуции присваивать значения произвольным ячейкам? Если да, то как?

...

Рейтинг:

0 / 0

19.07.2005, 15:07:18

| Ответить | Цитировать | Написать

перенос значений из массива в ячейки

#33173781

big-duke

Участник

Сообщения: 6 245

Рейтинг: 0 / 0

конечно можно
dim R as range
dim V as long
set R=Range("A10")
v=10
r.value=v
cells(v,1).value=v 'в a10 пишем значение v
range("A" & v).value=v ' тоэе самой

...

Рейтинг:

0 / 0

19.07.2005, 15:09:16

| Ответить | Цитировать | Написать

перенос значений из массива в ячейки

#33173816

p2x4

Гость

big-duke
dim R as range
dim V as long
set R=Range("A10")
v=10
r.value=v

В err.description пишет: Application-defined or object-defined error

...

Рейтинг:

0 / 0

19.07.2005, 15:20:02

| Ответить | Цитировать | Написать

перенос значений из массива в ячейки

#33174026

big-duke

Участник

Сообщения: 6 245

Рейтинг: 0 / 0

у меня пишет нормально

...

Рейтинг:

0 / 0

19.07.2005, 16:21:15

| Ответить | Цитировать | Написать

перенос значений из массива в ячейки

#33174047

Пользователь2

Гость

У меня тоже работает.

Нормальная конструкция, должно работать.

...

Рейтинг:

0 / 0

19.07.2005, 16:32:58

| Ответить | Цитировать | Написать

7 сообщений из 7, страница 1 из 1

Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / перенос значений из массива в ячейки

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=61&tid=2185909]:	0ms
get settings:	6ms
get forum list:	15ms
check forum access:	2ms
check topic access:	2ms
track hit:	74ms
get topic data:	12ms
get forum data:	3ms
get page messages:	44ms
get tp. blocked users:	2ms
others:	219ms

total:	379ms

	Необходимые cookie
	Cookie для сбора статистики
	Cookie для маркетинга и рекламы