 |  |  |  |  |  |  |  |
Excel in VB 6
 |
How do I insert an Excel file into VB 6. I need to be able to view the file in a seperate form. I know the coding to change the forms is
And I read a previous thread before on these forums that gave me the coding to load it:
Could anyone please help me to find what the solution so the Excel spreadsheet may be displayed on the form?
Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text)
And I read a previous thread before on these forums that gave me the coding to load it:
Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text)
Could anyone please help me to find what the solution so the Excel spreadsheet may be displayed on the form?
Dim xlApp As Excel.Application
Dim wb As Workbook
Dim ws As Worksheet
Dim i As Integer
Dim stre As String
Set xlApp = New Excel.Application
Set wb = xlApp.Workbooks.Open("C:\Documents and Settings\c5098466\My Documents\Guru\Solution Tracker\Notefix Tracker1.xls")
Set ws = wb.Worksheets("Sheet1")
'Give your worksheet name
stre = ""
For i = 1 To 10
For j = 1 To 12
stre = stre & ws.cells(i, j).Value & vbTab
'Print (ws.cells(i, j).Value)
'Do whatever u want here
Next
stre = stre & vbCrLf
Next
wb.Close
Print stre
xlApp.Quit
Set ws = Nothing
Set wb = Nothing
Set xlApp = Nothing
here how can i specify the EOF in the for loops
Dim wb As Workbook
Dim ws As Worksheet
Dim i As Integer
Dim stre As String
Set xlApp = New Excel.Application
Set wb = xlApp.Workbooks.Open("C:\Documents and Settings\c5098466\My Documents\Guru\Solution Tracker\Notefix Tracker1.xls")
Set ws = wb.Worksheets("Sheet1")
'Give your worksheet name
stre = ""
For i = 1 To 10
For j = 1 To 12
stre = stre & ws.cells(i, j).Value & vbTab
'Print (ws.cells(i, j).Value)
'Do whatever u want here
Next
stre = stre & vbCrLf
Next
wb.Close
Print stre
xlApp.Quit
Set ws = Nothing
Set wb = Nothing
Set xlApp = Nothing
here how can i specify the EOF in the for loops
i have a problem can you help me? here`s my problem,can you help me how to make an inventory system..plzzzzz
•
•
Join Date: Nov 2006
Posts: 848
Reputation: 
Solved Threads: 120
Practically a Posting Shark
Hi Markx,
Post ur own thread.
ur problem may go unnoticed if u Post in other threads.
And what is the Kind/Nature of business u want to develop the inventory..?
Regards
Veena
Regards
Veena
Post ur own thread.
ur problem may go unnoticed if u Post in other threads.
And what is the Kind/Nature of business u want to develop the inventory..?
Regards
Veena
Regards
Veena
•
•
Join Date: Nov 2006
Posts: 848
Reputation:
Solved Threads: 120
Practically a Posting Shark
Hi, Guru,
u need to check if all the cell Values r blank continously and come out of the loop
Regards
Veena
u need to check if all the cell Values r blank continously and come out of the loop
Regards
Veena
hi veena..
i got how to go till the last used row..
i used
Dim ra As Excel.Range
Set rang = ws.UsedRange
' and then i used
ra.Rows.Count
ra.columns.count
that solved my purpose
i got how to go till the last used row..
i used
Dim ra As Excel.Range
Set rang = ws.UsedRange
' and then i used
ra.Rows.Count
ra.columns.count
that solved my purpose
|
Similar Threads
- Excel to Web in Real Time? (ASP)
- How to write files to an Excel application (Visual Basic 4 / 5 / 6)
- grabbing source from excel file (was: please, somebody help me!!!) (Visual Basic 4 / 5 / 6)
- Macros in Excel (Visual Basic 4 / 5 / 6)
- Visual C++ and Excel (C++)
Other Threads in the Visual Basic 4 / 5 / 6 Forum
- Previous Thread: can we create database through vb in sqlite
- Next Thread: What are the following used for and how do you use them?
| Thread Tools | Search this Thread |
You need to join our community in order to build your list of favorite forums. You can visit the forum index for a listing of all forums.
Related Forum Features
Latest Visual Basic 4 / 5 / 6 Posts
- Today's Posts
- Unanswered Threads
* 6 429 2007 access activex add age application basic beginner birth bmp calculator cd cells.find click client code college component connection connectionproblemusingvb6usingoledb copy creat ctrl+f data database datareport date delete dissertations dissertationthesis dissertationtopic edit error excel excelmacro file filename form hardware header iamthwee image inboxinvb internetfiledownload keypress label listbox listview liveperson login looping machine microsoft movingranges number objectinsert open oracle password prime program prompt range-objects readfile reading record refresh remotesqlserverdatabase report save search sendbyte sites sort sql sql2008 sqlserver subroutine tags textbox time urldownloadtofile vb vb6 vb6.0 vba visual visualbasic visualbasic6 web window windows
