Access は 共存 ではなく、Access2007 のみインストール されている状態でしょうか?
共存の場合、古いバージョンからインストールする必要があります。
今回であれば、Access2007をインストール後、Access2013 インストール
共存かつ、Access2007 と Access 2013 が 同じ bit なのであれば
Set appacc = CreatePObject("Access.Application.12")
の様にバージョン番号を指定してみてください。
ActiveXオブジェクトを操作する (CreateObject関数)
https://www.moug.net/tech/acvba/0060028.html
異なる Bit版の場合。どうだったかな、、すぐには思い出せません。。WEB検索してみてください。
それと、このコードは、Access2007 上の VBAにて実行されている認識で良いですよね。