Office及VBA技术交流

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 2381|回复: 0

excel vba 透视图代码报错 无效的过程调用或参数

[复制链接]
  • TA的每日心情
    开心
    2016-3-4 07:46
  • 签到天数: 3 天

    [LV.2]偶尔看看I

    56

    主题

    124

    帖子

    736

    积分

    管理员

    Rank: 9Rank: 9Rank: 9

    积分
    736
    发表于 2016-3-5 18:27:02 | 显示全部楼层 |阅读模式
        以下是原来报错时的代码,研究了半天,发现是因为Excel版本不同导致的问题,只需要去掉 Version:=xlPivotTableVersion15 即可。xlPivotTableVersion15 是 excel 2013的透视图版本
    1. 'update pivot table for source
    2.     Sheet6.PivotTables("PivotTableForSource").ChangePivotCache ActiveWorkbook.PivotCaches. _
    3.         Create(SourceType:=xlDatabase, SourceData:= _
    4.         "源数据!A2:M" & Sheet1.Range("B1").Value, _
    5.         Version:=xlPivotTableVersion15)
    6.    
    7.     'update pivot table for temp
    8.     Sheet8.PivotTables("PivotTableForTemp").ChangePivotCache ActiveWorkbook.PivotCaches. _
    9.         Create(SourceType:=xlDatabase, SourceData:= _
    10.         "temp!A2:D" & Sheet3.Range("B1").Value, _
    11.         Version:=xlPivotTableVersion15)
    复制代码



    本帖子中包含更多资源

    您需要 登录 才可以下载或查看,没有帐号?立即注册

    x

    相关帖子

    回复

    使用道具 举报

    您需要登录后才可以回帖 登录 | 立即注册

    本版积分规则

    手机版|小黑屋|Office Master ( 蜀ICP备16003423号 )

    GMT+8, 2019-10-19 03:33 , Processed in 0.253959 second(s), 29 queries .

    Office Master

    快速回复 返回顶部 返回列表