Excel VBA Slicer Выбрать каждый элемент - PullRequest
0 голосов
/ 24 мая 2018

Я хочу автоматически выбрать каждый элемент в слайсере, выбрать первый элемент, скопировать данные и вставить на другой лист, затем выбрать следующий элемент в слайсере и скопировать данные и вставить на другой лист, и так далее допоследний элемент в слайсере.

код 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
...