выбрать нужные ячейки и сгруппировать их значения средствами VBA MS Excel / Microsoft Office

ReSQL.ru

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

Гость

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

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

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

Цитировать

Написать

Автор*:

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

Тема*:

Сообщение

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

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

Автор:

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

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

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

Вложение:

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

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

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

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

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

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

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

выбрать нужные ячейки и сгруппировать их значения средствами VBA MS Excel

#38366835

kidpoker

Гость

Добрый вечер, уважаемые участники форума.

Бьюсь уже давно над такой задачей:
Есть область данных, допустим, столбец с переменным числом значений (от 0 до бесконечности)
Нужно собрать в другой столбец выборочные данные из ячеек через равный промежуток строк.
Т.е. B1=A4, B2=A8 ... B10=A40 итд.
При этом нужно остановиться, если в первом столбце (А) начнутся нули.

Пробежался по поиску, ничего подходящего не нашёл, или неправильно искал.

...

Рейтинг:

0 / 0

14.08.2013, 21:31

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

выбрать нужные ячейки и сгруппировать их значения средствами VBA MS Excel

#38367010

kuklp

Гость

kidpoker,

Код: vbnet

1.
2.
3.
4.
5.
6.

Public Sub www()
    Dim n&, i&
    For i = 4 To Cells(Rows.Count, 1).End(xlUp).Row Step 4
        n = n + 1: Cells(n, 2) = Cells(i, 1)
    Next
End Sub

...

Рейтинг:

0 / 0

15.08.2013, 06:50

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

выбрать нужные ячейки и сгруппировать их значения средствами VBA MS Excel

#38368206

kidpoker

Гость

kuklp,

Огромное спасибо!
А то я уже додумался удалять строки, номер которых нацело на заданное число не делится (низкий сорт, не чистая работа)

...

Рейтинг:

0 / 0

15.08.2013, 20:59

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

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

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

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

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

start [/forum/topic.php?fid=61&msg=38367010&tid=2174602]:	0ms
get settings:	11ms
get forum list:	14ms
check forum access:	3ms
check topic access:	3ms
track hit:	43ms
get topic data:	9ms
get forum data:	2ms
get page messages:	28ms
get tp. blocked users:	1ms
others:	13ms

total:	127ms