Hi again. THANK YOU A LOT!!! I updated script as I need and understood something how it works. Here is the result, not it can be used for as many crypto stocks as I need, I can just add it in list variable in the beginning. Now everything is cool, thank you again! Here is last version:
-- change values between "" in the first three lines to match your setup
set exchanges to {"poloniex", "bittrex"}
repeat with exchange in exchanges
set mySheetName to "Prices"
set myTableName to exchange
set tgtCell to "B2"
set diary to "Diary"
set urlSite to "https://www.worldcoinindex.com/exchange/" & exchange
set theHtml to do shell script "curl -s " & quoted form of urlSite
set text item delimiters to {"<tbody>", "</tbody>"}
set tableContents to theHtml'stext item 2 # item 2 is the body of the price table
set text item delimiters to {"style=\"color:#000\">"} # site uses new h2 for each currency
set tableChunks to tableContents'stext items 2 thru -1
set pasteStr to ""
repeat with aChunk in tableChunks
set text item delimiters to "</td>"
set theSymbol to first word of aChunk's text item 1
set btcPrice to last word of aChunk's text item 2
set usdPrice to last word of aChunk's text item 4
set btcVolume to last word of aChunk's text item 3
set usdVolume to last word of aChunk's text item 5
set pasteStr to pasteStr & theSymbol & tab & btcPrice & tab & btcVolume & tab & usdPrice & tab & usdVolume & return
end repeat
set the clipboard topasteStr
tell application "Numbers"
tell front document
tell active sheet to set currSheet to its name
tell sheetmySheetName to tell tablemyTableName
activate
set selection range to rangetgtCell
delay 0.3
tell application "System Events" to keystroke "v" using {option down, shift down, command down}
tell application "System Events" to keystroke "a" using {shift down, command down} -- Deselect All
end tell
activate
set active sheet to sheetcurrSheet# go back to original location
end tell
end tell
end repeat