Я хочу автоматически выбрать каждый элемент в слайсере, выбрать первый элемент, скопировать данные и вставить на другой лист, затем выбрать следующий элемент в слайсере и скопировать данные и вставить на другой лист, и так далее допоследний элемент в слайсере.
код vba, который я использую для копирования и вставки, приведен ниже:
Private Sub CommandButton1_Click()
Sheets("Sheet1").Select
Range("e3:f3").Select
Range(Selection, Selection.End(xlDown)).Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Sheet2").Range("A" & Rows.Count).End(xlUp).Offset(1, 0).PasteSpecial
Paste:=xlPasteValues
End Sub