
エクセル2000使用
ユーザーフォーム(UserForm1):マルチページ(MultiPage1)でページを5つ
作成。各ページにはテキストボックスとコマンドボタンを配置。
テキストボックスに値入力後、コマンドボタンをクリックするとテキストボック
スの値をクリアするように設定。
テキストボックスに値入力後、コマンド実行前にページを替えた時、テキストボ
ックスの値をクリアしたいのですが、どのようにすればよろしいのでしょうか。
類似する過去の質問を見てもよくわからなかったので、ぜひご回答のほどよろし
くお願い申上げます。
No.1ベストアンサー
- 回答日時:
>クリックすると
イベントプロシージュアー利用ですよね。
Private Sub MultiPage1_Change()
MultiPage1.page1.TextBox1 = ""
End Sub
MultiPageのChangeイベントを使いました。
MultiPage1のTextBox1のVALUEに文字を入れておき、実行し、ページをPage2をクリックして、Page1に戻ると、テキストボックスの中身は無くなってました。
これではありふれてますが、質問の真意をカバーしてますでしょうか。
この回答への補足
申し訳ございません。説明不足です。新たな質問はクリックイベントを用いた時のことです。どのページ状態からでも、他のページに切り替えるということは、マルチページ全体がクリックされると同じだと考えて、TextBox* = ""をテキストボックスの数だけ記述しなければならないのか、一文にまとめることができるのかどうかということなのです。
補足日時:2004/10/16 12:20速やかなご回答ありがとうございます。imogasiさんのご回答と質問No.984565_chipmoguraさんのご回答を参考にMultiPage1のクリック(チェンジ)イベントを設定したところ、希望通りの結果が得られました。
あつかましく、続く質問ですが、MultiPage各ページ内に同様のテキストボックスがたくさんあるので、まとめてクリアするためには、どのように記述すれば良いのでしょうか?
No.2
- 回答日時:
さっきまで開いていたページのTextBoxをクリアする必要があるのでしょうか?
もし、各ページを"開いた時"にそのページのTextBoxをクリアしても問題ないなら。
Private Sub MultiPage1_Change()
Dim tbCont As Control
With Me.MultiPage1
For Each tbCont In .Pages(.Value).Controls
If TypeName(tbCont) = "TextBox" Then
tbCont.Value = Null
End If
Next tbCont
End With
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
エクセルVBAでマルチページの切り替え方法の件で
Excel(エクセル)
-
VBAでマルチページのページ指定方法
Visual Basic(VBA)
-
VBA:ユーザーフォームのマルチページに色を付けたい。
Word(ワード)
-
-
4
エクセルVBA マルチページのSetFocus
PowerPoint(パワーポイント)
-
5
UserForm1.Showでエラーになります。
工学
-
6
マルチページで現在開いているページの確認
Visual Basic(VBA)
-
7
UserForm.showでマルチページ1を見出し
Visual Basic(VBA)
-
8
Excel VBAでのMultipageの選択
Visual Basic(VBA)
-
9
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
10
ユーザーフォームを表示中にシートの操作をさせるには
Excel(エクセル)
-
11
ExcelVBAのユーザーフォームの中に線を引きたい
Visual Basic(VBA)
-
12
エクセルVBA テキストボックスに3桁ごとにコンマ
Visual Basic(VBA)
-
13
テキストボックスの番号を使ったFor~Next文について
Visual Basic(VBA)
-
14
VBA ListViewの選択Itemを削除する
Excel(エクセル)
-
15
VBAでループ内で使う変数名を可変にできないか。
Visual Basic(VBA)
-
16
エクセルVBAでUserFormを起動した時
Excel(エクセル)
-
17
VBAでユーザーフォームを再表示させたい。
Excel(エクセル)
-
18
ListView 項目の選択/選択解除について
Visual Basic(VBA)
-
19
ユーザーフォームをホイールでスクロールする方法(Excel2000VBA)
Excel(エクセル)
-
20
エクセルVBAでテキストボックスに入力があった場合のみ、ワークシートに転記したい
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
首吊りどこ締めるの
-
検便についてです。 便は取れた...
-
病院側から早く来てくださいと...
-
Excel 数値の前の「 ' 」を一括...
-
VLOOKUP関数を使用時、検索する...
-
リンク先のファイルを開かなく...
-
エクセルで数式の答えを数値と...
-
彼女のことが好きすぎて彼女の...
-
2つの数値のうち、数値が小さい...
-
血小板増加について
-
腕を見たら黄色くなってる部分...
-
小数点以下を繰り上げたものを...
-
風俗店へ行く前のご飯
-
【Excelで「正弦波」のグラフを...
-
EXCELで式からグラフを描くには?
-
Excel関数:本日以降(以前)の...
-
値が入っているときだけ計算結...
-
Excelで列の上4桁のみ抽出させ...
-
エクセルでエラーが出て困って...
-
Excelグラフのラベルオプション...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
首吊りどこ締めるの
-
検便についてです。 便は取れた...
-
値が入っているときだけ計算結...
-
彼女のことが好きすぎて彼女の...
-
尿検査前日に自慰行為した時の...
-
VLOOKUP関数を使用時、検索する...
-
Excel 数値の前の「 ' 」を一括...
-
精液の落とし方を教えてください
-
【Excelで「正弦波」のグラフを...
-
2つの数値のうち、数値が小さい...
-
風俗店へ行く前のご飯
-
精子に血が・・・
-
リンク先のファイルを開かなく...
-
小数点以下を繰り上げたものを...
-
EXCELで条件付き書式で空白セル...
-
イタリアから帰国する際、肉製...
-
excelでsin二乗のやり方を教え...
-
腕を見たら黄色くなってる部分...
-
病院側から早く来てくださいと...
-
ワードのページ番号をもっと下...
おすすめ情報