No.1ベストアンサー
- 回答日時:
さすがにそのワイルドカードは無理。
こんな風では?
Sub てすと()
Dim DB As Database
Dim Tdf As DAO.TableDef
Dim Fld As DAO.Field
Dim i As Integer
Set DB = Application.CurrentDb
Set Tdf = DB.TableDefs("倉庫テーブル")
For i = Tdf.Fields.Count - 1 To 0 Step -1
If Tdf.Fields(i).Name Like "仙台*" Then
Debug.Print Tdf.Fields(i).Name
'Tdf.Fields.Delete Tdf.Fields(i).Name
End If
Next
Set Tdf = Nothing: Set DB = Nothing
End Sub
確認のためイミディエイトウィンドウに出力してますので
OKだったら下のコメントを外して実行してください。
※念のためバックアップを取ってからに。
回答ありがとうございます。
ご伝授の通り実行すると、”仙台*”フィールドが全て
削除出来ました。
大変助かりました。
ありがとうございます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- 避難所・仮設住宅 信用金庫 3 2023/01/17 20:16
- 運輸業・郵便業 ●(令和なのですが…) 今時、 (倉庫会社の在庫の)倉庫管理システムが、 “紙”(商品依頼書•注文書 2 2022/08/07 18:09
- 運輸業・郵便業 事故が起きた場合の責任について 6 2022/05/24 21:15
- 新幹線 小倉(福岡)・仙台(宮城)----所要時間 1 2022/11/20 19:53
- 運輸業・郵便業 倉庫バイトを考えているのですが、倉庫って空調完備していますか? 倉庫バイト未経験で分からないので教え 2 2022/08/03 19:20
- 会社・職場 倉庫に過剰に在庫抱えてしまっています。自分は倉庫にないように発注しているのですが、過剰に抱えてしまい 10 2023/06/08 21:35
- 求人情報・採用情報 派遣について これはあくまで仮定の話しにもなりますが 現在自動車部品メーカーの下請けの倉庫内のある場 4 2023/02/19 08:13
- コレクション パチスロのコイン1000枚って 何キロあるのですか? パチスロの台集めてたのですが、 かなり倉庫に7 1 2022/06/12 17:08
- その他(パソコン・スマホ・電化製品) 200~300Lくらいの冷蔵庫を2個自宅で使っています。ひとり暮らしです。一月に150kwhくらい電 1 2022/06/23 23:44
- iPhone(アイフォーン) iPhoneのセキュリティについて 5 2022/08/28 23:34
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
ACCESS DAO で不要なテーブルのフィールド(列)の削除
Visual Basic(VBA)
-
ACCESSでフィールド名の変更(VBA)
Access(アクセス)
-
ACCESSで空白のデーターをクエリで判定/識別する方法を教えてくださ
Access(アクセス)
-
-
4
アクセスでテキストボックスの値が空白だったら
Access(アクセス)
-
5
「RunSQL」と「Execute」の違い
Access(アクセス)
-
6
Accessのマクロでモジュールを実行させたい。
Access(アクセス)
-
7
アクセスVBAで既に開いているエクセルを閉じたい
Yahoo!ショッピング
-
8
Accessでフィールド名を変数(文字列)で・・・
Access(アクセス)
-
9
テキストボックスにクエリ結果を表示させたい
その他(データベース)
-
10
Access サブフォームでの選択行の取得
その他(データベース)
-
11
アクセスで数値型のフィールドにNullをいれたい
その他(データベース)
-
12
アクセスからエクセルのシートを追加して、名前をつける方法
Excel(エクセル)
-
13
Accessで、1つの項目に複数の置換えを1度でするには?
Access(アクセス)
-
14
ACCESS クエリで重複データを最新の1件だけ表示
Access(アクセス)
-
15
Accessでテーブルの値をテキストボックスに代入するには?
Access(アクセス)
-
16
Accessのレポート上のテキストボックス値を設定したい
その他(データベース)
-
17
アクセスで#エラーを表示させない方法は?
Access(アクセス)
-
18
Access2003 クエリで、空の列は作れますか?
Access(アクセス)
-
19
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
20
アクセス VBAで列の入れ替え データシートビュー
その他(Microsoft Office)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ACCESS VBAでテーブル内の特定...
-
データがあれば○○なければのSQL
-
VB.NET2003でOraclの情報を取得...
-
Accessで縦と横を入れ替えたい
-
別のaccessファイルからデータ...
-
Access BetweenとLikeの組み合...
-
SQLServer→Access インポート
-
ACCESS DCOUNTの抽出条件について
-
.NET MDBデータベース更新につ...
-
ACCESSで実行時エラー3008
-
Access から Excelのシートをイ...
-
Accessリンクするテーブルが見...
-
Access vbaで重複レコードの削...
-
抽出条件でデータ型が一致しま...
-
重複した複数のレコードを1レ...
-
DAOでSQLServerに接続し、LeftJ...
-
【access】複数のフィールドの...
-
「ご処理進めて頂きますようお...
-
CloseとDisposeの違い
-
エクセルで、日付を入力すると...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
データがあれば○○なければのSQL
-
ACCESS DCOUNTの抽出条件について
-
ACCESS VBAでテーブル内の特定...
-
【access】複数のフィールドの...
-
Access vbaで重複レコードの削...
-
Accessで縦と横を入れ替えたい
-
抽出条件でデータ型が一致しま...
-
SQLServer→Access インポート
-
別のaccessファイルからデータ...
-
ACCESSで購入回数を表示する方...
-
sql文で削除クエリを書く
-
Accessリンクするテーブルが見...
-
DAOでSQLServerに接続し、LeftJ...
-
アクセスで定数を利用したい。
-
access vbaで前景色を指定したい
-
VBAでテーブル名とカラム名を動...
-
access追加クエリーでform入力...
-
ACCESSのクエリ、SQLに変数を使...
-
Access BetweenとLikeの組み合...
-
【PHP/MySQL】コード上で生成...
おすすめ情報