Как создать историческую базу данных в Excel из ежемесячных пользовательских данных - PullRequest
0 голосов
/ 17 октября 2019

В настоящее время я работаю над панелью управления, которая использует пользовательские данные с устройства. Каждый месяц будет предоставляться новый набор данных, который должен обрабатываться 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), независимо от количества строк

С наилучшими пожеланиями.

...