Particular Data Should Transfer From Datagrid 6.0 Control To An Excel Sheet
particular data should transfer from datagrid 6.0 control to an Excel sheet ...?
View Complete Forum Thread with Replies
See Related Forum Messages: Follow the Links Below to View Complete Thread
Datagrid Control, Enter Data Like A Excel Sheet
Hello
I have implemented a datagrid which is connected to a database. I want the user to be able to press the tab key to be able update the cells in the grid, and also be able to select certain cells with the mouse and update them as well.
It is possible to have some code on how to do this.
Many thanks in advance
Steve
Problems Displaying Data From An Excel Sheet In A Datagrid
Does anybody know why when i pull data from an excel file using an ADO connection the only data that gets writen to the record set is the alphanumeric characters?
Let me explain i have a worksheet that gets imported into my application then is displayed to the user then the data gets writen to an Access database. In The excel sheet the colums that i am having problems with are formated in excel as text but when i create the recordset any cell that is not alphanummeric get a 'Null' value assigned to it. I have used differenet combinations of cursor types and LockTypes but nothing seeamed to work. In Access the 3 coulums in question are set up as 'text' data type.
The following is the code that creates the record set.
Dim strSheetName As String
Dim strOpen As String
strSheetName = cmbSheetName.Text
strOpen = "Select * from [" & strSheetName & "]"
'get the all the data of the selected sheet
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
rs.Open strOpen, cn, adOpenDynamic, adLockBatchOptimistic
Set dataViewExcell.DataSource = rs
frmGetExcell.dataViewExcell.Refresh
cmdAdd.Enabled = True
cmdCancel.Enabled = True
After the 'rs.Open' statment i loop through the record set and any cell value that was not an alphanumeric value was not put into the record set.
Date Transfer To Excel Sheet
Hi All!
I have a particularly perplexing problem trying to get a date from a textbox (within a userform) to transfer to an excel sheet in the same format.
Textbox1 is initialised and shows the date formatted as "dd/mm/yyyy".
What I need to happen is this date format transferred to a cell iin the same format.
What I continue to get is the cell showing the date as "mm/dd/yyyy"
I have tried forcing the cell formatting. This does not work. I have tried to do it programmatically, as below:
Code:
Dim InputDate As Double
InputDate = cdate(Textbox1.Value)
Cells(r,1) = Format(InputDate, "dd/mm/yy")
These have not yeilded the result I am looking for.
Please help. Will greatly appreciate any and all help.
P.S. I have also searched the forum for this topic, and it seems that there are not any useable solutions available.
Autonumber/Transfer Of Data To Other Sheet
i am trying to create a macro button that will take a new customer on the first page and transfer this new customer entry on to the existing customer page. i know i need to use a paste special to make the customer data to go from virtical to horizontal, but my main problem is that i need to give all my customers a autonumber with letters and numbers. This is my problem i need to create a macro that will keep createing my format of CID1101,CID1102,CID1103 and so on and so forth as a autonumber and also be able to send my customer data across from the new customer table to the existing customer table. i have attached my spreadsheet i have had to zip it to get the size down and also remove pictures.
PS. these are not real people in this spreadsheet they are fake details.
Thanks for reading and i hope u can help me out
JMack986
Problem Using An ADO Data Control And An ADO Datagrid In Excel.
Hi,
I'm trying to use an ADO Data Control and link a ADO DataGrid to it to be able to browse/update an Access DB Table. Normal in VB6.0 you setup the ADODC and then just assign the Datasource property of the DataGrid to be the ADODC and it works. In Excel there is no Datasource property in the properties window and when I try to do it through code int the Form Initialise event I get the following error 'Method or Data Member not Found'.
Does anybody have any ideas what I'm doing wrong or how you link a DataGrid to an ADODC in Excel?
Thanks,
Phil.
Transfer DataGrid To Excel[]
Hi,
I want to transfer Data from MySQL server to a excel file.
i used a datagrid to populate the whole data, now the problem is i can't write the whole data in the excel file...
using a MSHflexgrid prints only 2049 lines of data.
i have to write around 20000 lines of data in Excel Sheet.
_____________________________________________________________
Private Sub Command1_Click()
Call DataGrid_To_Excel(grdDataGrid, 300, 20)
'grdDataGrid.ApproxCount
End Sub
____________________________________________________________
Public Sub DataGrid_To_Excel(TheDataGrid As DataGrid, TheRows As Integer, TheCols As Integer, Optional GridStyle As Integer = 1, Optional WorkSheetName As String)
Dim objXL As New Excel.Application
Dim wbXL As New Excel.Workbook
Dim wsXL As New Excel.Worksheet
Dim intRow As Integer ' counter
Dim intCol As Integer ' counter
If Not IsObject(objXL) Then
MsgBox "You need Microsoft Excel to use this function", _
vbExclamation, "Print to Excel"
Exit Sub
End If
'On Error Resume Next is necessary because
'someone may pass more rows
'or columns than the datagrid has
'you can instead check for this,
'or rewrite the function so that
'it exports all non-fixed cells
'to Excel
On Error Resume Next
' open Excel
objXL.Visible = True
Set wbXL = objXL.Workbooks.Add
Set wsXL = objXL.ActiveSheet
' name the worksheet
With wsXL
If Not WorkSheetName = "" Then
.Name = WorkSheetName
End If
End With
' fill worksheet
For intRow = 0 To TheRows
TheDatagrid.Row = intRow
For intCol = 0 To TheCols
TheDatagrid.Col = intCol
wsXL.Cells(intRow, intCol).Value = TheDatagrid.Text
Next
Next
' format the look
For intCol = 1 To TheCols
wsXL.Columns(intCol).AutoFit
'wsXL.Columns(intCol).AutoFormat (1)
wsXL.Range("a1", Right(wsXL.Columns(TheCols).AddressLocal, _
1) & TheRows).AutoFormat GridStyle
Next
End Sub
_____________________________________________________________
using this code i can write 300 lines of data in excel. and the data gets repeated after row 208.
Any solution ?
Datagrid Transfer To Excel VB6 Bug?????
Hi all,
I've got a program that transfers information from my datagrid to excel. It works PERFECTLY for a database of less than 40 rows. BUT more than 40 gives a 6148 runtime error!?!?!?! I'm been looking at this thing all day! HELP!
Where there's an arrow it shows what VB deems as my error.
'get total number of fields
Dim total_columns As Integer 'counter for total number of columns
Dim total_rows As Integer 'counter for total number of rows
'get total number of columns
total_columns = MY_AdoRecSet.Fields.Count
'get total number of rows
total_rows = MY_AdoRecSet.RecordCount
'Go through the X and Y axes to enter the datagrid information into the
'excel worksheet. The loop goes through the column then the next row.
Dim current_row As Integer
Dim current_column As Integer
For current_row = 1 To total_rows Step 1
----> MY_grid.Row = current_row - 1 'select the row in the grid
For current_column = 1 To total_columns Step 1
MY_grid.Col = current_column - 1 'select the column in the grid
If action = PRINTER Then
MY_xl_worksheet.Cells(current_row + Yoffset + 1, _
current_column + Xoffset).Value = MY_grid.Text
Else
MY_xl_worksheet.Cells(current_row + Yoffset, _
current_column + Xoffset).Value = MY_grid.Text
End If
Next
Next
If action = PRINTER Then
Call print_setup(MY_xl_worksheet, MY_combobox)
'Print out the Information
MY_xl_worksheet.PrintOut
End If
If action = FILE Then
If IsMissing(path) Then
MsgBox "path name not defined"
End
Else
Call saveXLS(MY_xl_worksheet, path)
End If
End If
printgrid = 0
Exit Function
Datagrid To Excel Sheet
Is there a quick and easy way to transfer values from a
data grid to an excel worksheet?
How about from a flex grid to a worksheet?
Thanks,
rlb
How To Transfer Data In A Datagrid To Another Datagrid..?
Please help me in my project so that i can pass..
Im a freashman student in high school,
Im making a simple Computer Hardware Inventory system,
Datagrid1:
Item Description Serial Number Date Recorded
Mouse Optical SN-2007 03/27/2007
Datagrid2:
Item Description Serial Number Date Recorded
I want my data in datagrid1 will transfer to Datagrid2
please solve my problem..
youre help, is a big help to me!
Thank you in advance!! Godspeed!!
Copy Excel Sheet To A Form's Excel Control
I have an Excel workbook. In this workbook I have a VBA form which contains an Excel Spreadsheet control. I want to copy a sheet from the actual workbook to the workbook of this control in my form. I've searched the forums and learned how to copy, but it doesn't seem to cooperate with the control. Any other methods? Thanks.
Transfer Data From VB To Excel
Hello,
I'm trying to transfer some data from a VB form to an existing excel spreadsheet with text boxes, check boxes and option buttons on it. On the VB form, I have 5 text boxes and when I click on a button I want the information on these text boxes to be loaded on the spreadsheet's text boxes and then print the spreadsheet as a report.
I know how to open the excel application from vb then load my existing spreadsheet in memory but then I can't find a way to fill the text boxes of my spreadsheet.
Would somebody have a suggestion on this problem?
Chris.
Transfer Of Data From Vb/vb.net To Excel
Transfer of data from VB to excel
Does anyone has sample codes on how to:
1)transfer the inputs from a user form to an excel database(.xls) whenever a cmdAdd button is clicked on the form
2)The form will reappear again and waits for another sets of input whereby the add button will update again on the excel database...thanks!
Data Transfer From A List Box To Excel
Hi. I was wondering if anyone could help me with something which is probably quite simple but I can't seem to find on MSDN.
I am basically wanting to transfer data from a VB list box to a column in an Excel worksheet.
Thanks for any help you can give.
EXCEL Data Transfer Within A Network
EXCEL is running on both of two PC's within a network. Workbook ("Data") on PC1 and Workbook("DataLog") on PC2 are opened.
With Code in Worksheets ("Data"):
Range(Sheets(1).Cells(8, 4), Sheets(1).Cells(28, 12)).SpecialCells(xlCellTypeVisible).Copy _
Workbooks("DataLog").Sheets(2).Cells(1,1) .... I can easily copy data from one Workbook to another on the s a m e PC.
How do I have to modify the code to manage the same thing, but from one PC to the other?
??
Range(Sheets(1).Cells(8, 4), Sheets(1).Cells(28, 12)).SpecialCells(xlCellTypeVisible).Copy _
\Hnpc2C:ArchivDataLog ......Sheets(2).Cells(1, 1)
??
How To Transfer Data From Excel To Mysql?
Hi all. I got a huge list of data in excel(7000 records) . I want to transfer it to mysql database. Could any one show me how to do it using a fast and easy method.Thanks
Transfer Of Data From Other Forms To Excel...
how come i cannot transfer the values from other (previous forms) to excel spreadsheet..but i can transfer the values from current form to it....
appXL.ActiveSheet.Cells(intClickCount, 4).Value = txtDate.Text
where txtDate.Text is the values from the previous forms...
(error: object require)
however the input values from the Current form eg:
appXL.ActiveSheet.Cells(intClickCount, 9).Value = txtUnitCost.Text
where txtUnitCost.Text is the value from the current forms can be display..?
DATA TRANSFER FROM SQL SERVER TO EXCEL
Hi!
I have a table on SQL SERVER, and it has been connected to my vb application already.I display my data on DataGrid to users.Users can see data on datagrid using query.I want to export these data to EXCEL.How can I accomplish this job?
Thanks in advice.
Speed Up Transfer Of Data To Excel
How can I speed up the transfer of data from a text file to Excel? Here is the code I have so far but it is extremly slow. Is it because I am adding record by record? I would use ADO to do this but the text file has well over 150,000 lines. Any help would be appreciated. Thanks.
Set objExcel = New Excel.Application
Set objWorkbook = objExcel.Workbooks.Add
ctr = 2
x = 1
Call AddExcelHeader
For i = 0 To UBound(sFileNames)
Open FilePath & sFileNames(i) For Input As #1
Do While Not EOF(1)
Line Input #1, InputData
ctr = ctr + 1
If ctr Mod 133 = 0 Then
lblStatus.Caption = CStr(ctr) & " records exported!"
DoEvents
End If
If ctr Mod 65535 = 0 Then
' Formats the Excel spreadsheet data
objWorkbook.Worksheets(x).Range("A:E").Columns.AutoFit
objWorkbook.Worksheets(x).Range("A1:E1").Font.FontStyle = "Bold"
objWorkbook.Worksheets(x).Range("A1:E1").Rows.HorizontalAlignment = xlCenter
x = x + 1
ctr = 2
End If
Call AddExcelHeader
objWorkbook.Worksheets(x).Cells(ctr, 1) = Trim$(Mid$(InputData, 1, 10))
objWorkbook.Worksheets(x).Cells(ctr, 2) = Trim$(Mid$(InputData, 12, 10))
objWorkbook.Worksheets(x).Cells(ctr, 3) = "'" & Trim$(Mid$(InputData, 23, 5))
objWorkbook.Worksheets(x).Cells(ctr, 4) = Trim$(Mid$(InputData, 29, 8))
objWorkbook.Worksheets(x).Cells(ctr, 5) = Trim$(Mid$(InputData, 38, 8))
Loop
Close #1
Next
Swi
Outlook To Excel Data Transfer
Hi,
I have developed a number of custom forms in Outlook and found that I can see the data (custom fields) that I need when I save the Outlook Template as a text file. The next trick is to automate the save as text process (using the subject line as the filename) and then open the text file and transpose the list into a table in Excel.
As a newbie to the programming world I was hoping for some help from one of you good folk from VBCity.
Look forward to your reply,
Thanks
Data Transfer Between MS Access And Excel
Hi all!
I wrote small article on the subject, think that may be of use for somebody:
http://www.zmey.1977.ru/Access_To_Excel.htm
I also gladly will discuss it here...
Best regards,
Zmey2
Data Transfer Into Pocket Excel
I have a small program in EVB that sends a request to a device, which in turn sends back a simple string of data. I am wondering if anyone can give me ANY advice on how I might be able to import the data into Microsoft Pocket Excel. Once again, ANY suggestions or ideas would be greatly appreciated!
Thank you!
Data From An Excel Sheet To Vb
Hi! I 've made an excel sheet where some functions are calculated and I 'd like to know if there is a way to connect this data to a vb6 program that I also made. This means taking the relults from the sheet and using them in vb6 in order to draw some lines.
If it's too general and need more info please ask!
I 'm really really desperate ...... and I 've ran out of time!!!!
thanx in advance!
Getting Data From An Excel Sheet
I haven't used VB 6 to open an excel sheet before. What I am looking for is some sample code that I can use to guide me through my code. I have already found some info for the Projects > References > Microsoft Excel 11.0 object library.
Here is what I am trying to do:
Open an excel spreadsheet (Vol1.xls)
Populate labels with cell data
Also, on a side note, should I populate an array with the cell data, or read the spreadsheet each time I need cell data?
Thanks for helping!
Data In To 2 Excel Sheet?
Hi all,
Im using an app someone send me on this forum.
Basically, it takes data from a table in access and moves it to a sheet in excel using VB.
I have two tables, I can take data from both tables: but how can you put them in two separate excel sheets?
Plz see attached tool
Thanks,
Danny
Added RESOLVED to thread title and green resolved checkmark - Hack
Last Row/col In Excel Sheet Containing Data
Hi
If anyone guide me to do the following, I will be obliged. I am using VB.NET.
How to find the last row or column number of excel sheet containing data using the VBA.
Dim Dim loXLAPP As Excel.Application
Dim loXLSheet As Excel.Worksheet
loXLAPP = New Excel.Application()
If Dir(txtImpFileName.Text) <> "" Then
loXLAPP.Workbooks.Open(txtImpFileName.Text)
Else
MsgBox("File '" & txtImpFileName.Text & " 'not found, QUITING ...", MsgBoxStyle.Information)
Return
End If
loXLSheet = loXLAPP.Sheets(1)
For i = 2 To 20 'loXLSheet.Rows.Count gives 65000 rows
For Each j In lcCols 'loXLSheet.Rows.Count gives 256 columns
s = loXLSheet.Cells(i, j).Value
If Not s Is Nothing Then
...........
End If
Next
Next
loXLAPP.Workbooks.Close()
loXLSheet = Nothing
loXLAPP = Nothing
Muhammad Idrees
email me
Excel Sheet Control
HI,
I have a form and I have put an Excel Sheet control on the form. I have extracted some data from a database and I want to put the data onto the Excel control. The sheet is called "sheet1" which is the default. I am not sure how to access the "sheet1". The control is already on the form so what is the syntax to add the data to the sheet? Do I have to do all this?
Dim ExcelApp as Object
Dim ExcelWkb as Object
Dim ExcelSht as Object
Set ExcelApp = New Excel.Application
Set ExcelWkb = ExcelApp.Workbooks.Open("C:Documents and SettingscedrossDesktopUniExampleEccNet_Data.xls")
Set ExcelSht = ExcelWkb.Sheets(1)
Any help would be appreciated. Thanks
babalas
Transfer Word Formfield Data To Excel
This sounds as though it would be a simple task. I am referencing a text form field (as a bookmark named ID) in a "protected" word template and would just like to get the value out of the form field and place it in an existing Excel worksheet. I have a command button that will take the desired info from the textfields and place them as an excel record. There is no .value or anything that I can find to work. The other problem is that if I try and use .Text or some other ending, an error appears telling me that it can't get the information from a "protected" document. The template must be protected however so that the employees don't go screwing it all up. The bit of code I'm troubled with is as follows:
With xlWB.Worksheets(1)
Do
If IsEmpty(.Cells(i, 1)) Then
Chkcell = True
'go to desired bookmark
ID = Me.Bookmarks("ID").Range.??????????? (why no .value?)
'ID = Me.FormFields("ID").Range (same problem)
Else: i = i + 1
End If
Loop Until Chkcell = True
End With
Thanks for any help you guys can give me.
Problem:transfer Access Data To Excel
Private Sub Command1_Click()
Dim oXLApp As Excel.Application
Dim oXLBook As Excel.Workbook
Dim oXLSheet As Excel.Worksheet
Set oXLApp = New Excel.Application
Set oXLBook = oXLApp.Workbooks.Add
Set oXLSheet = oXLBook.Worksheets(1)
oXLSheet.UsedRange.Clear
oXLSheet.Range("A1").CopyFromRecordset Data1.Recordset
oXLSheet.Paste
oXLApp.Visible = True
Set oXLSheet = Nothing
Set oXLBook = Nothing
Set oXLApp = Nothing
End Sub
when i debug this code, there is no error but at the same time there is no data in excel worksheet. i just want to transfer access datas to excel. i cannot understand why i can't see access datas in excel.
thanks...
Transfer Data From Table In ACCESS TO EXCEL
Hi Everybody
Would really apreciate if you could find the bug in my code for transferring data in a table in access to excel sheet.
Code:
Sub ExportData()
Dim objAccess As Access.Application
Dim strname As String
strname = "mysheet"
Set objAccess = New Access.Application
With objAccess
.OpenCurrentDatabase "H: est.mdb"
.docmd.transferspreadsheet acExport, acspreadsheettypeexcel9, _
strname, "H:Chap15.xls", -1, "import!A1:C4"
.CloseCurrentDatabase
.Quit
End With
Set objAccess = Nothing
End Sub
On executing this code i am getting the error
"Run Time error 3011
The microsoft jet database engine could not find the object".Make sure the object exists and path name is correct."
I have double checked the names and path name and the same code works fin when i import data to access from excel with just the acExport changed to acImport.
Please help me out.Thanks.
kvs
Crystal Report 7.0 Data Transfer To Excel
hello
im trying to export crystal report 7.0 data to EXCEL but its not transfering properly in same format that report is showing...data in the column is getting shifted to another column...why its happeing...i tried adding TABs also in the crystal report...i hv vertical lines in the report..
is there any solutions..
Problem:transfer Access Data To Excel
Private Sub Command1_Click()
Dim oXLApp As Excel.Application
Dim oXLBook As Excel.Workbook
Dim oXLSheet As Excel.Worksheet
Set oXLApp = New Excel.Application
Set oXLBook = oXLApp.Workbooks.Add
Set oXLSheet = oXLBook.Worksheets(1)
oXLSheet.UsedRange.Clear
oXLSheet.Range("A1").CopyFromRecordset Data1.Recordset
oXLSheet.Paste
oXLApp.Visible = True
Set oXLSheet = Nothing
Set oXLBook = Nothing
Set oXLApp = Nothing
End Sub
when i debug this code, there is no error but at the same time there is no data in excel worksheet. i just want to transfer access datas to excel. i cannot understand why i can't see access datas in excel.
thanks...
*RESOLVED*simple Data Transfer From Excel To VB
Hi,
I am trying to copy one specific cell of data from an excel file into VB. I have found some code previously posted and have tried running it to see how it works. I am receiving the following error message "User Defined Type Not Defined" with regards to "Dim xlApp As Excel.Application", "Dim xlApp As Excel.Workbook" and "Dim xlApp As Excel.Worksheet".
Can someone please help me with this?
Thanks,
burzrk
CODE (previously posted):
------------------------------------------------------------------------
Dim iRow As Integer
Dim iCol As Integer
Dim iLastRow As Integer
Dim iLastCol As Integer
Dim sCellAdd As String
Dim xlApp As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
' set reference to Application object
Set xlApp = CreateObject("Excel.Application")
' set reference to Workbook object
Set xlBook = xlApp.Workbooks.Open("C:FileName.xls")
' set the reference to Worksheet object
Set xlSheet = xlBook.ActiveSheet
With xlSheet
iLastCol = .Cells.SpecialCells(xlCellTypeLastCell).Column
iLastRow = .Cells.SpecialCells(xlCellTypeLastCell).Row
End With
For iRow = 1 To iLastRow
For iCol = 1 To iLastCol
Debug.Print xlApp.Cells(iRow, iCol)
Next iCol
Next iRow
Edited by - burzrk on 7/11/2005 7:33:09 PM
Probelm Transfer Data To Excel Format
I got a problem to download data from SQL to excel, after 3 minutes ago Windows message-Component Request Pending. popup said that-- The acttion cannot be completed because of the other application is busy . choose "Switch to" to activeate the busy ......
Can everyone help me on this problem. my code ample like this
Private Sub CmdSave_Click()
On Error Resume Next
Dim xl As Excel.Application
Dim fc As Integer
Dim m As String
Dim n As Integer
Dim rsv As String * 60
Dim c As Integer
Dim dgc As Long
Dim dgr As Long
Dim txt As String * 60
Dim wb As Workbook
m = MsgBox("Are you sure you want to save the records into excel format?", vbOKCancel, "Save to File")
If m = vbOK Then
fc = rs1.Fields.Count
Set xl = New Excel.Application
Set wb = xl.Workbooks.Add
xl.DisplayAlerts = False
CmdSave.Enabled = False
Cmd_run.Enabled = False
xl.Visible = False
wb.SaveAs ("C:windowsdesktop123.xls"), xlNormal, "", "", False, False
wb.Worksheets("sheet2").Delete
wb.Worksheets("sheet3").Delete
--Fields Name
For i = 1 To fc
txt = rs1(i - 1).Name
xl.Cells(1, i).Value = txt
Next
ProgressBar1.Visible = True
Do While Not rs1.EOF
n = n + 1
c = rs1.AbsolutePosition / rs1.RecordCount * 100 ''
Label5.Caption = c & "%"
Label5.FontSize = 6
ProgressBar1.Value = c
Label6.Caption = "Progressing.......!"
Label6.FontSize = 6
Label6.FontItalic = True
Me.Refresh
If c = 100 Then
Label6.Caption = "Completed!"
End If
For i = 1 To fc
rsv = rs1(i - 1).Value
xl.Cells(n + 1, i).Value = rsv
Next
rs1.MoveNext
Loop
CmdSave.Enabled = True
Cmd_run.Enabled = True
MsgBox "Progress completed!", vbInformation, "Transfer File"
Label6.Caption = ""
Label5.Caption = ""
ProgressBar1.Visible = False
xl.Visible = True
End If
End Sub
How To Transfer Data From Access To An Excel File
Hi All,
This is my first post at this forum (friend recommended it).
I have recently started writing code for Access and Excel. My current project involves running a small database to store data and using an Excel spreadsheet to "Report" the data. Previously we used the spreadsheet alone saving multiple copies with each record in it. We want to keep using the spreadsheet as it has some complicated charts that I don't want to try and reproduce in Access.
I searched on the internet and found out how to use the ShellExecute API to open the correct file but now I need to transfer the data from the database to specific cells in the spreadsheet. What is the best way to do this?
Originally I tried to use variables and have the excel file reference the variables on opening but the spreadsheet could not "see"them. So now I wanted to write some code in the Access module that would enter the data into the cells in the Excel spreadsheet, as that way I can update the data in the spreadsheet if the user moves to a different record in the DB.
Thanks heaps
PS also is there a way to close the excel file from Access using VB, ie when the DB is closed?
Not Able To Transfer All Data From Excel To Access Database
Hello,
I am trying to transfer data from a excel spreadsheet to
a access database. The tranfer only works for half of the data
The excel sheet has aprox. 34000 records. When the tranfer has finished only 16000 records were tranfered.
I used DAO 3.51 object Library. When I used DAO 3.6 object Library all 34000 record were tranfered but I am unable to open
the access file.
Any help would be much appreciated.
Thanks
Karl
|
TRACKER
