Question about Computers & Internet
I am facing an error while exporting more than 65000 activities into Excel 2010, code is SIF-3553-7
Posted by Anonymous on
a 6ya expert can help you resolve that issue over the phone in a minute or two.
Best thing about this new service is that you are never placed on hold and get to talk to real repairmen in the US.
New users get to try the service completely Free afterwhich it costs $6 per call and covers almost anything you can think of (from cars to computers, handyman, and even drones).
click here to download the app (for users in the US for now) and get all the help you need.
Posted on Jan 02, 2017
I did not write this but look towards the end of the code and it will give you an idea on how to do it
Sub ExportToExcel(strOutputFile As String, Optional boolSuppressMessages As Boolean = False)
Dim strTemplateFile As String
Dim fso As Scripting.FileSystemObject
Dim cnn As ADODB.Connection
Dim rstTarget As ADODB.Recordset
Dim rstCustomers As ADODB.Recordset
Dim rstServiceReps As ADODB.Recordset
On Error GoTo ErrorHandler: On Error GoTo 0
Set fso = New Scripting.FileSystemObject
' Get template file path
strTemplateFile = CurrentProject.path & "\CompaniesEmployeesList.xlt"
' Copy template to the target
fso.CopyFile strTemplateFile, strOutputFile, False
' Open a connection to the workbook
Set cnn = New ADODB.Connection
cnn.Provider = "Microsoft.Jet.OLEDB.4.0"
cnn.ConnectionString = "Data Source=" & strOutputFile & ";" & _
"Extended Properties=""Excel 8.0"""
cnn.Mode = adModeReadWrite
' Open the target recordset (the Excel sheet)
Set rstTarget = New ADODB.Recordset
rstTarget.Open "SELECT [ID], [Name], [City] " & _
"FROM [Sheet1$]", cnn, adOpenDynamic, adLockOptimistic
' Open Customer data recodset
Set rstCustomers = New ADODB.Recordset
rstCustomers.Open "SELECT CompanyID, CompanyName, City " & _
"FROM Customers " & _
"WHERE City = 'Madrid' " & _
"ORDER BY CompanyName", CurrentProject.Connection
' Open Service Rep data recodset
Set rstServiceReps = New ADODB.Recordset
rstServiceReps.Open "SELECT EmployeeID, [LastName] & "", "" & [FirstName] AS Name, City " & _
"FROM Employees " & _
"WHERE City = 'Madrid' " & _
"ORDER BY [LastName]", CurrentProject.Connection
' Loop through Customers result set and copy to target
Do While Not rstCustomers.EOF
rstTarget![ID] = rstCustomers!CompanyID
rstTarget![Name] = rstCustomers!CompanyName
rstTarget![City] = rstCustomers!City
' Insert blank line between result sets.
rstTarget![ID] = ""
rstTarget![Name] = ""
rstTarget![City] = ""
' Loop through Service Reps result set and copy to target
Do While Not rstServiceReps.EOF
rstTarget![ID] = rstServiceReps!EmployeeID
rstTarget![Name] = rstServiceReps!Name
rstTarget![City] = rstServiceReps!City
If Not boolSuppressMessages Then
MsgBox "Workbook Created", vbInformation + vbOKOnly, "ExcelExport"
On Error Resume Next
Set rstTarget = Nothing
Set cnn = Nothing
Set rstCustomers = Nothing
Set rstServiceReps = Nothing
Eval "MsgBox(""Error " & Err.Number & "@" & Err.Description & "@"")"
On Error Resume Next
If Not cnn Is Nothing Then
Posted on Jan 06, 2008
I suggest that you should you Office 2003 much better. office 2007 has a very hard time to use, even if its user friendly. but i dont waste time just to configure such DELICATE Problems like office 2007. if theres any problem just contact me sir/mam. thanks!
Posted on Mar 28, 2008
pLEASE DESCRIBE YOUR PROBLEM CORRECTLY.tHE 05 CODE REFER TO FUSING UNIT.Check or change the fuser unit components,clean the thermofuse and thermistors.
Posted on May 22, 2010
If you need a product-key, then go to any computer-store and purchase a product-key -- it comes on something that looks like a credit-card. Be sure to ask for "student" and/or "academic" pricing.
Posted on Jul 17, 2010
Tips for a great answer:
Apr 22, 2014 | Intuit QuickBooks Premier Industry...
Feb 17, 2014 | Intuit QuickBooks Pro Edition 2009 Full...
Mar 03, 2011 | Adobe Photoshop CS2 for PC
The default Excel
file format. Cannot store VBA macro code or Microsoft Excel 4.0 macro sheets
(.xlm files in Excel 4.0).
Uses the same basic
XML format as the Excel Workbook, but can store VBA macro code. Users saving
an Excel workbook that has VBA code or Excel 4.0 macro sheets (.xlm files in
Excel 4.0) are prompted to use this file format.
The default file
format for an Excel template. Cannot store VBA macro code or Excel 4.0 macro
sheets (.xlm files in Excel 4.0).
Can contain a
VBAProject part or Excel 4.0 macro sheets (.xlm files in Excel 4.0).
Workbooks created from this template inherit the VBAProject part or Excel 4.0
macro sheets that exist in the template.
program that runs additional code. Excel add-ins use the Open XML file format
to store data, and they support using VBA projects and Excel 4.0 macro
Feb 21, 2011 | Computers & Internet
Sep 08, 2010 | Primavera SureTrak Project Manager 3.0 for...
Jun 07, 2010 | Primavera SureTrak Project Manager 3.0 for...
Jul 10, 2009 | Computers & Internet
91 people viewed this question
Usually answered in minutes!