|
Главная | Правила | Регистрация | Дневники | Справка | Пользователи | Календарь | Поиск | Сообщения за день | Все разделы прочитаны |
|
Опции темы | Опции просмотра |
22.04.2012, 08:49 | #1 (permalink) |
Новичок
Регистрация: 27.08.2010
Сообщений: 7
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Подскажите с Excel 2007
n2 n3 n4 n5 n6 n7 n8 и тог далее .... 23 26 32 65 84 45 45 что получилось примерно так. n2 23 n3 26 n4 32 n5 65 n6 84 n7 45 n8 45 Подскажите пожалуйста=,((((( |
22.04.2012, 08:49 | |
Helpmaster
Member
Регистрация: 08.03.2016
Сообщений: 0
|
Наверняка в этих темах есть интересующий вас ответ Странное зависание Office Word и Excel 2007 Excel Excel Ошибка в Excel 2007 |
22.04.2012, 23:03 | #2 (permalink) |
Member
Регистрация: 03.04.2011
Сообщений: 29
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 19
|
для решения такой задачи в Экселе создают макрос (программа на бейсике)
в меню Сервис/Макрос/Начать запись создай никчемный макрос например выдели курсором несколько ячеек и останови запись макроса затем в меню Сервис/Макрос/Макросы Изменить редактируешь макрос вернее удаляешь, что там внутри и пишешь следующий текст Sub Макрос1() For a = 1 To 10 ' цикл перебирает столбики (1 - это номер столбца с первым значением а 10 - последним) b = Cells(1, a) ' читаем (здесь 1 - это номер строки с первым значением) c = Cells(2, a) ' читаем (здесь 2 - это номер строки с вторым значением) Cells(4 + a, 1) = b ' пишем значения в другие ячейки Cells(4 + a, 2) = c ' 4 - определяет куда поместим перве значение Next a End Sub Устанавливаешь адреса ячеек с твоими данными и нажимаешь кнопку F5 (Выполнить) или меню Run Програмка, она же макрос, скопирует данные как ты хотел. Желаю успеха. |
23.04.2012, 12:31 | #4 (permalink) |
Новичок
Регистрация: 27.08.2010
Сообщений: 7
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
можиш объяснить ради интереса, что обозначают b и с
Cells(4 + a, 1) = b Cells(4 + a, 2) = c я понял, что ты выше описал, но попробовал их поменять на другие чёт не очень вышло((((:tehnari_ ru_138: |
23.04.2012, 17:46 | #5 (permalink) |
Member
Регистрация: 03.04.2011
Сообщений: 29
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 19
|
b и c - временные переменные
сначала в них записываем первую пару ячеек вот так: b = Cells(1, a) c = Cells(2, a) затем из переменных пишем в новые ячейки: Cells(4 + a, 1) = b Cells(4 + a, 2) = c можно конечно было писать минуя переменные сразу из старых ячеек в новые: Cells(4 + a, 1) = Cells(1, a) Cells(4 + a, 2) = Cells(2, a) но я сразу чето не догадался |
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
23.04.2012, 23:19 | #6 (permalink) |
Member
Регистрация: 03.04.2011
Сообщений: 29
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 19
|
For a = 1 To 10 ' цикл перебирает столбики (1 - это номер столбца с первым значением а 10 - последним)
Cells(4 + a, 1) = Cells(1, a) Cells(4 + a, 2) = Cells(2, a) Next a изменять можно адреса выделенные цветом, переменные менять нельзя, их программа меняет для понимания: ячейка обозначается Cells(1, 1) где перед запятой номер строки, а после - номер столбца в данном примере это ячейка в первой строке в первом столбце |
24.04.2012, 12:31 | #7 (permalink) |
Новичок
Регистрация: 27.08.2010
Сообщений: 7
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Капец при сохранении в Басике сохраняет в отдельном документе и ток в нем Активна
как сделать, чтоб Макрос был активен всегда в любой книге((((( |
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
Опции темы | |
Опции просмотра | |
|
|