現在、ユーザーフォームに60個のテキストボックスを設置しています。
数値入力されるとカンマが付くようコードを書いているのですが、まとめて処理できるようなコードはないでしょうか?
現在…
Private Sub TextBox1_Change()
TextBox1.Text = Format(TextBox1.Text, "#,##0")
End Sub
Private Sub TextBox2_Change()
TextBox2.Text = Format(TextBox2.Text, "#,##0")
End Sub
Private Sub TextBox3_Change()
TextBox3.Text = Format(TextBox3.Text, "#,##0")
End Sub
これを60個
試しにfor~Nextで書いてみましたが、失敗しました。
Dim c As Integer
For c = 1 To 60
Controls("TextBox" & c).Text = Format("TextBox" & c.Text, "#,##0")
Next
End Sub
ご存知の方、お力を貸してください。
ウィンドウズ7のエクセル2013を使用しています。
No.1ベストアンサー
- 回答日時:
excelとのことですので、VBAですね。
単純に複数のコントロールを変数を用いて指定し、プロパティを設定するだけなら、Controlsコレクションを使用します。
http://www.moug.net/tech/exvba/0140013.html
ですが、
今回ご提示の質問のように、チェンジイベントをまとめて記述するには以下のような方法があります。
http://oshiete.goo.ne.jp/qa/8747288.html
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) VBA 重複チェック後に値をワークシートに転記する方法を教えてください。 1 2023/03/19 12:43
- Visual Basic(VBA) VBA Userformで一部別シートに転記がしたいのですが 2 2023/05/24 13:08
- Visual Basic(VBA) ユーザーフォームの書き出しで追加のご相談 ユーザーフォームの値をシートに書き出す際、コードが表示され 2 2022/08/05 10:58
- Excel(エクセル) マクロでテキストファイルを読み込んだ際の最終セルにデータと改行が含まれる問題の改善方法 2 2022/03/25 16:50
- Excel(エクセル) Excelのtextboxへの入力で小数点以下に0が続く場合でも正しく表示したい 3 2022/04/11 13:53
- Visual Basic(VBA) テーブルを配列に入れて、元のテーブルの行番号を取得したい 1 2022/08/16 20:15
- Visual Basic(VBA) フレーム内のオプションボタンの選択結果をセルに書き出したい。 図のような預金種目というフレームにオプ 2 2022/07/29 11:12
- Excel(エクセル) このコードに追記事項の仕方を教えて下さい。 以下のコード内容に出てくる。セルH3が空白の場合、エラー 4 2023/08/03 00:22
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- Visual Basic(VBA) ①ExcelVBAでカレンダーを作り、別のユザーフォームで日付を入力したいのですがエラーになります。 1 2023/02/17 18:39
このQ&Aを見た人はこんなQ&Aも見ています
-
新NISA制度は今までと何が変わる?非課税枠の拡大や投資対象の変更などを解説!
少額から投資を行う人のための非課税制度であるNISAが、2024年に改正される。おすすめの銘柄や投資額の目安について教えてもらった。
-
エクセルVBA テキストボックスに3桁ごとにコンマ
Visual Basic(VBA)
-
VBAのフォーム上にTextBoxたくさんあるとき
IT・エンジニアリング
-
カンマ区切り
Visual Basic(VBA)
-
-
4
VBA テキストボックスに3桁カンマ表示させたい
その他(Microsoft Office)
-
5
ユーザーフォームで数字にカンマを付けたい
Excel(エクセル)
-
6
VBAのフォームでTextBoxがいっぱいある時
Access(アクセス)
-
7
エクセルVBA オプションボタンのチェックを外したい
Excel(エクセル)
-
8
エクセルVBA ユーザーフォームのTextBoxを日付にしたい
Excel(エクセル)
-
9
VBA:ユーザーフォームのマルチページに色を付けたい。
Word(ワード)
-
10
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
11
VBA テキストボックスの計算
Visual Basic(VBA)
-
12
Excel VBA ユーザーフォーム内のラベルにテキストボックスの小計を出す方法
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
特定のキーを押すまでループさ...
-
コマンドボタン(入力)をクリッ...
-
ListViewで、PageDownキーイベ...
-
キーイベントを擬似的に発生さ...
-
「ご処理進めて頂きますようお...
-
EXCEL VBA マクロ 実行する度に...
-
スマホでサイトの画像を長押し→...
-
フォーム上の全てのコントロー...
-
【Excel】特定の文字を含むセル...
-
VBAでループ内で使う変数名を可...
-
「PC Helpsoft Driver Updated...
-
タッチパッドはチャタリングは...
-
メルカリのメルカードで買い物...
-
Excelで検索ボタンを作るには
-
VBA エンターキーでイベントに...
-
ビープ音を連続して鳴らす
-
【access】複数のフィールドの...
-
iD
-
switch の範囲指定
-
VBA 特定の文字が入力されたセ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【VB】タブ切り替え時のイベント
-
Visual Basic 6.0 コンボボック...
-
一定時間操作されないと自動で...
-
特定のキーを押すまでループさ...
-
WPFでの時刻入力コントロールに...
-
キーイベントを擬似的に発生さ...
-
(VBA)チェックボックスのclick...
-
タブキー押下時のイベントをひ...
-
テキストボックスの入力文字を1...
-
VB.NETでフォームがない...
-
エクセルVBAのテキストボック、...
-
コンボボックスにキー入力をさ...
-
KEYPREVIEW=TRUEについて。意味...
-
フォーカスについてお教えください
-
複数のテキストボックスのカン...
-
Excel VBA マクロ実行中のみテンキ...
-
VB6で電卓を作っているのですが...
-
IEで、BackSpaceで「戻る」機能...
-
VB.NETのDropDownListをReadOnl...
-
VC++ で TextBoxから、次...
おすすめ情報