Мне нужна помощь в объединении нескольких листов Excel в один новый лист с вертикальной укладкой с помощью AppleScript - PullRequest
0 голосов
/ 31 января 2020

Я довольно ржавый на AppleScript, но я собрал некоторый код вместе, и мне нужна помощь, чтобы закончить его. Я получаю сообщение об ошибке при попытке вставить данные второго листа ниже первого на новой странице.

Желаемый результат: у меня есть лист Excel с 3 листами и переменным количеством данных на каждом листе. Я хочу создать новую рабочую книгу и скопировать данные из листа А в новую рабочую книгу. Затем я хочу go вернуться к другой книге, листу B, и скопировать эти данные. Я хочу вставить этот диапазон в следующую свободную ячейку под данными из листа A. Итак, в конце я скажу столбцы с A по F из трех разных листов в одном, уложенном вертикально.

Вот код, который у меня есть. В настоящее время я нахожусь в тупике при попытке скопировать данные со второго листа. Строка set dst to range "$A:$" & rowCountCon of sheet 1 of workbook wbCON

tell application "Microsoft Excel"
    activate


    set ogWorkBookName to name of active workbook as string

    set wbREF to ((text 1 thru -6 of ogWorkBookName) & "_Refrence.xlsx") as string
    set destinationPath to (choose folder with prompt "Where would you like to save the refrence file?") as string
    set destinationPath to (path to desktop as text) & wbREF
    save active workbook in destinationPath

    set ogWorkBookName to name of active workbook as string


    set wbCON to make new workbook
    set wbCON to ((text 1 thru -14 of ogWorkBookName) & "Concatentaion.xlsx") as string
    set destinationPath to (path to desktop as text) & wbCON
    save active workbook in destinationPath

    delay 2

    activate object workbook wbREF
    activate object worksheet "WOMENS"
    set src to range "$B:$F" of worksheet "WOMENS" of workbook wbREF
    activate object workbook wbCON
    set dst to range "$A:$D" of sheet 1 of workbook wbCON
    copy range src destination dst

    activate object workbook wbREF
    activate object worksheet "WOMENS"
    set src to range "$A:$A" of worksheet "WOMENS" of workbook wbREF
    activate object workbook wbCON
    set dst to range "$F:$F" of sheet 1 of workbook wbCON
    copy range src destination dst

    activate object workbook wbCON
    tell active sheet
        tell used range
            set rowCC to count of row
            set rowCountCon to rowCC + 1
        end tell
    end tell

    activate object workbook wbREF
    activate object worksheet "MENS"
    set src to range "$B:$F" of worksheet "MENS" of workbook wbREF
    activate object workbook wbCON
    set dst to range "$A:$" & rowCountCon of sheet 1 of workbook wbCON
    copy range src destination dst

    activate object workbook wbREF
    activate object worksheet "MENS"
    set src to range "$A:$A" of worksheet "MENS" of workbook wbREF
    activate object workbook wbCON
    set dst to range "$F:$" & rowCountCon of sheet 1 of workbook wbCON
    copy range src destination dst

end tell

Моя спецификация c ошибка читается следующим образом.

ошибка "Microsoft Excel получил ошибку: объект, к которому вы пытаетесь обратиться, не существует "число -1728 из диапазона" $ A: $ "

Любая помощь будет принята с благодарностью. Спасибо!

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...