2019年10月18日
VBA常用代码
摘要： Application.Calculation = xlCalculationManual '手动计算 Application.Calculation = xlCalculationAutomatic '自动计算 Application.ScreenUpdating = False '关闭屏幕刷新 阅读全文
posted @ 2019-10-18 00:26 zhujie- 阅读(1119) 评论(0) 推荐(0)
VBA创建数据透视表
摘要： Sub 透视表() Dim PTC As PivotCache Dim PVT As PivotTable Dim rng As Range Set rng = Sheet1.Range("a1:d45") '数据源 Set PTC = ActiveWorkbook.PivotCaches.Crea 阅读全文
posted @ 2019-10-18 00:22 zhujie- 阅读(3096) 评论(0) 推荐(0)