473,893 Members | 1,534 Online
Bytes | Software Development & Data Engineering Community
+ Post

Home Posts Topics Members FAQ

pivot tables

I'm creating a pivot table using vb.net and the data is from sqlserver
(desktop). I have been successful at creating the pivot table, which includes
a 'date' column field. I'd like to group the date column field by months and
quarters, but can't come up with the correct code. Here is the code I've
written to create the pivot table. Any help to code grouping the date column
field would be appreciated.

Thanks,
Jerry

Imports System
Imports System.Runtime. InteropServices
Imports System.Data
Imports System.Data.Sql Client
Imports System.IO

Public Class Form1

Inherits System.Windows. Forms.Form

Private Sub Form1_Load(ByVa l sender As Object, ByVal e As System.
EventArgs) Handles MyBase.Load

'' COMs for excel and office references were added to project

Dim xlApp As Excel.Applicati on
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
Dim xlSheets As Excel.Worksheet s

Dim ConnectionStrin g As String = _
"Server=jer ry;" & _
"DataBase=C TS;" & _
"user ID=sa;password= ruth2jerry"

Dim ptSQL As String
ptSQL = "SELECT * FROM tblActualForeca st2"

Dim cnSQL As SqlConnection
Dim cmSQL As SqlCommand
Dim drSQL As SqlDataReader
Dim dsSQL As DataSet

Dim Row As Integer

xlApp = CType(CreateObj ect("Excel.Appl ication"), Excel.Applicati on)
xlBook = CType(xlApp.Wor kbooks.Add, Excel.Workbook)
xlSheet = CType(xlBook.Wo rksheets(1), Excel.Worksheet )

xlApp.Visible = False

Try
cnSQL = New SqlConnection(C onnectionString )
cnSQL.Open()
cmSQL = New SqlCommand(ptSQ L, cnSQL)
drSQL = cmSQL.ExecuteRe ader

xlSheet.Cells(1 , 1).value = "ActualCase "
xlSheet.Cells(1 , 2).value = "ActualDate "
xlSheet.Cells(1 , 3).value = "ActualComm "
xlSheet.Cells(1 , 4).value = "ActualAcctHand ler"

Row = 2

While drSQL.Read
xlSheet.Cells(R ow, 1).value = drSQL.Item("act ualcase")
xlSheet.Cells(R ow, 2).value = drSQL.Item("act ualDate")
xlSheet.Cells(R ow, 3).value = drSQL.Item("act ualComm")
xlSheet.Cells(R ow, 4).value = drSQL.Item("act ualAcctHandler" )
Row = Row + 1
End While

Catch ex As Exception
MsgBox(ex.Messa ge)
Finally
drSQL.Close()
cnSQL.Close()
cmSQL.Dispose()
cnSQL.Dispose()
End Try

xlSheet.Cells.E ntireColumn.Aut oFit()

Dim xllastcell As String
xllastcell = xlSheet.Cells.S pecialCells(Exc el.XlCellType.
xlCellTypeLastC ell).Address

xlApp.Sheets.Ad d.name = "CTS Pivot Table"

xlBook.ActiveSh eet.PivotTableW izard(Excel.XlP ivotTableSource Type.
xlDatabase, xlSheet.Range(" A1:" & xllastcell))

xlBook.ActiveSh eet.PivotTables (1).PivotFields ("actualCase ").
Orientation = Excel.XlPivotFi eldOrientation. xlRowField
xlBook.ActiveSh eet.PivotTables (1).PivotFields ("actualDate ").
Orientation = Excel.XlPivotFi eldOrientation. xlColumnField
xlBook.ActiveSh eet.PivotTables (1).PivotFields ("actualComm ").
Orientation = Excel.XlPivotFi eldOrientation. xlDataField
xlBook.ActiveSh eet.PivotTables (1).PivotFields ("actualAcctHan dler").
Orientation = Excel.XlPivotFi eldOrientation. xlPageField

' Get the last cell in the pivot table.
xllastcell = xlBook.ActiveSh eet.Cells.Speci alCells(Excel.X lCellType.
xlCellTypeLastC ell).Address
' Set the number format for the data cells
xlBook.ActiveSh eet.range("B5:" & xllastcell).num berformat = "$##,##0.
00"

'' Worth considering ---
xlApp.CommandBa rs("PivotTable" ).Visible = False

'''' Group the selection... ??
'''' Here's where I need to the help to group the date column..

xlBook.ActiveSh eet.PivotTables (1).PivotFields ("actualcase"). Subtotals
(1) = False
xlBook.ActiveSh eet.Cells.Entir eColumn.AutoFit ()

xlApp.Visible = True

End Sub

End Class
Nov 21 '05 #1
3 10282
Jerry - the code you're using is at least syntactically correct. I created
a dummy db with those fields and created a pivot table from there. Here's
what I'd advise doing since I don't have access to yoru db (BTW, as a
security measure, change your password as soon as you read this and disable
your SA account - the bad guys have a lot of bots that paruse these
newsgroups looking for stuff just like that- not trying to lecture, just
looking out ;-) ).

Record a new macro. Then, Go ahead and use Get External data and then pull
the data in using Microsoft Query. This code you can ignore although to be
honest, in many instances it's a lot faster than using ADO.NET to get t the
same place.. Then just manually create the code for your pivot table and
stop recording the macro. You'll have a ton of crap code written, but it
will ultimately provide you with the correct code . the only problem other
than erroneous code (which it tneds to generate a lot of) is that it may
hard code stuff in there instead of using relative references. In general
though, this is pretty easy to work around. I know I'm probably just
telling you stuff you already know, but without the data, it's hard for me
to figure it out.

If you want, write me out a small csv or xml file and send it to WilliamRyan
At Gmaildotcom and I'll try to work through . I'll be up for a while
tonight so i'll do what I can for you.

Cheers,

bill
"Jerry K via DotNetMonster.c om" <fo***@DotNetMo nster.com> wrote in message
news:53******** ***@DotNetMonst er.com...
I'm creating a pivot table using vb.net and the data is from sqlserver
(desktop). I have been successful at creating the pivot table, which
includes
a 'date' column field. I'd like to group the date column field by months
and
quarters, but can't come up with the correct code. Here is the code I've
written to create the pivot table. Any help to code grouping the date
column
field would be appreciated.

Thanks,
Jerry

Imports System
Imports System.Runtime. InteropServices
Imports System.Data
Imports System.Data.Sql Client
Imports System.IO

Public Class Form1

Inherits System.Windows. Forms.Form

Private Sub Form1_Load(ByVa l sender As Object, ByVal e As System.
EventArgs) Handles MyBase.Load

'' COMs for excel and office references were added to project

Dim xlApp As Excel.Applicati on
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
Dim xlSheets As Excel.Worksheet s

Dim ConnectionStrin g As String = _
"Server=jer ry;" & _
"DataBase=C TS;" & _
"user ID=sa;password= ruth2jerry"

Dim ptSQL As String
ptSQL = "SELECT * FROM tblActualForeca st2"

Dim cnSQL As SqlConnection
Dim cmSQL As SqlCommand
Dim drSQL As SqlDataReader
Dim dsSQL As DataSet

Dim Row As Integer

xlApp = CType(CreateObj ect("Excel.Appl ication"), Excel.Applicati on)
xlBook = CType(xlApp.Wor kbooks.Add, Excel.Workbook)
xlSheet = CType(xlBook.Wo rksheets(1), Excel.Worksheet )

xlApp.Visible = False

Try
cnSQL = New SqlConnection(C onnectionString )
cnSQL.Open()
cmSQL = New SqlCommand(ptSQ L, cnSQL)
drSQL = cmSQL.ExecuteRe ader

xlSheet.Cells(1 , 1).value = "ActualCase "
xlSheet.Cells(1 , 2).value = "ActualDate "
xlSheet.Cells(1 , 3).value = "ActualComm "
xlSheet.Cells(1 , 4).value = "ActualAcctHand ler"

Row = 2

While drSQL.Read
xlSheet.Cells(R ow, 1).value = drSQL.Item("act ualcase")
xlSheet.Cells(R ow, 2).value = drSQL.Item("act ualDate")
xlSheet.Cells(R ow, 3).value = drSQL.Item("act ualComm")
xlSheet.Cells(R ow, 4).value =
drSQL.Item("act ualAcctHandler" )
Row = Row + 1
End While

Catch ex As Exception
MsgBox(ex.Messa ge)
Finally
drSQL.Close()
cnSQL.Close()
cmSQL.Dispose()
cnSQL.Dispose()
End Try

xlSheet.Cells.E ntireColumn.Aut oFit()

Dim xllastcell As String
xllastcell = xlSheet.Cells.S pecialCells(Exc el.XlCellType.
xlCellTypeLastC ell).Address

xlApp.Sheets.Ad d.name = "CTS Pivot Table"

xlBook.ActiveSh eet.PivotTableW izard(Excel.XlP ivotTableSource Type.
xlDatabase, xlSheet.Range(" A1:" & xllastcell))

xlBook.ActiveSh eet.PivotTables (1).PivotFields ("actualCase ").
Orientation = Excel.XlPivotFi eldOrientation. xlRowField
xlBook.ActiveSh eet.PivotTables (1).PivotFields ("actualDate ").
Orientation = Excel.XlPivotFi eldOrientation. xlColumnField
xlBook.ActiveSh eet.PivotTables (1).PivotFields ("actualComm ").
Orientation = Excel.XlPivotFi eldOrientation. xlDataField
xlBook.ActiveSh eet.PivotTables (1).PivotFields ("actualAcctHan dler").
Orientation = Excel.XlPivotFi eldOrientation. xlPageField

' Get the last cell in the pivot table.
xllastcell =
xlBook.ActiveSh eet.Cells.Speci alCells(Excel.X lCellType.
xlCellTypeLastC ell).Address
' Set the number format for the data cells
xlBook.ActiveSh eet.range("B5:" & xllastcell).num berformat =
"$##,##0.
00"

'' Worth considering ---
xlApp.CommandBa rs("PivotTable" ).Visible = False

'''' Group the selection... ??
'''' Here's where I need to the help to group the date column..
xlBook.ActiveSh eet.PivotTables (1).PivotFields ("actualcase"). Subtotals
(1) = False
xlBook.ActiveSh eet.Cells.Entir eColumn.AutoFit ()

xlApp.Visible = True

End Sub

End Class

Nov 21 '05 #2
Jerry - the code you're using is at least syntactically correct. I created
a dummy db with those fields and created a pivot table from there. Here's
what I'd advise doing since I don't have access to yoru db (BTW, as a
security measure, change your password as soon as you read this and disable
your SA account - the bad guys have a lot of bots that paruse these
newsgroups looking for stuff just like that- not trying to lecture, just
looking out ;-) ).

Record a new macro. Then, Go ahead and use Get External data and then pull
the data in using Microsoft Query. This code you can ignore although to be
honest, in many instances it's a lot faster than using ADO.NET to get t the
same place.. Then just manually create the code for your pivot table and
stop recording the macro. You'll have a ton of crap code written, but it
will ultimately provide you with the correct code . the only problem other
than erroneous code (which it tneds to generate a lot of) is that it may
hard code stuff in there instead of using relative references. In general
though, this is pretty easy to work around. I know I'm probably just
telling you stuff you already know, but without the data, it's hard for me
to figure it out.

If you want, write me out a small csv or xml file and send it to WilliamRyan
At Gmaildotcom and I'll try to work through . I'll be up for a while
tonight so i'll do what I can for you.

Cheers,

bill
"Jerry K via DotNetMonster.c om" <fo***@DotNetMo nster.com> wrote in message
news:53******** ***@DotNetMonst er.com...
I'm creating a pivot table using vb.net and the data is from sqlserver
(desktop). I have been successful at creating the pivot table, which
includes
a 'date' column field. I'd like to group the date column field by months
and
quarters, but can't come up with the correct code. Here is the code I've
written to create the pivot table. Any help to code grouping the date
column
field would be appreciated.

Thanks,
Jerry

Imports System
Imports System.Runtime. InteropServices
Imports System.Data
Imports System.Data.Sql Client
Imports System.IO

Public Class Form1

Inherits System.Windows. Forms.Form

Private Sub Form1_Load(ByVa l sender As Object, ByVal e As System.
EventArgs) Handles MyBase.Load

'' COMs for excel and office references were added to project

Dim xlApp As Excel.Applicati on
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
Dim xlSheets As Excel.Worksheet s

Dim ConnectionStrin g As String = _
"Server=jer ry;" & _
"DataBase=C TS;" & _
"user ID=sa;password= ruth2jerry"

Dim ptSQL As String
ptSQL = "SELECT * FROM tblActualForeca st2"

Dim cnSQL As SqlConnection
Dim cmSQL As SqlCommand
Dim drSQL As SqlDataReader
Dim dsSQL As DataSet

Dim Row As Integer

xlApp = CType(CreateObj ect("Excel.Appl ication"), Excel.Applicati on)
xlBook = CType(xlApp.Wor kbooks.Add, Excel.Workbook)
xlSheet = CType(xlBook.Wo rksheets(1), Excel.Worksheet )

xlApp.Visible = False

Try
cnSQL = New SqlConnection(C onnectionString )
cnSQL.Open()
cmSQL = New SqlCommand(ptSQ L, cnSQL)
drSQL = cmSQL.ExecuteRe ader

xlSheet.Cells(1 , 1).value = "ActualCase "
xlSheet.Cells(1 , 2).value = "ActualDate "
xlSheet.Cells(1 , 3).value = "ActualComm "
xlSheet.Cells(1 , 4).value = "ActualAcctHand ler"

Row = 2

While drSQL.Read
xlSheet.Cells(R ow, 1).value = drSQL.Item("act ualcase")
xlSheet.Cells(R ow, 2).value = drSQL.Item("act ualDate")
xlSheet.Cells(R ow, 3).value = drSQL.Item("act ualComm")
xlSheet.Cells(R ow, 4).value =
drSQL.Item("act ualAcctHandler" )
Row = Row + 1
End While

Catch ex As Exception
MsgBox(ex.Messa ge)
Finally
drSQL.Close()
cnSQL.Close()
cmSQL.Dispose()
cnSQL.Dispose()
End Try

xlSheet.Cells.E ntireColumn.Aut oFit()

Dim xllastcell As String
xllastcell = xlSheet.Cells.S pecialCells(Exc el.XlCellType.
xlCellTypeLastC ell).Address

xlApp.Sheets.Ad d.name = "CTS Pivot Table"

xlBook.ActiveSh eet.PivotTableW izard(Excel.XlP ivotTableSource Type.
xlDatabase, xlSheet.Range(" A1:" & xllastcell))

xlBook.ActiveSh eet.PivotTables (1).PivotFields ("actualCase ").
Orientation = Excel.XlPivotFi eldOrientation. xlRowField
xlBook.ActiveSh eet.PivotTables (1).PivotFields ("actualDate ").
Orientation = Excel.XlPivotFi eldOrientation. xlColumnField
xlBook.ActiveSh eet.PivotTables (1).PivotFields ("actualComm ").
Orientation = Excel.XlPivotFi eldOrientation. xlDataField
xlBook.ActiveSh eet.PivotTables (1).PivotFields ("actualAcctHan dler").
Orientation = Excel.XlPivotFi eldOrientation. xlPageField

' Get the last cell in the pivot table.
xllastcell =
xlBook.ActiveSh eet.Cells.Speci alCells(Excel.X lCellType.
xlCellTypeLastC ell).Address
' Set the number format for the data cells
xlBook.ActiveSh eet.range("B5:" & xllastcell).num berformat =
"$##,##0.
00"

'' Worth considering ---
xlApp.CommandBa rs("PivotTable" ).Visible = False

'''' Group the selection... ??
'''' Here's where I need to the help to group the date column..
xlBook.ActiveSh eet.PivotTables (1).PivotFields ("actualcase"). Subtotals
(1) = False
xlBook.ActiveSh eet.Cells.Entir eColumn.AutoFit ()

xlApp.Visible = True

End Sub

End Class

Nov 21 '05 #3
Thanks Bill. I realized the sa,pw after I sent the message. I'll fix it.

I recorded a macro and used the code, modified a bit because I'm using
VB.net and am referencing excel. So my code looks like the following... it
contains hard cell references, but that's ok for now. It worked up until the
last few lines that set up the grouping and that's when I get an errror
message about object not set. If I comment out the grouping lines it works
great.
xlBook.PivotCac hes.Add(SourceT ype:=Excel.XlPi votTableSourceT ype.xlDatabase,
SourceData:= _
"Sheet1!R1C1:R3 7C4").CreatePiv otTable(TableDe stination:="",
TableName:= _
"PivotTable 1")

xlBook.ActiveSh eet.PivotTableW izard(TableDest ination:=xlBook .ActiveSheet.Ce lls(3, 1))
xlBook.ActiveSh eet.Cells(3, 1).Select()
xlBook.ActiveSh eet.PivotTables ("PivotTable1") .SmallGrid = False
With
xlBook.ActiveSh eet.PivotTables ("PivotTable1") .PivotFields("A ctualCase")
.Orientation = Excel.XlPivotFi eldOrientation. xlRowField
.Position = 1
End With
With
xlBook.ActiveSh eet.PivotTables ("PivotTable1") .PivotFields("A ctualDate")
.Orientation = Excel.XlPivotFi eldOrientation. xlColumnField
.Position = 1
End With
With
xlBook.ActiveSh eet.PivotTables ("PivotTable1") .PivotFields("A ctualComm")
.Orientation = Excel.XlPivotFi eldOrientation. xlDataField
.Position = 1
End With
With
xlBook.ActiveSh eet.PivotTables ("PivotTable1") .PivotFields("A ctualAcctHandle r")
.Orientation = Excel.XlPivotFi eldOrientation. xlPageField
.Position = 1
End With

''''''' Here's where the trouble is ---
Dim array As Array
Dim xlrange As Excel.Range
xlrange = xlBook.ActiveSh eet.range("B3")
xlrange.Group(S tart:=True, End:=True, Periods:=array( False, _
,False, False, False, True, True, False))

"Jerry K via DotNetMonster.c om" wrote:
I'm creating a pivot table using vb.net and the data is from sqlserver
(desktop). I have been successful at creating the pivot table, which includes
a 'date' column field. I'd like to group the date column field by months and
quarters, but can't come up with the correct code. Here is the code I've
written to create the pivot table. Any help to code grouping the date column
field would be appreciated.

Thanks,
Jerry

Imports System
Imports System.Runtime. InteropServices
Imports System.Data
Imports System.Data.Sql Client
Imports System.IO

Public Class Form1

Inherits System.Windows. Forms.Form

Private Sub Form1_Load(ByVa l sender As Object, ByVal e As System.
EventArgs) Handles MyBase.Load

'' COMs for excel and office references were added to project

Dim xlApp As Excel.Applicati on
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
Dim xlSheets As Excel.Worksheet s

Dim ConnectionStrin g As String = _
"Server=jer ry;" & _
"DataBase=C TS;" & _
"user ID=sa;password= ruth2jerry"

Dim ptSQL As String
ptSQL = "SELECT * FROM tblActualForeca st2"

Dim cnSQL As SqlConnection
Dim cmSQL As SqlCommand
Dim drSQL As SqlDataReader
Dim dsSQL As DataSet

Dim Row As Integer

xlApp = CType(CreateObj ect("Excel.Appl ication"), Excel.Applicati on)
xlBook = CType(xlApp.Wor kbooks.Add, Excel.Workbook)
xlSheet = CType(xlBook.Wo rksheets(1), Excel.Worksheet )

xlApp.Visible = False

Try
cnSQL = New SqlConnection(C onnectionString )
cnSQL.Open()
cmSQL = New SqlCommand(ptSQ L, cnSQL)
drSQL = cmSQL.ExecuteRe ader

xlSheet.Cells(1 , 1).value = "ActualCase "
xlSheet.Cells(1 , 2).value = "ActualDate "
xlSheet.Cells(1 , 3).value = "ActualComm "
xlSheet.Cells(1 , 4).value = "ActualAcctHand ler"

Row = 2

While drSQL.Read
xlSheet.Cells(R ow, 1).value = drSQL.Item("act ualcase")
xlSheet.Cells(R ow, 2).value = drSQL.Item("act ualDate")
xlSheet.Cells(R ow, 3).value = drSQL.Item("act ualComm")
xlSheet.Cells(R ow, 4).value = drSQL.Item("act ualAcctHandler" )
Row = Row + 1
End While

Catch ex As Exception
MsgBox(ex.Messa ge)
Finally
drSQL.Close()
cnSQL.Close()
cmSQL.Dispose()
cnSQL.Dispose()
End Try

xlSheet.Cells.E ntireColumn.Aut oFit()

Dim xllastcell As String
xllastcell = xlSheet.Cells.S pecialCells(Exc el.XlCellType.
xlCellTypeLastC ell).Address

xlApp.Sheets.Ad d.name = "CTS Pivot Table"

xlBook.ActiveSh eet.PivotTableW izard(Excel.XlP ivotTableSource Type.
xlDatabase, xlSheet.Range(" A1:" & xllastcell))

xlBook.ActiveSh eet.PivotTables (1).PivotFields ("actualCase ").
Orientation = Excel.XlPivotFi eldOrientation. xlRowField
xlBook.ActiveSh eet.PivotTables (1).PivotFields ("actualDate ").
Orientation = Excel.XlPivotFi eldOrientation. xlColumnField
xlBook.ActiveSh eet.PivotTables (1).PivotFields ("actualComm ").
Orientation = Excel.XlPivotFi eldOrientation. xlDataField
xlBook.ActiveSh eet.PivotTables (1).PivotFields ("actualAcctHan dler").
Orientation = Excel.XlPivotFi eldOrientation. xlPageField

' Get the last cell in the pivot table.
xllastcell = xlBook.ActiveSh eet.Cells.Speci alCells(Excel.X lCellType.
xlCellTypeLastC ell).Address
' Set the number format for the data cells
xlBook.ActiveSh eet.range("B5:" & xllastcell).num berformat = "$##,##0.
00"

'' Worth considering ---
xlApp.CommandBa rs("PivotTable" ).Visible = False

'''' Group the selection... ??
'''' Here's where I need to the help to group the date column..

xlBook.ActiveSh eet.PivotTables (1).PivotFields ("actualcase"). Subtotals
(1) = False
xlBook.ActiveSh eet.Cells.Entir eColumn.AutoFit ()

xlApp.Visible = True

End Sub

End Class

Nov 21 '05 #4

This thread has been closed and replies have been disabled. Please start a new discussion.

Similar topics

0
2115
by: Prasad Patil | last post by:
Hi, I have created a report in excel, it uses Pivot tables. The excel has two sheets 1: Pivot ( Contains the Pivot Table) 2: Data (Data Requred to populate the pivot table I create an instance of Excel populate the data sheet and load excel in the browser.
1
5285
by: Clive Moss | last post by:
I am in the middle of writing a system for a client who has Access 2000 installed on 8 PC's I have Access 2002 and the system I have written relies on pivot tables to display results. I now find that 2000 does not support them. Is there a way (an add-in or something) that the client can get to display pivot tables? TIA
1
4141
by: Johnny Meredith | last post by:
Dear All, I have an Access database that tracks the progress of income tax audits. When the taxing authorities make a change (an "Adjustment"), I record the pertinent information in the database. At the end of the audit cycle, these adjustments are used to compute the revised taxes due. This computation is done in a fairly complex, but accurate and easy to use, spreadsheet. In the spreadsheet, there is a sheet that lists out all...
0
833
by: Rami | last post by:
Has any body tried using pivot tables in C# I am trying to achieve pivot table functionality ( Rendering Row fields / Column Fields / Data fields ) in C# with Excel 2003. I have complete data in one dataset and i would like to render it on Excel similar to pivot table Is anybody have idea how Excel renders and presents data in the form of pivot table?Are is there any articles which explain the rendering logic of pivot tables Thanks in...
1
3897
by: Jerome Ranch | last post by:
I consider myself an Excel PT wizard of sorts, but now I have a situation with so much infromationthat I need to categorize and summarize, that I will use access to manage it. Interestingly, though, the pivot tables in excel 2003 do not resemble the pivot tables in access 2003 as closely as they did previous versions of the products. One of the most powerful features for me is the grouping function. In excel 2003 if one right clicks date...
0
1950
by: Zlatko Matiæ | last post by:
I have experienced some problems with total operations (sum, min, max, avg etc) in pivot tables nad pivot charts in .mde. In .mdb I can activate any totals operation. on both notebook and desktop PC. When I create .mde on the notebook, I can use totals on laptop, but not on the desktop PC. I just can't switch on any total. There is no total operation in the menu... If I create .mde on the desktop PC then it works....In both cases it is...
3
8496
by: nikila | last post by:
Hi, I have to create excel pivot tables from vb.net. Already I am creating excel file using oledb connection. I want to use the same to create the excel pivot tables. Can anyone please help me on this. It is very urgent. Please reply immediately Thanks for the help!!!! nikila
1
1935
by: STUFIX | last post by:
Hi all, I created a pivot table that allowed users to select certain customers from a drop down list and display the relevant data - it worked fine but has now stopped allowing them to do that. At the same time, I can no longer create a Pivot Table with page, row or column fileds. All of the Pivot Table menu items except Refresh Data have greyed out. I've tried creating a new db with a simple table and pivot and it is the same issue, so...
1
2211
by: mld01s | last post by:
I really need help!!! I dont know if its possible to share pivot tables, or see pivot tables in other machines that the one where the tables were created. This is what happens: I created a database to track different daily results. In a form in that database I added a pivot table, this table lets me see the results, sort them, and everthing a pivot table should let users do. Below the pivot table on the same form I have some fields for...
1
3643
by: chopin | last post by:
Pivot tables in Access are very powerful. The major flaw is presentation. I know exporting to excel is an option, however I want to merge many pivot tables into one report in Access. Is there any way to convert a pivot table (and multiple pivot tables) from a query, into one aggregated report view for presentation?
0
9982
marktang
by: marktang | last post by:
ONU (Optical Network Unit) is one of the key components for providing high-speed Internet services. Its primary function is to act as an endpoint device located at the user's premises. However, people are often confused as to whether an ONU can Work As a Router. In this blog post, we’ll explore What is ONU, What Is Router, ONU & Router’s main usage, and What is the difference between ONU and Router. Let’s take a closer look ! Part I. Meaning of...
0
9830
by: Hystou | last post by:
Most computers default to English, but sometimes we require a different language, especially when relocating. Forgot to request a specific language before your computer shipped? No problem! You can effortlessly switch the default language on Windows 10 without reinstalling. I'll walk you through it. First, let's disable language synchronization. With a Microsoft account, language settings sync across devices. To prevent any complications,...
0
11243
Oralloy
by: Oralloy | last post by:
Hello folks, I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>". The problem is that using the GNU compilers, it seems that the internal comparison operator "<=>" tries to promote arguments from unsigned to signed. This is as boiled down as I can make it. Here is my compilation command: g++-12 -std=c++20 -Wnarrowing bit_field.cpp Here is the code in...
0
9645
agi2029
by: agi2029 | last post by:
Let's talk about the concept of autonomous AI software engineers and no-code agents. These AIs are designed to manage the entire lifecycle of a software development project—planning, coding, testing, and deployment—without human intervention. Imagine an AI that can take a project description, break it down, write the code, debug it, and then launch it, all on its own.... Now, this would greatly impact the work of software developers. The idea...
1
8021
isladogs
by: isladogs | last post by:
The next Access Europe User Group meeting will be on Wednesday 1 May 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM). In this session, we are pleased to welcome a new presenter, Adolph Dupré who will be discussing some powerful techniques for using class modules. He will explain when you may want to use classes instead of User Defined Types (UDT). For example, to manage the data in unbound forms. Adolph will...
0
5858
by: TSSRALBI | last post by:
Hello I'm a network technician in training and I need your help. I am currently learning how to create and manage the different types of VPNs and I have a question about LAN-to-LAN VPNs. The last exercise I practiced was to create a LAN-to-LAN VPN between two Pfsense firewalls, by using IPSEC protocols. I succeeded, with both firewalls in the same network. But I'm wondering if it's possible to do the same thing, with 2 Pfsense firewalls...
0
6066
by: adsilva | last post by:
A Windows Forms form does not have the event Unload, like VB6. What one acts like?
2
4280
muto222
by: muto222 | last post by:
How can i add a mobile payment intergratation into php mysql website.
3
3289
bsmnconsultancy
by: bsmnconsultancy | last post by:
In today's digital era, a well-designed website is crucial for businesses looking to succeed. Whether you're a small business owner or a large corporation in Toronto, having a strong online presence can significantly impact your brand's success. BSMN Consultancy, a leader in Website Development in Toronto offers valuable insights into creating effective websites that not only look great but also perform exceptionally well. In this comprehensive...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.