Search in Array and Copy the Data

[Duff360]

Hello,

I will try to be as clear as possible

I'm using _IETableGetCollection to get a table from IE to an Array.

I would like to know how to search a word in the array and copy the data in the same row.

Please see the uploaded image. In this array, I would like to search for the word "Australian dollar" and copy the data in the column 4 (1.0121) to my clipboard. And I would like to do it for a coupe of country. For each country I only want the data in the column 4.

Thanks you in advance,

Félix

 

Edited May 15, 2017 by Duff360

[benners]

Have a look in the help file for _ArraySearch

[Duff360]

I already did, but I still don't know how to do it.

I'm not really good with AutoIT...

[JLogan3o13]

@Duff360 what exactly is confusing you? You already have the code to pull the data from IE, per your first post (it would help if you posted your code, rather than asking us to guess). And _ArraySearch has a 2 very simple examples, so what exactly is not working for you?

Edited May 15, 2017 by JLogan3o13

[Duff360]

I'm able to find the expression "Australian dollar", but how can I copy the data from column 4?
It's probably easy, but I really don't know!

Local $sSearch = "Australian dollar"
Local $sColumn = "0"
$sColumn = Int($sColumn)
Local $iIndex = _ArraySearch($aTableData, $sSearch, 0, 0, 0, 1, 1, $sColumn)
If @error Then
    MsgBox($MB_SYSTEMMODAL, "Not Found", '"' & $sSearch & '" was not found on column ' & $sColumn & '.')
Else
    MsgBox($MB_SYSTEMMODAL, "Found", '"' & $sSearch & '" was found in the array at position ' & $iIndex & ' on column ' & $sColumn & '.')
EndIf

 

[benners]

small example

#include <Array.au3>

Local $as_Array[2][5] = _
        [['Currency', '2017-01', '2017-02', '2017-03', '2017-04'], _
        ['Australian dollar', '0.9854', '1.0045', '1.0204', '1.0121']]

Local $i_Index = _ArraySearch($as_Array, 'Australian dollar')

If Not @error Then
    MsgBox(0, '', $as_Array[$i_Index][4])
    ClipPut($as_Array[$i_Index][4])
Else
    MsgBox(0,'Not found', 'Search string not found')
EndIf

 

Edited May 15, 2017 by benners
typo

[Duff360]

Thank you very much!
This is my final script!

Local $oTableCollection = _IETableGetCollection($oIE)
For $oAll In $oTableCollection
    $aTableData = _IETableWriteToArray($oAll, True)
_ArrayDisplay($aTableData)
Local $sSearch = "Australian dollar"
Local $iIndex = _ArraySearch($aTableData, $sSearch, 0, 0, 0, 1, 1, 0)
Next
ClipPut($aTableData[$iIndex][4])