Разработка, производство и продажа радиоэлектронной аппаратуры
|
Карта сайта
|
Пишите нам
|
В избранное
Требуется программист в Зеленограде
- обработка данных с датчиков; ColdFire; 40 тыс.
e-mail:
jobsmp@pochta.ru
Телесистемы
|
Электроника
|
Конференция «Микроконтроллеры и их применение»
off переведите, pls
Отправлено
SergQ
11 марта 2008 г. 12:40
на VB для excel2007
z=0;
for(y=0; y<10; y++)
{
for(x=0; x<10; x++)
{
if(Лист1!x.y !=0)
{
Лист2!0.z = Лист1!x.y;
z++;
}
}
}
Составить ответ
|
Вернуться на конференцию
Ответы
Попробуй: Worksheet("лист2").Cells(1, z).value = Worksheet("лист1).Cells(x,y).value
—
MikeR
(11.03.2008 13:05:23
80.79.176.57
,
пустое
)
думаю что копирует массив 10x10 непустых клеток с листа 1 на 2 преобразуя в столбец =)
—
MegaJohn
(11.03.2008 12:56:12
213.170.82.250
,
пустое
)
А у off2007 другой VBA?
—
Пиков
(11.03.2008 12:45:40
87.241.200.1
,
пустое
)
Отправка ответа
Имя*:
Пароль:
E-mail:
Тема*:
Сообщение:
Ссылка на URL:
URL изображения:
если вы незарегистрированный на форуме пользователь, то
для успешного добавления сообщения заполните поле, как указано ниже:
увеличьте 6 на 2:
Перейти к списку ответов
|
Конференция
|
Раздел "Электроника"
|
Главная страница
|
Карта сайта
Web
telesys.ru