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

Вход

Регистрация

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

 

= Мир MS Excel/Макрос для копирования данных в плавающем диапазоне - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Макрос для копирования данных в плавающем диапазоне (Макросы/Sub)
Макрос для копирования данных в плавающем диапазоне
serg667788 Дата: Суббота, 15.12.2018, 14:59 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 1
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
[vba][code][/code][/vba]Здравствуйте дорогие знатоки excel. Недавно столкнулся с проблемой, для решения которой своих познаний (скромных) в excel не хватает, поэтому прошу Вашей помощи. Суть проблемы в следующем. Имеем в столбце А список людей с Ф.И.О. датой рождения, номером дела и перечнем соц. услуг, в столбце В количество оказанных им соц. услуг. Нужно создать макрос, при помощи которого можно было из столбца. А копировать Ф.И.О нескольких людей до ячейки с надписью всего по получателю с количеством оказанных им услуг (столбец В) и переносить на другой лист. Проблема заключается в том, что услуги каждый месяц будут плавающие те прибавляться или убавляться. Пытался записать макрос при помощи excel, но никак не могу решить проблему с плавающим списком услуг... Помогите пожалуйста решить проблему... Вот, что я пытался сделать
Sub Макрос1()
'
' Макрос1 Макрос
'
' Сочетание клавиш: Ctrl+я
'
Range("A1:B10").Select
Selection.Copy
Sheets("Лист2").Select
Columns("A:A").ColumnWidth = 61.14
Columns("B:B").ColumnWidth = 14.29
Range("A1:B1").Select
ActiveSheet.Paste
Sheets("Лист1").Select
ActiveWindow.SmallScroll Down:=16
Range("A26:B34").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Лист2").Select
Range("A11:B11").Select
ActiveSheet.Paste
ActiveWindow.SmallScroll Down:=11
Sheets("Лист1").Select
ActiveWindow.SmallScroll Down:=20
End Sub
К сообщению приложен файл: 8964939.xlsx(12.6 Kb)


555

Сообщение отредактировал serg667788 - Суббота, 15.12.2018, 20:04
 
Ответить
Сообщение[vba][code][/code][/vba]Здравствуйте дорогие знатоки excel. Недавно столкнулся с проблемой, для решения которой своих познаний (скромных) в excel не хватает, поэтому прошу Вашей помощи. Суть проблемы в следующем. Имеем в столбце А список людей с Ф.И.О. датой рождения, номером дела и перечнем соц. услуг, в столбце В количество оказанных им соц. услуг. Нужно создать макрос, при помощи которого можно было из столбца. А копировать Ф.И.О нескольких людей до ячейки с надписью всего по получателю с количеством оказанных им услуг (столбец В) и переносить на другой лист. Проблема заключается в том, что услуги каждый месяц будут плавающие те прибавляться или убавляться. Пытался записать макрос при помощи excel, но никак не могу решить проблему с плавающим списком услуг... Помогите пожалуйста решить проблему... Вот, что я пытался сделать
Sub Макрос1()
'
' Макрос1 Макрос
'
' Сочетание клавиш: Ctrl+я
'
Range("A1:B10").Select
Selection.Copy
Sheets("Лист2").Select
Columns("A:A").ColumnWidth = 61.14
Columns("B:B").ColumnWidth = 14.29
Range("A1:B1").Select
ActiveSheet.Paste
Sheets("Лист1").Select
ActiveWindow.SmallScroll Down:=16
Range("A26:B34").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Лист2").Select
Range("A11:B11").Select
ActiveSheet.Paste
ActiveWindow.SmallScroll Down:=11
Sheets("Лист1").Select
ActiveWindow.SmallScroll Down:=20
End Sub

Автор - serg667788
Дата добавления - 15.12.2018 в 14:59
Pelena Дата: Суббота, 15.12.2018, 18:56 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 14329
Репутация: 3132 ±
Замечаний: ±

Excel 2010, 2016 & Mac Excel
serg667788, оформите код тегами с помощью кнопки # в режиме правки поста.
И желательно изобразить в файле вручную, как должен выглядеть результат


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
Сообщениеserg667788, оформите код тегами с помощью кнопки # в режиме правки поста.
И желательно изобразить в файле вручную, как должен выглядеть результат

Автор - Pelena
Дата добавления - 15.12.2018 в 18:56
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Макрос для копирования данных в плавающем диапазоне (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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