0

実行時に完了した行数を確認できませんでした。したがって、実行時に完了した行数を表示するために数行のコードを出さない理由を考えていました。

私の実装は次のとおりです。

Dim ownCntrl As Control
Set ownCntrl = UserForm1.Controls.Add("Forms.TextBox.1")
With ownCntrl
    .Name = "RowNoTextBox"
    .Value = "test"
    .Width = 150
    .Height = 25
    .Top = 10
    .Left = 10
    .ZOrder (0)
End With
UserForm1.Show

以下は私の質問です：

1)TextBoxオブジェクトのほかに、VBAで情報を表示するJavaのラベルのようなオブジェクトはありますか?

2）最初に「UserForm1」というユーザーフォームを作成せずに、実行時にTextBoxオブジェクトまたは他の適切なオブジェクトを直接作成できますか？UserForm1.Show 関数を呼び出さないと、TextBox オブジェクトは表示されません。

3) 実行時に UserForm または TextBox を表示したままにしておくには、ユーザーがそれを閉じて続行する必要はありません。

VBAの勉強を始めたばかりです。皆さんの提案に感謝します。どうもありがとう。

4

1 に答える 1

1

コメントにあるいくつかの追加情報によると、サブルーチンの進行状況に関する情報を保持する最も簡単なアイデアは、Excel ステータス バーを使用することです。したがって、サブルーチン内に次のようなものを入れます。

Application.StatusBar = "Current progress- Row No.: " & rowNum

whererowNumは現在の行を表す変数 (ループ変数) です。これは重要です-手順の終了前に、この行を呼び出して標準のステータスバーの動作を返す必要があります。

Application.StatusBar = False
于 2013-04-15T06:45:57.643 に答える