macos - 連絡先グループからのユーザーの削除 (Mac アドレス帳)

Question

これは、stackoverflow での最初の投稿です。連絡先 (Mac アドレス ブック) で確立されたグループ (スマート グループではない) から人々を削除するための Applescript を取得しようと何週間も費やしました。スクリプトは数人を削除し、エラーを発行します。エラーが発生した後にスクリプトを再実行すると、グループからさらに数人が削除され、同じエラーが再度発生します。最終的に全員がグループから削除されるまで、これを続けることができます。エラーが発行された後にスクリプトを再実行すると、エラーが発行される理由がわかりません。エラーが再度発行される前に、さらに数人が削除されます。- 繰り返しになりますが、最終的にすべての人がグループから削除されるまで、スクリプトを再実行し続けることができます。これは、連絡先レコードが破損していないことを示しています。

SAVE コマンドを移動しようとしましたが、役に立ちませんでした。連絡先を削除するグループには「家族」というラベルが付いています。

発行されたエラーは... エラー「連絡先にエラーが発生しました: グループ \"Family\" を取得できません。」グループ「家族」からの番号-1728

tell application "Contacts"
    set group_list to name of every group

    repeat with anItem in group_list
        set AppleScript's text item delimiters to ""
        repeat 1 times
            if first item of anItem is not "$" then exit repeat

            set AppleScript's text item delimiters to "$"
            set gruppe to text item 2 of anItem
            if group gruppe exists then

                --remove every person from group
                repeat with person_to_remove in every person in group gruppe
                    set firstName to first name of every person in group gruppe
                    set group_count to count every person in group gruppe
                    remove person_to_remove from group gruppe
                    save
                end repeat

            end if

        end repeat

    end repeat
    save
    return "Done"
end tell