คัดลอกจาก excel ไปยัง URL

-1

ฉันกำลังทำภาคแรก ฉันต้องการคัดลอกข้อความสั้น ๆ (จากเว็บไซต์) จาก excel ไปยังเครื่องมือทดสอบความเร็วของ Pingdom ในระยะยาวฉันต้องการให้ทำด้วยข้อความที่แตกต่างกันมากมาย - แต่ก่อนอื่นฉันต้องการเริ่มด้วยหนึ่ง

ฉันจัดการเพื่อเปิด Excel แล้วเอกสาร แต่ฉันต้องคัดลอกตัวอย่างฟิลด์ B1 ฉันจัดการ 'goto' B1 แต่แล้วฉันต้องคัดลอกและฉันไม่สามารถหาวิธี

สิ่งต่อไปคือการเปิดใช้งาน Chrome และจากนั้น tools.pingdom.com - ฉันสามารถทำได้ แต่ฉันจะวางค่าของ B1 ลงในฟิลด์ใน Pingdom ได้อย่างไร

ฉันหวังว่าบางคนสามารถช่วยฉันได้ หากยังไม่สามารถอธิบายได้ดีพอให้ฉันรู้

ที่ดีที่สุด โซเรน

applescript ms-office

— Soren
แหล่งที่มา

กรุณาช่วยอธิบายสิ่งที่คุณกำลังทำอยู่ได้ไหม เป็นการยากที่จะเข้าใจในสิ่งที่คุณหมายถึง

— iProgram

ยินดีต้อนรับสู่ถามที่แตกต่างกัน ที่คุณเขียน I want to copy a short text (that's a website).. เมื่อคุณเขียนเว็บไซต์คุณหมายถึง URL (เช่น https://apple.stackexchange.com )?

— jaume

ฉันไม่มี Microsoft excel ดังนั้นฉันจึงไม่สามารถช่วยในการตั้งค่าตัวแปรใน AppleScript ด้วยข้อมูลจาก Field B1 รหัสต่อไปนี้อาจช่วยคุณได้นิดหน่อยและทำให้คุณอยู่ในแนวทางที่ถูกต้อง

property theURL : "https://tools.pingdom.com/"
-- change the URL in the following variable to the URL from field B1 from Excel
set urlFromExcel to "https://apple.stackexchange.com/questions/338936/copy-from-excel-to-url"

if application "Google Chrome" is not running then
    tell application "Google Chrome"
        activate
        repeat while not (exists of window 1)
            delay 0.1
        end repeat
        tell its window 1
            set URL of (make new tab) to theURL
        end tell
    end tell
else if application "Google Chrome" is running then
    tell application "Google Chrome"
        if not (exists of (tabs of window 1 whose URL contains "pingdom")) then
            tell its window 1
                set URL of (make new tab) to theURL
            end tell
        end if
    end tell
end if

tell application "Google Chrome" to tell active tab of window 1
    repeat while loading is true
        delay 0.1
    end repeat
end tell

inputByID("urlInput", urlFromExcel)

to inputByID(theId, theValue)
    tell application "Google Chrome" to (tabs of window 1 whose URL contains "pingdom")
    set pingdomTabs to item 1 of the result
    tell application "Google Chrome"
        execute pingdomTabs javascript "document.getElementById('" & theId & "').value ='" & theValue & "';"
    end tell
end inputByID

— wch1zpink
แหล่งที่มา