Home > Software engineering >  Ask the Find function
Ask the Find function

Time:10-14

Set xlApp=CreateObject (" Excel. Application ") 'the code from the source table into memory, again from inside the access number, don't show, can speed up
XlApp. Workbooks. Open sDir + FilesArray (I)
SWorker2=""
On the Error Resume Next
'With Worksheets (1). The Range (" a1: au200 ")
With xlApp. Workbooks (FilesArray (I)). The Worksheets (1). The Range (" a1: au200 ")
The Set c=. Find (" paid-in amount ")

,,,
End with
Programs are executed in sequence code above: open the specific directory for a couple of spreadsheets and then within the table lookup "paid-in amount" cell (position is not fixed) (used to locate the other cell)
Why the find results for nothing? Sometimes not
Shows that the program has been used very well, after the number 13 is not normal

CodePudding user response:

Debug, see which file is nothing, and then manually open and see...

CodePudding user response:

(" paid-in amount ")
In some file does not exist, the cell is changed? Check all the documents

CodePudding user response:

Add a if to judge?

CodePudding user response:

Track whether to take a look at (" paid-in amount ") are beyond the scope of your search, so I didn't find it
  •  Tags:  
  • VBA
  • Related