Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Пропуск столбцов при копирование - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Пропуск столбцов при копирование
xxxSEKAxxx Дата: Пятница, 01.04.2011, 18:20 | Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 89
Репутация: 0 ±
Замечаний: 0% ±

Добрый день
Возникла такая проблема, нужно скопировать ячейки от А8 до BY8, при етом не обходимо что бы столбцы T,U при копирование не учитывались. Возможно ли вообще так сделать? Макрос или формула?
К сообщению приложен файл: 5443161.xls (61.0 Kb)
 
Ответить
СообщениеДобрый день
Возникла такая проблема, нужно скопировать ячейки от А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
Дата добавления - 01.04.2011 в 21:48
xxxSEKAxxx Дата: Пятница, 01.04.2011, 22:00 | Сообщение № 3
Группа: Пользователи
Ранг: Участник
Сообщений: 89
Репутация: 0 ±
Замечаний: 0% ±

Хотелось бы макросом.
А вообщем буду рад любому решению biggrin
В специальной вставке уже все перепробовал, у меняя не получилось sad
 
Ответить
СообщениеХотелось бы макросом.
А вообщем буду рад любому решению biggrin
В специальной вставке уже все перепробовал, у меняя не получилось sad

Автор - 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
Дата добавления - 01.04.2011 в 22:25
kim Дата: Пятница, 01.04.2011, 22:26 | Сообщение № 5
Группа: Друзья
Ранг: Обитатель
Сообщений: 371
Репутация: 160 ±
Замечаний: 0% ±

Excel 2010
Дам подсказку smile
http://office.microsoft.com/ru-ru/excel-help/HA010244897.aspx?CTT=3
Можно ж копировать только видимые, скрыв неугодные столбцы.


Сцяна - гэта тая ж прыступка. Проста трэба дарасьці да яе.
 
Ответить
СообщениеДам подсказку smile
http://office.microsoft.com/ru-ru/excel-help/HA010244897.aspx?CTT=3
Можно ж копировать только видимые, скрыв неугодные столбцы.

Автор - kim
Дата добавления - 01.04.2011 в 22:26
xxxSEKAxxx Дата: Пятница, 01.04.2011, 22:53 | Сообщение № 6
Группа: Пользователи
Ранг: Участник
Сообщений: 89
Репутация: 0 ±
Замечаний: 0% ±

Quote (kim)
Дам подсказку http://office.microsoft.com/ru-ru/excel-help/HA010244897.aspx?CTT=3 Можно ж копировать только видимые, скрыв неугодные столбцы.

С этим разобрался, но это гемор angry sad
может все таки как то макросом или формулой?
 
Ответить
Сообщение
Quote (kim)
Дам подсказку http://office.microsoft.com/ru-ru/excel-help/HA010244897.aspx?CTT=3 Можно ж копировать только видимые, скрыв неугодные столбцы.

С этим разобрался, но это гемор angry sad
может все таки как то макросом или формулой?

Автор - 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
К сообщению приложен файл: _5443161.zip (20.7 Kb)


Яндекс.Деньги 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

Я так понимаю, ето вставка только видимых ячеек?
Спасибо!!! smile
Примерно так и должно быть!
Сейчас еще немного поиграюсь.
 
Ответить
Сообщение
Quote (nilem)
.Cells(lr, 1).PasteSpecial Paste:=xlPasteValues

Я так понимаю, ето вставка только видимых ячеек?
Спасибо!!! smile
Примерно так и должно быть!
Сейчас еще немного поиграюсь.

Автор - Гость
Дата добавления - 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

Можно ли так сделать, чтобы просто скопировало, а дальше уже вставлять куда необхидомо?

Автор - Гость
Дата добавления - 02.04.2011 в 12:53
Hugo Дата: Суббота, 02.04.2011, 13:28 | Сообщение № 10
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3687
Репутация: 789 ±
Замечаний: 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

Только как Вам нужно "не учитывать"? В этом варианте эти столбцы просто выкидываются, т.е. если вставить скопированное в другое место - "хвост" сдвинется на два столбца влево.


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)
если вставить скопированное в другое место - "хвост" сдвинется на два столбца влево.

Имено так и надо!

Автор - Гость
Дата добавления - 02.04.2011 в 14:48
Гость Дата: Суббота, 02.04.2011, 15:14 | Сообщение № 12
Группа: Гости
Quote (Hugo)
Так скорректировать не пробовали?

Пробовал, но не совсем понимаю, что к чему cry
 
Ответить
Сообщение
Quote (Hugo)
Так скорректировать не пробовали?

Пробовал, но не совсем понимаю, что к чему cry

Автор - Гость
Дата добавления - 02.04.2011 в 15:14
Гость Дата: Суббота, 02.04.2011, 15:31 | Сообщение № 13
Группа: Гости
Quote (0mega)
просто скопировать, или скопировать и распечатать, скопировать -вставить ...
что надо сделать после копирования ?

Скопировать и вставлять в другие файлы, так что бы не вставлялись столбцы Т,U. То есть так чтоб происходил здвиг на 2 столбца
 
Ответить
Сообщение
Quote (0mega)
просто скопировать, или скопировать и распечатать, скопировать -вставить ...
что надо сделать после копирования ?

Скопировать и вставлять в другие файлы, так что бы не вставлялись столбцы Т,U. То есть так чтоб происходил здвиг на 2 столбца

Автор - Гость
Дата добавления - 02.04.2011 в 15:31
Hugo Дата: Суббота, 02.04.2011, 18:08 | Сообщение № 14
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3687
Репутация: 789 ±
Замечаний: 0% ±

365
Так если пробовали - так ведь вот оно и есть.
Запустили код - получили в буфер данные. Теперь можете их вставлять куда угодно, хоть в Ворд.


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
Дата добавления - 04.04.2011 в 16:43
xxxSEKAxxx Дата: Четверг, 07.04.2011, 20:04 | Сообщение № 16
Группа: Пользователи
Ранг: Участник
Сообщений: 89
Репутация: 0 ±
Замечаний: 0% ±

Вот не одну одного понять, есть файлы в которых скрытые столбцы, но при копировании, и вставке даных в другой файл они пропускаютса, тоесть сдвиг происходит. В других такого нет. Вот макросом надо пользоватса. Может это в свойствах файла можно выставить?
 
Ответить
СообщениеВот не одну одного понять, есть файлы в которых скрытые столбцы, но при копировании, и вставке даных в другой файл они пропускаютса, тоесть сдвиг происходит. В других такого нет. Вот макросом надо пользоватса. Может это в свойствах файла можно выставить?

Автор - xxxSEKAxxx
Дата добавления - 07.04.2011 в 20:04
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!