Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / step, программа с транспонированием столбца / 9 сообщений из 9, страница 1 из 1
10.04.2010, 14:28
    #36572238
white_rat
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
step, программа с транспонированием столбца
не могу собрать мысли... нужно данные из столбца I (4, 12) перенести. причем не обычным способом, а так чтобы данные первой ячейки (I1) записывалась в ячейкку A28, I2 в ячейку В26... и так далее... то есть мало того чтобы он транспонировался как бы но еще и по диогонали вверх и еще с интервалом. понимаю что тут нужно использ0овать шаг, но тут видимо несколько циклов... и возникают сложности с написанием кода
...
Рейтинг: 0 / 0
10.04.2010, 14:42
    #36572245
zchvv
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
step, программа с транспонированием столбца
white_rat,

выкладывайте файл, если действительно проблема.
...
Рейтинг: 0 / 0
10.04.2010, 16:58
    #36572314
zchvv
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
step, программа с транспонированием столбца
white_rat,

подойдет?
...
Рейтинг: 0 / 0
10.04.2010, 22:18
    #36572512
white_rat
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
step, программа с транспонированием столбца
О_о
...
Рейтинг: 0 / 0
10.04.2010, 22:21
    #36572514
white_rat
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
step, программа с транспонированием столбца
О_о
это очень замечательно...
а если не использовать MsgBox, а все переменные использовать только типа Integer
...
Рейтинг: 0 / 0
11.04.2010, 07:17
    #36572648
zchvv
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
step, программа с транспонированием столбца
white_rat,

извольте, наконец, изложить внятно Вашу проблему.
...
Рейтинг: 0 / 0
11.04.2010, 20:16
    #36572974
white_rat
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
step, программа с транспонированием столбца
zchvv,
я новичок и просто ваш код мне не понятен. попримитивнее можно как то объяснить, чтоыбы даже мне стало понятно
...
Рейтинг: 0 / 0
11.04.2010, 20:44
    #36572995
zchvv
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
step, программа с транспонированием столбца
white_rat,

там нет ничего особенного. Я вынес для общности задание адресов диапазонов на лист, но их можно и прямо в коде указать, если это устраивает. В "верхнюю" процедуру вызывается "нижняя", в нее передаются параметры: фактический адрес диапазона-столбца и фактический адрес ячейки, с которой начинается "лесенка". На каждом шаге цикла Do While ..... Loop происходит смещение вправо на 1 ячейку и вверх на 2 ячейки (самое первое смещение - нулевое). А MsgBox потребовался для предупреждения ошибки, когда вверх уже некуда смещаться, а в цикле требуется сделать это. Для предотвращения этой ситуации ячейку следует выбирать пониже по листу. Поразмышляйте над этим кодом, поэкспериментируйте. Умение придет обязательно, все так начинали.
...
Рейтинг: 0 / 0
09.05.2010, 18:51
    #36619103
white_rat
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
step, программа с транспонированием столбца
наконец то я разобралась с этим вопросом!!!
все настолько просто... при условии что столбец I4-I12, и нужно транспонировать все с ячейки А27 по диагонали вверх, через столбец!

Sub зад3()
Dim b, k, g As Integer
b = 4
k = 1
g = 27
Do While Cells(b, 1) <> ""
Cells(g, k) = Cells(b, 9)
k = k + 2
b = b + 1
g = g - 1
Loop
End Sub
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / step, программа с транспонированием столбца / 9 сообщений из 9, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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