数据透视表显示格式问题

xkzhong · 发表于 2006-12-25 13:11

Ja8H4f59.rar (6.03 KB, 下载次数: 11)

谢谢朋友们的帮助。

[此贴子已经被作者于2006-12-26 11:24:07编辑过]

tenglong1898 · 发表于 2006-12-25 15:08

双击透视表名称字段-->分数汇总选无

就可以去掉汇总行.

xkzhong · 发表于 2006-12-26 10:08

谢谢tenglong1898，解决了第一个问题！

第二个问题：如何把数量为“0”的行隐蔽呢？

还请朋友帮助啊！谢谢您们！

gvntw · 发表于 2006-12-26 10:20

Option Explicit

Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
    Dim i%
    Application.ScreenUpdating = False

    For i = 1 To Range("C65536").End(xlUp).Row
        If Cells(i, 3) = 0 Then
            Rows(i).Hidden = True
        Else
            Rows(i).Hidden = False
        End If
    Next

    Application.ScreenUpdating = True
End Sub

		自动登录	找回密码
密码			免费注册