我有一个包含145个类别的重复列表,每个类别有15列数据.我正在通过将类别数量减少到24并添加相应数据来合并此列表.
例如,如果最初我有类别ABCDEFG并且我合并了,我会在A中添加所有值,比如F,以获得新类别.
另一个问题是所有这145个类别在60个时间段内重复.所以我必须为每个时间段分别合并数据.
为此,我尝试使用数组.
Sub CategoriesToSectors()
Dim k As Integer
Dim j As Integer
Dim p As Integer
Dim Destination As Range
' p is just a filler/dummy variable until I later decide which categories go into which sector
Dim CategoryData(144, 14) As Long
Dim SectorData(23, 14) As Long
k = 0
' k should go Upto 60
' I first copy the data from a range in the first worksheet into the array CategoryData
' Then I move 145 …
Run Code Online (Sandbox Code Playgroud)