| |
私はこんな方法でやってます。
Dim i As Long
Dim strTableName As String
Dim strName As String
strName = Forms!F_メインメニュー1!txtテーブル名
For i = 0 To CurrentData.AllTables.Count - 1
strTableName = CurrentData.AllTables(i).Name
If strName = strTableName Then
DoCmd.DeleteObject acTable, strTableName
Exit For
End If
Next i
気になることがあります。間違っていたらごめんなさい。
何度も、消したり書いたりしました。
ここの掲示板は、管理人さんのご好意（趣旨）でマルチポストは
禁止となっておりませんので、マルチポストはしても良いことに
なっていますので問題はありませんが、向こうは問題がありそう
です。
この掲示板もマルチポストは全てＯＫではなく条件があります。
この掲示板の上の方に「マルチポストに関して、主宰者の意見を
まとめました」の横の「ここ」をクリックして、議論された内容
を読んでおいてください。
|
|
かろちん
- 05/1/19(水) 21:31 -
