質問: access エクセルシート名変更 お世話になります。 windowsxpでaccess2002を使用しているのですが、accessvbaを使い特定のエクセルシートのシート名を変更したいと考えているのですが、いろいろ方法を検索しているのですが、そのような事例を発見する事ができませんでした。 引き続き調べて行きますが、良い方法がありましたら、ご教授いただけないでしょうか。 宜しくお願いします。
回答: excelがインストールされている環境なら createobjectやnewでexcel.applicationオブジェクトを作成して その上で bookを読み込み worksheetの名前を変更すればいいのでは sub macro1() dim oxl as object dim owb as object dim osh as object] set oxl = createobject("excel.application") set owb = oxl.workbooks.open("ブックのファイルパス") set osh = owb.worksheeets("シート名") osh.name = "変更後のシート名" owb.save owb.close oxl.quit set osh = nothing set owb = nothing set oxl = nothing end sub といった具合でしょう