Добрый день!
Прошу помощи, так как в VBA чайник:)
Имеется макрос, который выгружает только выделенный диапазон в новую книгу, с подальшим его преобразованием и сохранением.
Проблема в том, что выделенный диапазон копируется только с текущего листа, а нужно, чтобы копировались все выделенные диапазоны с других листов в текущей книге.
Помогите усовершенствовать код!
Прошу помощи, так как в VBA чайник:)
Имеется макрос, который выгружает только выделенный диапазон в новую книгу, с подальшим его преобразованием и сохранением.
| Код |
|---|
Sub ИМПОРТ()
Selection.Copy
Workbooks.Add
Range("A2").Select
ActiveSheet.Paste
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=True, Transpose:=False
Columns("L:L").Select
CutCopyMode = False
Selection.Delete Shift:=xlToLeft
Columns("O:O").Select
CutCopyMode = False
Selection.Delete Shift:=xlToLeft
ActiveWorkbook.SaveAs Filename:= _
("C:\Users\olga\Desktop\ИМПОРТ реестров.xls")
End Sub |
Проблема в том, что выделенный диапазон копируется только с текущего листа, а нужно, чтобы копировались все выделенные диапазоны с других листов в текущей книге.
Помогите усовершенствовать код!
Изменено: - 28.11.2019 14:34:55
