更新EXCEL数据透视表在更新时,列宽自动被调整

更新EXCEL数据透视表在更新时,列宽自动被调整

问题

每次更新EXCEL数据透视表,数据透视表的宽度会“被自动调整”
在这里插入图片描述

解决方案

在数据透视表任何位置右击 > 选择“数据透视表选项” > 取消“更新时自动调整列宽(A)”的勾选
在这里插入图片描述
为了保险起见,可以让透视表每次打开时自动更新。
在数据透视表任何位置右击 > 选择“数据透视表选项” > 点击“数据” > 勾选✔ “打开文件时刷新数据(R)”
在这里插入图片描述

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
可以通过以下步骤实现: 1. 在一个新的Sheet创建汇总数据透视表,并设置数据透视表的格式。 2. 编写一个VBA宏,遍历所有需要生成数据透视表的Sheet。 3. 在遍历过程,对每个Sheet进行以下操作: - 选需要生成数据透视表的数据区域。 - 创建数据透视表,并设置数据透视表的格式。 - 将数据透视表的数据复制到汇总数据透视表的下方。 4. 运行VBA宏,生成所有数据透视表,并将它们汇总到汇总数据透视表。 以下是一个示例VBA宏: ```VBA Sub GeneratePivotTables() Dim summarySheet As Worksheet Dim dataSheet As Worksheet Dim lastRow As Long Dim pivotTable As PivotTable Dim pivotCache As PivotCache '获取汇总数据透视表所在Sheet Set summarySheet = ThisWorkbook.Sheets("Summary") '清空汇总数据透视表下方的所有数据 summarySheet.Range("A2:Z1000").ClearContents '遍历所有需要生成数据透视表的Sheet For Each dataSheet In ThisWorkbook.Sheets If dataSheet.Name <> summarySheet.Name Then '选需要生成数据透视表的数据区域 lastRow = dataSheet.Cells(Rows.Count, 1).End(xlUp).Row dataSheet.Range("A1:B" & lastRow).Select '创建数据透视表 Set pivotCache = ThisWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:=Selection) Set pivotTable = pivotCache.CreatePivotTable(TableDestination:=summarySheet.Range("A" & Rows.Count).End(xlUp).Offset(1), TableName:="PivotTable" & dataSheet.Name) '设置数据透视表的格式 With pivotTable .PivotFields("Column1").Orientation = xlRowField .PivotFields("Column2").Orientation = xlColumnField .AddDataField .PivotFields("Data"), "Sum of Data", xlSum End With '复制数据透视表的数据到汇总数据透视表下方 pivotTable.TableRange2.Copy summarySheet.Range("A" & Rows.Count).End(xlUp).Offset(1) End If Next '自动调整汇总数据透视表列宽和行高 summarySheet.Cells.EntireColumn.AutoFit summarySheet.Cells.EntireRow.AutoFit End Sub ``` 注意:在运行该宏前,需要先在工作簿创建一个名为"Summary"的Sheet,并在该Sheet创建好汇总数据透视表的格式。同,该示例宏假设每个需要生成数据透视表的Sheet的数据区域为A1:Bn,其第一为"Column1",第二为"Column2",第三为"Data"。你需要根据你的实际情况进行修改。

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值