中关村在线

首页 排行 新品 问答 下载 论坛 手机 笔记本 数码相机 主板 显卡 平板电脑 更多

Excel数据透视表如何消除原有数据项

举报
讨论回答 (4)
wanmenshayu8
yuanxiaoxinai
  数据透视表的数据源可能改变, 导致字段下拉列表中有些无用的数据项存在,例如有些销售人员已经离开公司, 但他们的名字仍然在数据透视表的数据项中存在。以下是我为您带来的关于Excel数据透视表清除原有数据项,希望对您有所帮助。
  Excel数据透视表清除原有数据项
  尽管你每次更新数据透视表后,这些名字仍然与新名字同时显示出来. 在下面的列表中, 杨建新已经被刘艳代替,但他的名字仍然存在。

  手动清除原有的数据项

  从列表中手动清除原有的数据项操作方法:

  1. 将数据透视字段拖拉到数据透视表以外的区域.

  2. 点击数据透视表工具栏上的更新按钮

  3. 将数据透视字段拖拉回到数据透视表区域

  编写程序清除原有的数据项 -- Excel 2002或更高版本

  在Excel 2002或更高版本中, 你可以编写程序改变数据透视表属性,防止遗漏显示数据项或清除已经显示的数据项.

  Sub DeleteMissingItems2002All()

  '防止数据透视表中显示无用的数据项

  '在 Excel 2002 或更高版本中

  '如果无用的数据项已经存在,

  '运行这个宏可以更新

  Dim pt As PivotTable

  Dim ws As Worksheet

  For Each ws In ActiveWorkbook.Worksheets

  For Each pt In ws.PivotTables

  pt.PivotCache.MissingItemsLimit = xlMissingItemsNone

  Next pt

  Next ws

  End Sub

  编写程序清除原有的数据项-- Excel 97/Excel 2000

  在较早的Excel版本中, 运行下列代码可以清除数据透视表下拉表的原有数据项.

  Sub DeleteOldItemsWB()

  '清除数据透视表中无用的数据项

  ' 单位MSKB (202232)

  Dim ws As Worksheet

  Dim pt As PivotTable

  Dim pf As PivotField

  Dim pi As PivotItem

  On Error Resume Next

  For Each ws In ActiveWorkbook.Worksheets

  For Each pt In ws.PivotTables

  pt.RefreshTable

  For Each pf In pt.VisibleFields

  If pf.Name <> "Data" Then

  For Each pi In pf.PivotItems

  If pi.RecordCount = 0 And _

  Not pi.IsCalculated Then

  pi.Delete

  End If

  Next

  End If

  Next

  Next

  Next

  End Sub

猜你喜欢:

1. Excel数据透视表动态数据怎么制作

2. 怎样在Excel2013数据透视表中统计不重复值数量

3. Excel如何去除无效数据

4. excel表格数据透析的方法

5. Excel中表格数据出现E+17修改文本的解决技巧
skyfcfly
cxzcxz789
展开查看全部 4 条讨论
精品应用推荐
新浪微博 新浪微博 天气通 天气通 淘宝特价版 淘宝特价版 UC浏览器 UC浏览器
相关问题

如何实现全国各地同事共用一个excel表格?

2960 浏览 10 回答

主要使用excel处理数据的话,财务人员学习VBA和python哪个比较好?

4519 浏览 10 回答

每天面对大量excel表,好麻烦,效率很低,有什么推荐的工具吗?

3306 浏览 9 回答

word excel 一打开文件就提示另存为。。。怎麽办???着急

29.1万 浏览 8 回答

EXCEL里面数据太多了,打开好慢,怎么办?

4670 浏览 8 回答

扩展阅读

努比亚Z70 Ultra全面评测:顶级旗舰就是要“与众不同”

评论 9

努比亚Z70 Ultra全面评测:顶级旗舰就是要“与众不同”

飞傲便携CD机DM13评测:享受更纯粹的音乐乐趣

评论 8

飞傲便携CD机DM13评测:享受更纯粹的音乐乐趣

华为服务回馈礼遇:换新电池立减50元,多重优惠来袭!

评论 3

华为服务回馈礼遇:换新电池立减50元,多重优惠来袭!

狂拍J35A、J20、SU57 尼康Z8、Z6III珠海航展拍摄体验

评论 4

狂拍J35A、J20、SU57 尼康Z8、Z6III珠海航展拍摄体验

华为Mate70抢购攻略:轻松绕过200万预约大军,先人一步秒杀新机

评论 60

华为Mate70抢购攻略:轻松绕过200万预约大军,先人一步秒杀新机
热门问题

求推荐一款笔记本。工科研究生用,便于随身携带。平时做科研,处理数据,查阅文献。不玩网游和单机,至多玩棋牌游戏和影音。喜欢摄影,需要修图。附加:纠结要不要带数字键盘区。预算最多8000。尽量便宜些。

1.2万 浏览 6 回答

求推荐一款笔记本。工科研究生用,便于随身携带。平时做科研,处理数据,查阅文献。不玩网游和单机,至多玩棋牌游戏和影音。喜欢摄影,需要修图。附加:纠结要不要带数字键盘区。预算最多8000。尽量便宜些。

荣耀Magic7 Pro

9732 浏览 1 回答

荣耀Magic7 Pro

256gSSD是否够用?打算买个笔记本,办公为主,查阅文献等。不玩大型游戏,至多玩一些棋牌类游戏和影音娱乐。手里有2T移动硬盘,但也想在笔记本上存少量的电影。平时玩单反,处理图片比较多。

2.3万 浏览 4 回答

256gSSD是否够用?打算买个笔记本,办公为主,查阅文献等。不玩大型游戏,至多玩一些棋牌类游戏和影音娱乐。手里有2T移动硬盘,但也想在笔记本上存少量的电影。平时玩单反,处理图片比较多。

肿么找回QQ浏览器历史记录

7296 浏览 6 回答

肿么找回QQ浏览器历史记录

在华为官网预约了手机,不要了要取消预约吗

9490 浏览 5 回答

在华为官网预约了手机,不要了要取消预约吗

手机在哪里登录192.168.1.1设定页面?

9447 浏览 7 回答

手机在哪里登录192.168.1.1设定页面?

海尔售后服务24小时服务热线

2005 浏览 5 回答

海尔售后服务24小时服务热线

快手网页版不用下载直接打开

2229 浏览 6 回答

快手网页版不用下载直接打开

艺术玻璃门打印机要价钱一台啊?哪家的比较好一点。

251 浏览 6 回答

艺术玻璃门打印机要价钱一台啊?哪家的比较好一点。

麒麟9100谁代工

2876 浏览 6 回答

麒麟9100谁代工
最新问答

网页优酷视频播放的时候变黑的 肿么改回去啊

5780 浏览 7 回答

网页优酷视频播放的时候变黑的 肿么改回去啊

主板内存4个插口,内存是挨着插还是分开插,内存型号规格都是一样的

4700 浏览 6 回答

主板内存4个插口,内存是挨着插还是分开插,内存型号规格都是一样的

phoenix bios utility没有BOOT选项

7619 浏览 4 回答

phoenix bios utility没有BOOT选项

《最后生还者》,工具箱位置全览,如何提升等级?

1761 浏览 5 回答

《最后生还者》,工具箱位置全览,如何提升等级?

拳霸任务结局策略,打假赛or坚守正义?奖励解析?

5753 浏览 7 回答

拳霸任务结局策略,打假赛or坚守正义?奖励解析?
举报
举报成功

经过核实后将会做出处理,感谢您为社区和谐做出贡献。

请选择删除原因
删除成功
确定推荐该回答?
推荐成功

更多频道

频道导航
辅助工具