INS support forum    


Welcome to the Integrated Notification System support forum.
Before entering a query/request please search the forum to see if someone else has asked the question before.
Please feel also free to respond to queries from other users if you have experienced the same type of problem and found a solution to it. 
Our support team will monitor this forum and endeavour to provide answers to the queries posted.
Please make sure to post your query to the right forum as there is a separate forum for each application provided by MAW Software.
Show messages for: Last 7 days Last 30 days All (Digest of all)

Back to the forum

On Friday , the 02.24.2006, Leonard wrote at 17:46:32 :

Reading text from a file with ActiveX

Hi,

This is the text file.

'ActiveX with excel.

Dim ex
Dim I
Dim ID

Set ex = CreateObject("Excel.Application")
ex.Workbooks.Open "C:\Documents and Settings\leonard\Desktop\Experiments\Find.xls"

For I = 2 To 5

If ex.ActiveSheet.Range("A" & I) = 14511 Then

ActiveSheet.Range("B15") = 10101

ID = ActiveSheet.Range("B15")

ActiveSheet.Range("A" & I) = 0 'After finding the number, the number that have been finf is setting back to 0

End If

If ActiveSheet.Range("A" & I) = 15000 Then

ActiveSheet.Range("B15") = 00000

ID = ActiveSheet.Range("B15")

End If

Next I

ex.ActiveWorkbook.Save

ex.Quit(ID)





Post reply:

Name:
E-Mail:
Subject:
Message:
SPAM code displayed
next to this:

CGIForum (C) Markus Triska

Home to