1

import data組み込みのダイアログをマクロ (vba) から呼び出す方法を知っている人はいますか?

試してみましApplication.Dialogs.Item(...).Showたが、正しいダイアログが見つかりません。助けてください。

前もって感謝します。

4

3 に答える 3

2

ダイアログシステムを使用して見つけることができる最も近いものは次のとおりです。

Application.Dialogs(xlDialogImportTextFile).Show

コマンドバーボタンへの参照は、次の方法で取得できます（少なくとも、2k3と2k7の両方で）。

Set button = Application.CommandBars.FindControl(ID:=6262)

ただしExecute、ボタンでメソッドを呼び出すと失敗します。悲しいことに、簡単な答えはそれが不可能であるということのようです。

QueryTableオブジェクトを手動で追加できます。最適なパスではありませんが、ソースデータを選択するための独自のシンプルなインターフェイスを設計できます。

于 2008-10-29T00:29:48.860 に答える
0

オブジェクトブラウザを選択して、たとえばxlDialogImportTextFileを検索すると、可能なダイアログのリストが表示されます。

編集：おそらくこれらの行の何かが合うでしょう：

'Allow user to select text file
sf = Application _
    .GetOpenFilename("Text Files (*.txt), *.txt")
If sf <> False Then
    'Open text file
    Workbooks.OpenText sf
End If
于 2008-10-29T00:27:10.660 に答える
0

VBA に相当するものはないと思います。データをワークシートに返す場合もあれば、データをメモリ内のレコードセットに入れる場合もあるからです。

ただし、このクラッジはダイアログをポップアップするはずです：

SendKeys "%ddd"
于 2008-10-29T07:35:25.787 に答える