[求助]2000下“Worksheet_Change”及透视表“项数”问题

jjw530

1、在office 2003下，以下代码可以判断数据透视表的变化，但在2000下，改变透视表的页字段带来的变化不会激活此代码

Private Sub Worksheet_Change(ByVal Target As Range)
    If Left(Target.Address, 4) = "$A$3" Then
        Worksheets("往来").Cells(1, 12).Value = ActiveSheet.Cells(3, 2).Value
        Worksheets("往来").Cells(1, 13).Value = ActiveSheet.Cells(4, 1).Value
    End If
End Sub

2、在office 2003下，透视表可以正常使用（数据源有5万多行），但在2000下提示项数太多，经过测试后发现是“单号”字段的问题。

是否2000下字段项的数目有限制？或是允许最高项数小于2003？

实际虽然项数很多，但经过页字段筛选后实际显示的项数应该不多，此限制是否是excel内部运算是做的限制？

plxmm

估计用Excel2000的朋友没有办法，用你1楼的代码做测试。

建议上传完整的代码+附件。

jjw530

YpPKywdf.rar (88.16 KB, 下载次数: 11)

2006-9-10 14:44 上传

点击文件名下载附件
[求助]2000下“Worksheet_Change”及透视表“项数”问题

请指教

jjw530

烦请用2000的高手们提点建议。