F
Friedi
Using the Webcomponent OWC10 under Access 2002 works perfectly well with
following VBA code:
Private Sub Form_Open(Cancel As Integer)
Dim PTable As OWC10.PivotTable
Dim PTableView As OWC10.PivotView
Dim PAxis As OWC10.PivotAxis
Dim Pfield As OWC10.PivotField
Dim PFieldset As OWC10.PivotFieldSet
Dim pDataAxis As OWC10.PivotDataAxis
Dim ptConstants
Dim totNewTotal
Set PTable = Forms("FormName").PivotTable
PTable.BackColor = RGB(171, 223, 248)
Me.RecordSource = SQLStatement
Set PTableView = PTable.ActiveView
PTable.ActiveView.TitleBar.Visible = True
PTable.ActiveView.TitleBar.BackColor = vbBlue
PTable.ActiveView.TitleBar.HAlignment = plHAlignCenter
etc.etc..
Using this same VBA Code only replacing OWC10 by OWC11 under Access2003
doesn't work at all. AT the Set PTable Statement I already get an error msg
"Type mismatch"
Can anybody give an input about Access 2003 OWC11 web component?
thanks
Friedi
following VBA code:
Private Sub Form_Open(Cancel As Integer)
Dim PTable As OWC10.PivotTable
Dim PTableView As OWC10.PivotView
Dim PAxis As OWC10.PivotAxis
Dim Pfield As OWC10.PivotField
Dim PFieldset As OWC10.PivotFieldSet
Dim pDataAxis As OWC10.PivotDataAxis
Dim ptConstants
Dim totNewTotal
Set PTable = Forms("FormName").PivotTable
PTable.BackColor = RGB(171, 223, 248)
Me.RecordSource = SQLStatement
Set PTableView = PTable.ActiveView
PTable.ActiveView.TitleBar.Visible = True
PTable.ActiveView.TitleBar.BackColor = vbBlue
PTable.ActiveView.TitleBar.HAlignment = plHAlignCenter
etc.etc..
Using this same VBA Code only replacing OWC10 by OWC11 under Access2003
doesn't work at all. AT the Set PTable Statement I already get an error msg
"Type mismatch"
Can anybody give an input about Access 2003 OWC11 web component?
thanks
Friedi