■以下のコードを部品化したものはこちらのリンクにあり。 サーバテーブルのデータをローカルテーブルへインポートする(部品） - ray88’s diary Sub データインポートテスト3() Dim CN As Object Dim CN2 As Object Dim RS As Object Dim RS2 As Object '----…

■呼び出し元プローシージャ Sub テーブル削除() 'MT_社員マスタのデータを全て削除 Call DeleteTableData("MT_社員マスタ") End Sub ■呼び出し先プロシージャ Sub DeleteTableData(strTableName As String) '----------------------------------------------…