返回

excel-将表1中的A列移动到表2中的B列,并对数据进行排序

发布时间:2022-06-29 21:34:16 180

嗨,我之前问过一个类似的问题,但这是我遇到的另一个问题。我使用的是Excel VBA,我有一个从一张表复制到另一张表的数据列表。我的目标是将A列从表1移动到表2中的B列,并对数据进行排序。例如:表1中的A列包含(H、H、H、H/R、H/R/I、H、H/R/I、H/R/I、H/R/I、H/R、H、H)从A列中的第2行开始,我希望它像这样排列在表2的B列中(H、H、H、H、H、H、H、H、H、H、H/R、H/R/I、H/R/I)。以下是陷阱:I want it start on Row 3.如果可以的话,请帮忙。这是到目前为止我的代码,但正如我所说,我需要它从第1页A列的第2行开始,到第2页B列的第3行。

Private Sub Button1_Click()

   'Copy column "A" from Sheet1 into Column "B" of Sheet2 (Unsorted values)

     Sheets("Sheet1").Columns("A:A").Copy Destination:=Sheets("Sheet2").Range("B:B")

    'Sort the column 'B' using excel function "Sort"
       ThisWorkbook.Sheets("Sheet2").Columns("B:B").Sort 
       key1:=ThisWorkbook.Sheets("Sheet2").Range("B1"), _
       order1:=xlAscending, Header:=xlNo

End Sub
特别声明:以上内容(图片及文字)均为互联网收集或者用户上传发布,本站仅提供信息存储服务!如有侵权或有涉及法律问题请联系我们。
举报
评论区(1)
按点赞数排序
用户头像