petrak 发表于 2004-8-29 16:30

请教有关excel里的宏

我有一个excel表,先按要求做了一些转换,然后做了数据透视表和图.
现在我想在下次录入数据是,能自动先实现转换,然后更新数据透视表和图.

怎么写个宏呢?? 因为我想用个控件控制,能自动显示的.

我是新手,请大家帮助!先谢过了!

gaga 发表于 2004-9-2 12:19

有”录制宏“这个功能,录完了再去定制你的工具栏,找到你录的宏然后拖到工具栏上。
可以用office里的vb编辑器去查看和修改你录的宏代码。

当然也可以在你的文档里贴一个按钮,取代工具栏的按钮。 代码可以参考录制下来的宏。

zukunft 发表于 2004-9-2 17:30

我还有问题,宏写了,运行有问题!在朋友家,就用这个ID发贴吧!
Sheets("Tabelle1").Select
    ActiveWindow.SelectedSheets.Delete
    Sheets("Diagramm1").Select
    ActiveWindow.SelectedSheets.Delete
   
    ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
      "Ausführender!R1C1:R1830C25").CreatePivotTable TableDestination:="", _
      TableName:="PivotTable1", DefaultVersion:=xlPivotTableVersion10
    ActiveSheet.PivotTableWizard TableDestination:=ActiveSheet.Cells(3, 1)
    ActiveSheet.Cells(3, 1).Select
    ActiveSheet.PivotTables("PivotTable1").AddFields RowFields:="Jahr", _
      ColumnFields:="Anf"
    ActiveSheet.PivotTables("PivotTable1").PivotFields("Ist Gesamt
页: [1]
查看完整版本: 请教有关excel里的宏