这个主要问题是选择正确的数据。我不能只从我的openbook中选择整列,因为当我试图粘贴到活动工作表的底部时,我得到了这种“粘贴区域不同”类型的错误。如果我可以选择过滤列表中第一行下面的任何单元格,它应该可以工作,但这一行每天都会改变。
` Sub GetData2()
Dim FileToOpen As Variant
Dim openbook As Workbook
ChDrive "C"
ChDir "C:\Users\alovell\Desktop\q400"
Application.ScreenUpdating = Fals