Пропуск столбцов при копирование
xxxSEKAxxx
Дата: Пятница, 01.04.2011, 18:20 |
Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 89
Репутация:
0
±
Замечаний:
0% ±
Добрый день Возникла такая проблема, нужно скопировать ячейки от А8 до BY8, при етом не обходимо что бы столбцы T,U при копирование не учитывались. Возможно ли вообще так сделать? Макрос или формула?
Добрый день Возникла такая проблема, нужно скопировать ячейки от А8 до BY8, при етом не обходимо что бы столбцы T,U при копирование не учитывались. Возможно ли вообще так сделать? Макрос или формула? xxxSEKAxxx
Ответить
Сообщение Добрый день Возникла такая проблема, нужно скопировать ячейки от А8 до BY8, при етом не обходимо что бы столбцы T,U при копирование не учитывались. Возможно ли вообще так сделать? Макрос или формула? Автор - xxxSEKAxxx Дата добавления - 01.04.2011 в 18:20
kim
Дата: Пятница, 01.04.2011, 21:48 |
Сообщение № 2
Группа: Друзья
Ранг: Обитатель
Сообщений: 371
Репутация:
160
±
Замечаний:
0% ±
Excel 2010
Quote (xxxSEKAxxx )
Макрос или формула?
Можно макросом, можно формулой, а можно через обычную или специальную (со связью) вставку. Вам как надо?
Quote (xxxSEKAxxx )
Макрос или формула?
Можно макросом, можно формулой, а можно через обычную или специальную (со связью) вставку. Вам как надо?kim
Сцяна - гэта тая ж прыступка. Проста трэба дарасьці да яе.
Ответить
Сообщение Quote (xxxSEKAxxx )
Макрос или формула?
Можно макросом, можно формулой, а можно через обычную или специальную (со связью) вставку. Вам как надо?Автор - kim Дата добавления - 01.04.2011 в 21:48
xxxSEKAxxx
Дата: Пятница, 01.04.2011, 22:00 |
Сообщение № 3
Группа: Пользователи
Ранг: Участник
Сообщений: 89
Репутация:
0
±
Замечаний:
0% ±
Хотелось бы макросом. А вообщем буду рад любому решению В специальной вставке уже все перепробовал, у меняя не получилось
Хотелось бы макросом. А вообщем буду рад любому решению В специальной вставке уже все перепробовал, у меняя не получилось xxxSEKAxxx
Ответить
Сообщение Хотелось бы макросом. А вообщем буду рад любому решению В специальной вставке уже все перепробовал, у меняя не получилось Автор - xxxSEKAxxx Дата добавления - 01.04.2011 в 22:00
0mega
Дата: Пятница, 01.04.2011, 22:25 |
Сообщение № 4
Группа: Проверенные
Ранг: Ветеран
Сообщений: 627
Репутация:
34
±
Замечаний:
0% ±
xxxSEKAxxx , здравствуйте Quote (xxxSEKAxxx )
...нужно скопировать ячейки от А8 до BY8, ...
просто скопировать, или скопировать и распечатать, скопировать -вставить ... что надо сделать после копирования ?
xxxSEKAxxx , здравствуйте Quote (xxxSEKAxxx )
...нужно скопировать ячейки от А8 до BY8, ...
просто скопировать, или скопировать и распечатать, скопировать -вставить ... что надо сделать после копирования ?0mega
Ответить
Сообщение xxxSEKAxxx , здравствуйте Quote (xxxSEKAxxx )
...нужно скопировать ячейки от А8 до BY8, ...
просто скопировать, или скопировать и распечатать, скопировать -вставить ... что надо сделать после копирования ?Автор - 0mega Дата добавления - 01.04.2011 в 22:25
kim
Дата: Пятница, 01.04.2011, 22:26 |
Сообщение № 5
Группа: Друзья
Ранг: Обитатель
Сообщений: 371
Репутация:
160
±
Замечаний:
0% ±
Excel 2010
Сцяна - гэта тая ж прыступка. Проста трэба дарасьці да яе.
Ответить
xxxSEKAxxx
Дата: Пятница, 01.04.2011, 22:53 |
Сообщение № 6
Группа: Пользователи
Ранг: Участник
Сообщений: 89
Репутация:
0
±
Замечаний:
0% ±
С этим разобрался, но это гемор может все таки как то макросом или формулой?
С этим разобрался, но это гемор может все таки как то макросом или формулой? xxxSEKAxxx
Ответить
Сообщение С этим разобрался, но это гемор может все таки как то макросом или формулой? Автор - xxxSEKAxxx Дата добавления - 01.04.2011 в 22:53
nilem
Дата: Суббота, 02.04.2011, 09:00 |
Сообщение № 7
Группа: Авторы
Ранг: Старожил
Сообщений: 1613
Репутация:
563
±
Замечаний:
0% ±
Excel 2013, 2016
Так попробуйте, копируем на лист Копии: Code
Sub seka() Dim lr& With Sheets("копии") lr = .Cells(Rows.Count, 1).End(xlUp).Row + 1 Range("A8:S8,V8:BY8").Copy .Cells(lr, 1).PasteSpecial Paste:=xlPasteValues End With Application.CutCopyMode = False End Sub
Так попробуйте, копируем на лист Копии: Code
Sub seka() Dim lr& With Sheets("копии") lr = .Cells(Rows.Count, 1).End(xlUp).Row + 1 Range("A8:S8,V8:BY8").Copy .Cells(lr, 1).PasteSpecial Paste:=xlPasteValues End With Application.CutCopyMode = False End Sub
nilem
Яндекс.Деньги 4100159601573
Ответить
Сообщение Так попробуйте, копируем на лист Копии: Code
Sub seka() Dim lr& With Sheets("копии") lr = .Cells(Rows.Count, 1).End(xlUp).Row + 1 Range("A8:S8,V8:BY8").Copy .Cells(lr, 1).PasteSpecial Paste:=xlPasteValues End With Application.CutCopyMode = False End Sub
Автор - nilem Дата добавления - 02.04.2011 в 09:00
Гость
Дата: Суббота, 02.04.2011, 11:02 |
Сообщение № 8
Quote (nilem )
.Cells(lr, 1).PasteSpecial Paste:=xlPasteValues
Я так понимаю, ето вставка только видимых ячеек? Спасибо!!! Примерно так и должно быть! Сейчас еще немного поиграюсь.
Quote (nilem )
.Cells(lr, 1).PasteSpecial Paste:=xlPasteValues
Я так понимаю, ето вставка только видимых ячеек? Спасибо!!! Примерно так и должно быть! Сейчас еще немного поиграюсь.Гость
Ответить
Сообщение Quote (nilem )
.Cells(lr, 1).PasteSpecial Paste:=xlPasteValues
Я так понимаю, ето вставка только видимых ячеек? Спасибо!!! Примерно так и должно быть! Сейчас еще немного поиграюсь.Автор - Гость Дата добавления - 02.04.2011 в 11:02
Гость
Дата: Суббота, 02.04.2011, 12:53 |
Сообщение № 9
Quote (nilem )
Sub seka() Dim lr& With Sheets("копии") lr = .Cells(Rows.Count, 1).End(xlUp).Row + 1 Range("A8:S8,V8:BY8").Copy .Cells(lr, 1).PasteSpecial Paste:=xlPasteValues End With Application.CutCopyMode = False End Sub
Можно ли так сделать, чтобы просто скопировало, а дальше уже вставлять куда необхидомо?
Quote (nilem )
Sub seka() Dim lr& With Sheets("копии") lr = .Cells(Rows.Count, 1).End(xlUp).Row + 1 Range("A8:S8,V8:BY8").Copy .Cells(lr, 1).PasteSpecial Paste:=xlPasteValues End With Application.CutCopyMode = False End Sub
Можно ли так сделать, чтобы просто скопировало, а дальше уже вставлять куда необхидомо?Гость
Ответить
Сообщение Quote (nilem )
Sub seka() Dim lr& With Sheets("копии") lr = .Cells(Rows.Count, 1).End(xlUp).Row + 1 Range("A8:S8,V8:BY8").Copy .Cells(lr, 1).PasteSpecial Paste:=xlPasteValues End With Application.CutCopyMode = False End Sub
Можно ли так сделать, чтобы просто скопировало, а дальше уже вставлять куда необхидомо?Автор - Гость Дата добавления - 02.04.2011 в 12:53
Hugo
Дата: Суббота, 02.04.2011, 13:28 |
Сообщение № 10
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3690
Репутация:
790
±
Замечаний:
0% ±
365
Так скорректировать не пробовали? Code
Sub seka() Dim lr& With Sheets(1) '"копии") lr = .Cells(Rows.Count, 1).End(xlUp).Row + 1 Range("A8:S8,V8:BY8").Copy '.Cells(lr, 1).PasteSpecial Paste:=xlPasteValues End With 'Application.CutCopyMode = False End Sub
Только как Вам нужно "не учитывать"? В этом варианте эти столбцы просто выкидываются, т.е. если вставить скопированное в другое место - "хвост" сдвинется на два столбца влево.
Так скорректировать не пробовали? Code
Sub seka() Dim lr& With Sheets(1) '"копии") lr = .Cells(Rows.Count, 1).End(xlUp).Row + 1 Range("A8:S8,V8:BY8").Copy '.Cells(lr, 1).PasteSpecial Paste:=xlPasteValues End With 'Application.CutCopyMode = False End Sub
Только как Вам нужно "не учитывать"? В этом варианте эти столбцы просто выкидываются, т.е. если вставить скопированное в другое место - "хвост" сдвинется на два столбца влево. Hugo
webmoney: E265281470651 Z422237915069 USDT TRC20: TN8XeEF17o5KPBD9pNwYzNyruycuAc2mVD
Ответить
Сообщение Так скорректировать не пробовали? Code
Sub seka() Dim lr& With Sheets(1) '"копии") lr = .Cells(Rows.Count, 1).End(xlUp).Row + 1 Range("A8:S8,V8:BY8").Copy '.Cells(lr, 1).PasteSpecial Paste:=xlPasteValues End With 'Application.CutCopyMode = False End Sub
Только как Вам нужно "не учитывать"? В этом варианте эти столбцы просто выкидываются, т.е. если вставить скопированное в другое место - "хвост" сдвинется на два столбца влево. Автор - Hugo Дата добавления - 02.04.2011 в 13:28
Гость
Дата: Суббота, 02.04.2011, 14:48 |
Сообщение № 11
Quote (Hugo )
если вставить скопированное в другое место - "хвост" сдвинется на два столбца влево.
Имено так и надо!
Quote (Hugo )
если вставить скопированное в другое место - "хвост" сдвинется на два столбца влево.
Имено так и надо!Гость
Ответить
Сообщение Quote (Hugo )
если вставить скопированное в другое место - "хвост" сдвинется на два столбца влево.
Имено так и надо!Автор - Гость Дата добавления - 02.04.2011 в 14:48
Гость
Дата: Суббота, 02.04.2011, 15:14 |
Сообщение № 12
Quote (Hugo )
Так скорректировать не пробовали?
Пробовал, но не совсем понимаю, что к чему
Quote (Hugo )
Так скорректировать не пробовали?
Пробовал, но не совсем понимаю, что к чему Гость
Ответить
Сообщение Quote (Hugo )
Так скорректировать не пробовали?
Пробовал, но не совсем понимаю, что к чему Автор - Гость Дата добавления - 02.04.2011 в 15:14
Гость
Дата: Суббота, 02.04.2011, 15:31 |
Сообщение № 13
Quote (0mega )
просто скопировать, или скопировать и распечатать, скопировать -вставить ... что надо сделать после копирования ?
Скопировать и вставлять в другие файлы, так что бы не вставлялись столбцы Т,U. То есть так чтоб происходил здвиг на 2 столбца
Quote (0mega )
просто скопировать, или скопировать и распечатать, скопировать -вставить ... что надо сделать после копирования ?
Скопировать и вставлять в другие файлы, так что бы не вставлялись столбцы Т,U. То есть так чтоб происходил здвиг на 2 столбцаГость
Ответить
Сообщение Quote (0mega )
просто скопировать, или скопировать и распечатать, скопировать -вставить ... что надо сделать после копирования ?
Скопировать и вставлять в другие файлы, так что бы не вставлялись столбцы Т,U. То есть так чтоб происходил здвиг на 2 столбцаАвтор - Гость Дата добавления - 02.04.2011 в 15:31
Hugo
Дата: Суббота, 02.04.2011, 18:08 |
Сообщение № 14
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3690
Репутация:
790
±
Замечаний:
0% ±
365
Так если пробовали - так ведь вот оно и есть. Запустили код - получили в буфер данные. Теперь можете их вставлять куда угодно, хоть в Ворд.
Так если пробовали - так ведь вот оно и есть. Запустили код - получили в буфер данные. Теперь можете их вставлять куда угодно, хоть в Ворд. Hugo
webmoney: E265281470651 Z422237915069 USDT TRC20: TN8XeEF17o5KPBD9pNwYzNyruycuAc2mVD
Ответить
Сообщение Так если пробовали - так ведь вот оно и есть. Запустили код - получили в буфер данные. Теперь можете их вставлять куда угодно, хоть в Ворд. Автор - Hugo Дата добавления - 02.04.2011 в 18:08
xxxSEKAxxx
Дата: Понедельник, 04.04.2011, 16:43 |
Сообщение № 15
Группа: Пользователи
Ранг: Участник
Сообщений: 89
Репутация:
0
±
Замечаний:
0% ±
Quote (Hugo )
Так если пробовали - так ведь вот оно и есть. Запустили код - получили в буфер данные. Теперь можете их вставлять куда угодно, хоть в Ворд.
Та понял! Спасибо!!
Quote (Hugo )
Так если пробовали - так ведь вот оно и есть. Запустили код - получили в буфер данные. Теперь можете их вставлять куда угодно, хоть в Ворд.
Та понял! Спасибо!!xxxSEKAxxx
Ответить
Сообщение Quote (Hugo )
Так если пробовали - так ведь вот оно и есть. Запустили код - получили в буфер данные. Теперь можете их вставлять куда угодно, хоть в Ворд.
Та понял! Спасибо!!Автор - xxxSEKAxxx Дата добавления - 04.04.2011 в 16:43
xxxSEKAxxx
Дата: Четверг, 07.04.2011, 20:04 |
Сообщение № 16
Группа: Пользователи
Ранг: Участник
Сообщений: 89
Репутация:
0
±
Замечаний:
0% ±
Вот не одну одного понять, есть файлы в которых скрытые столбцы, но при копировании, и вставке даных в другой файл они пропускаютса, тоесть сдвиг происходит. В других такого нет. Вот макросом надо пользоватса. Может это в свойствах файла можно выставить?
Вот не одну одного понять, есть файлы в которых скрытые столбцы, но при копировании, и вставке даных в другой файл они пропускаютса, тоесть сдвиг происходит. В других такого нет. Вот макросом надо пользоватса. Может это в свойствах файла можно выставить? xxxSEKAxxx
Ответить
Сообщение Вот не одну одного понять, есть файлы в которых скрытые столбцы, но при копировании, и вставке даных в другой файл они пропускаютса, тоесть сдвиг происходит. В других такого нет. Вот макросом надо пользоватса. Может это в свойствах файла можно выставить? Автор - xxxSEKAxxx Дата добавления - 07.04.2011 в 20:04