strSQL = "DELETE * FROM t_Test" & i DoCmd.RunSQL strSQL
strSQL = "UPDATE t_Test" & i & " set myNo = " & i '"_set スペースに注意 DoCmd.RunSQL strSQL
下から選んでください: