ExcelVBAでユーザーフォームでテキストボックスなどからセルに連続して入力するコーディングの際の命名規則や考え方について
やりたいことは、
ユーザーフォーム(テキストボックスやコンボボックス、オプションボタンを配置)20項目程あるとして、「入力」ボタンを押すと、項目の内容をセルに転記すること
解決したい事は、
テキストボックスやコンボボックス、オプションボタンがあるので転記する際に沢山コードを書くことになってしまっているので、命名規則やコードの考え方を変えてコーディングしたい。
現在の例
cells(1,1).value = cb_立ち上がり自立度
cells(1,2).value = tb_立ち上がり介助内容
if opb_立ち上がり_介助_1 = true then
cells(1,3).value = "あり"
else
cells(1,3).value = "なし"
end if
上記のようなコードが寝返り、立ち上がり、車椅子への移乗などと項目が繰り返されます。
命名規則を変えるとfor文でループできそうですが、オプションボタンが入ってわかりにくくなってしまいました。
アドバイスを頂けないでしょうか?
よろしくお願いします。
No.2ベストアンサー
- 回答日時:
Np.1です。
>ユーザーフォーム(テキストボックスやコンボボックス、オプションボタンを配置)20項目程あるとして、「入力」ボタンを押すと、項目の内容をセルに転記
結局ユーザーフォームの各コントロールとシートの各セルとの関係はBookを見ている質問者さんは把握できてますが、回答者側は例題の『1行でしかも部分的』にしかわかりません。
http://www.eurus.dti.ne.jp/~yoneyama/Excel/vba/i …
の
21 ユーザーフォームを利用する
にある各コントロールを参考にしてみては?
ナンバーリングする事で扱いやすくなると感じられるかも知れませんよ。
めぐみんさん
再度回答頂きありがとうございました。
質問がわかりにくくてすみませんでした。
現在は入力フォームの記述が終わってから「入力」ボタンを押すと各コントロールの内容が転記されるようにしていました。
回答のリンク先を参考にさせて頂いて、先の返信でも少し書きましたが、各コントロールでclickやchangeなど動きがあればセルに転記するスタイルに変更しようと考えました。
ありがとうございました。
No.1
- 回答日時:
OptionButtonの配置が不明など素人ですので違うようならスル~っと。
OptionButtonで選択できるのは基本1つですよね?
⇒複数選択可のコーティングされたのなら別ですけど。
なのでまずは『どのOptionButtonがtrueかを調べ、その結果により書き込む値やセル位置を決めるようにしてみるとか?
⇒質問文ではどうしたいのかが読み取れないジジィですが、少なくともコントロール名をナンバーリングさせる事でループで調べられますし。
あと個人的に変数名やコントロール名などに全角文字を使わないですかね。
そんな時代にやり始めたからかもですけど。
まぁ理解しやすいというならそれで良いと思いますよ。
回答ありがとうございました。
クリックしたら動作するようにプログラムすることで解決できそうなことに気がつきました。
変数名に関してご指摘ありがとうございます。
独学しながらなので最初に作ったコードで半角英数字にすると英語が苦手な自分が理解できなかったので全角文字にしていました。
今からリファクタリングして半角英数字に変更しようと思います。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 検索のユーザーフォームの表示について 1 2023/03/27 23:31
- Visual Basic(VBA) フレーム内のオプションボタンの選択結果をセルに書き出したい。 図のような預金種目というフレームにオプ 2 2022/07/29 11:12
- Visual Basic(VBA) VBA 重複チェック後に値をワークシートに転記する方法を教えてください。 1 2023/03/19 12:43
- Visual Basic(VBA) VBA Userformで一部別シートに転記がしたいのですが 2 2023/05/24 13:08
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- Visual Basic(VBA) 列と行の名前(重複あり)が交差するセルに、データを入力したい 2 2022/06/25 22:42
- Visual Basic(VBA) 前回ご教授いただいたコードに覚えたてのループ処理で品名りんごAから順に20回for nextでループ 7 2023/01/13 22:01
- Visual Basic(VBA) ユーザーフォームに2つのコンボボックス銀行名「ConboBox1」支店名を「ConboBox2」とし 4 2022/08/03 17:34
- Visual Basic(VBA) VBAでのループ順序について 3 2023/03/13 10:55
- Visual Basic(VBA) Accessフォームで全レコードを指定のExcelのセルへ転送し印刷する方法について 2 2022/09/08 18:23
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBA シートのボタン名を変更し...
-
VBA(エクセル)で自動的にボタン...
-
ボタンをマウスで押し続けたと...
-
フォームの再読み込み
-
VBA CommandButtonの文字ずれ
-
ユーザーフォームに別シートか...
-
ボタンを押すごとに違ったメッ...
-
Excel マクロ 閉じるボタン
-
エクセルVBAでユーザーフォーム...
-
他のアプリケーションとの連携
-
ボタンの増殖
-
ボタンの状態
-
アクセスのフォームで入力日を...
-
リストボックス 何も洗濯され...
-
コマンドボタンやイメージにマ...
-
C♯初心者で、四則演算の電卓を...
-
Excel VBA Application.caller...
-
Excel VBA オプションボタンに...
-
vb.net タイマーに引数を渡す
-
VBで電話プログラム作成
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBA シートのボタン名を変更し...
-
VBA(エクセル)で自動的にボタン...
-
フォームの再読み込み
-
VBA CommandButtonの文字ずれ
-
ユーザーフォームに別シートか...
-
VBAのボタンの位置が変わって困...
-
Access VBA でデータペーストを...
-
Excel VBA Application.caller...
-
セルをマクロのボタンにしたい。
-
コマンドボタンやイメージにマ...
-
ボタン
-
プロシージャからイベントをコ...
-
ボタンをマウスで押し続けたと...
-
VBA でのボタンの移動について
-
C#で動的に作ったtextboxを消す。
-
バックスペース機能の作り方
-
VBAで多数のプログラムを一つの...
-
アイコンとボタンの違い
-
TextBoxでEnterキーを押すと、...
-
VBA IE ダウンロード ダイアロ...
おすすめ情報