В настоящее время я работаю над панелью управления, которая использует пользовательские данные с устройства. Каждый месяц будет предоставляться новый набор данных, который должен обрабатываться Excel, чтобы преобразовать эти необработанные данные во что-то полезное. Также я хочу, чтобы Excel сохранил эти данные для графиков, которые показывают со временем развитие количества пользователей.
В новых наборах данных за каждый месяц устройства, которые были удалены, удаляются из набора данных, который является тем, чтоМне нужны мои графики с течением времени.
Набор данных содержит более 28 столбцов данных различных типов и ок. В нем 20 000 пользователей.
В настоящее время у меня есть этот код VBA, который работает для первой строки в Excel:
Private Sub CommandButton1_Click()
Dim Organization_Group_Name As String
Dim Device_Model As String
Dim AcqDate As Date
Dim ws as Worksheet
Dim ws_origin as Worksheet
Dim Last_Item as Long
Set ws = ThisWorkbook.Worksheets("Database")
Set ws_origin = ThisWorkbook.Worksheets("Input")
'Input sheet
With ws_origin
Organization_Group_Name = .Range("C2").Value
Device_Model = .Range("M2").Value
AcqDate = .Range("BA2").Value
End With
'Output in Database sheet
If ws.Range("A1").Value <> "" Then
Last_Item = Range("A1").End(xlDown).Row
Else
Last_Item = 1
End If
ws.Cells(Last_Item + 1, 0).Value = Organization_Group_Name
ws.Cells(Last_Item + 1, 1).Value = Device_Model
ws.Cells(Last_Item + 1, 2).Value = AcqDate
End Sub
Он выполняет работу на странице «База данных» (выбирает следующую пустуюи т. д.)
Прямо сейчас, как я могу закодировать его так, чтобы он копировал весь столбец (столбец A, B и C), независимо от количества строк
С наилучшими пожеланиями.