- ベストアンサー
エクセル マクロ フォームに転記したい
- みんなの回答 (1)
- 専門家の回答
質問者が選んだベストアンサー
似たような質問を何度も繰り返してるような気がしますが、気のせいでしょうか? 回答者は推測で答えてますから、ここで得た回答を自身の環境に置き換える程度のスキルは最低限必要です。 まる投げは如何なものかとも思いますし、、、 こんな感じかなと思いましたが、試す場合は必ず「新規ブック」でコードやオブジェクト名を書き換えずにそのままコピペして下さい。 以上、参考まで。 1)Sheet1に CommandButton を置き、クリックイベントに Private Sub CommandButton1_Click() UserForm1.Show End Sub 2)UserForm1 に CommandButton を2つと TextBox を1つ置き Private Sub UserForm_Initialize() Me.CommandButton1.Caption = "リスト呼出" Me.CommandButton2.Caption = "シート転記" End Sub Private Sub CommandButton1_Click() UserForm2.Show End Sub Private Sub CommandButton2_Click() ActiveSheet.Range("A65536").End(xlUp).Offset(1, 0).Value = _ Me.TextBox1.Value End Sub 3)UserForm2 に CommandButton を1つと ComboBox を1つ置き Private Sub UserForm_Initialize() Me.CommandButton1.Caption = "OK" For i = 65 To 81 Me.ComboBox1.AddItem Chr(i) Next i End Sub Private Sub CommandButton1_Click() UserForm1.TextBox1.Value = Me.ComboBox1.Value Unload Me End Sub
関連するQ&A
- マクロ フォームでのチェックボックスについて
教えてください。 1)フォームでテキストボックス2つ、ボタンで新しい入力フォーム表示 2)入力フォームでチェックボックス6個、コンボボックス6個を作ります。 3)チェックボックスにチェック(1個のみ)したら、1)のフォームのテキストボックスにチェックされた、項目とコンボボックスで選択された内容が転記したい。 例)果物にチェック、コンボでブドウと選択 テキストボックス→果物 ブドウ というようにフォームに転記させたい。 以前、シートでのマクロを教えていただきましたが、フォームだと頭が混乱してしまいました。 簡単で良いので、マクロの記述を教えてください。
- ベストアンサー
- オフィス系ソフト
- エクセル マクロ コンボボックスリスト
sheet1の場所でボタンクリックでフォーム表示。その中でコンボボックスリストを作成。 sheet3にデーターをA列に作りました。 1)フォームの中のコンボボックスをクリックしてリスト表示させた い。マクロの記述を教えてください。 2)コンボボックスリストに表示した文字をsheet2に記録するボタンを作ったがマクロの記述を教えてください。
- ベストアンサー
- オフィス系ソフト
- EXCEL ユーザーフォームを使ったマクロ
データの登録をするのにユーザーフォームを使おうと思うのですが、なかなかうまくいきません。教えてください。 ユーザーフォームにはコンボボックス、テキストボックス、コマンドボタンが貼り付けてあります。(コンボボックスのリストには呼び出したいシートの名前が入っています) コンボボックスのリストの中から呼び出したいシートを選択し、テキストボックスに入力した内容を、コマンドボタンを押すことで選択されたシート上の、あるセルに登録したいのですがどうすればよいでしょうか?
- ベストアンサー
- オフィス系ソフト
- Excel ユーザーフォームからの転記
Excel ユーザーフォームからの転記 はじめまして、ご教授願います。 Exceiのユーザーフォーム内のテキストボックスのデータをシートに転記したいのですが、 教えてください。 テキストボックス内の改行を含んだデータを改行で区切って、別々のセル(縦に順に)に転記 したいのですが、方法がわかりません。 VBAでどのように書けばよろしいのでしょうか。 ご教授よろしくお願いします。
- ベストアンサー
- その他MS Office製品
- エクセル マクロ 時間
1)フォームにて時間を表示する。コンボボックス2つ作る。コマンドボタン(記録)を1つ作る。 2)1つのコンボボックスには時を選択させる。リストはリストはSheet2に01・02・03・・・とA列に00まで作る。 3)もう1つのコンボボックスには分を選択させる。リストはSheet2に01・02・03・・・とB列に00まで作る。 4)フォームの記録ボタンを押すと、sheet1のA2に(例 23:34)と表示させたい。 マクロの記述を教えてください。
- ベストアンサー
- オフィス系ソフト
- エクセル VBA フォーム設定について
いつもお世話になっています。 エクセル VBAでユーザーフォームについて教えてください。 あるシートのデータをフォームに読み込み、違うシートにそのデータを書き込んでいます。元データの列順と書き込むシートの列順が違うので、VBAで設定して使っています。 書き込みはうまくいっています。ただ、書き込む際にフォーム上で少しデータを修正して書き込みを行うのですが、編集したいフォーム上のテキストボックスをクリックすると、データの最後のほうにカーソルが飛んでしまいます。 テキストボックスをできるだけ大きくして対応していますが、限度があります。テキストボックスをクリックした際にデータの最後(文字データで言うと文章の最後を表示してしまう)まで動かずに、クリックしても先頭のままになるようにするにはどうすればいいのでしょうか。 同じように、コンボボックスもクリックするとリストの最後から表示されます。リストの先頭から表示させる方法を教えてください。
- ベストアンサー
- オフィス系ソフト
- フォーム上で作成したデータをエクセルシートに転記
テキストボックスやコンボボックスなどを配置したフォームを作成してデータをエクセルシートと保存していきたいのですが、上書きされてしまいデータが蓄積できません。 また、保存したデータをフォーム上に呼び出し若しくは検索して、データ修正を行った後に上書き保存できるようにしたいので、よろしくお願いします。 ※テキストボックスやコンボボックスなどのタグに対象のセル値を指定しています
- 締切済み
- Excel(エクセル)
- フォームへの未入力を無くしたい
[やりたいこと(宜しくおねがいします)] フォームの未入力「コンボボックス」と「テキストボックス」を事前に把握したい。 [(やりたいこと)の実現と希望] このサイトでアドバイスを頂きまして、長年に渡り作成できたデータベースが「68」、入力するフォームは「78」を超えます。現状「フォーム」の構成を生かす方法を含めアドバイスをお願いします。 [入力するフォームに共通していること] 1,コンボボックスとテキストボックス ・全てのコンボボックスへの選択入力は必須になっている。 ・テキストボックスは未入力箇所も発生する。「未入力箇所は不特定」 2,フォームに共通して配している2つのコマンドボタン ・フォームを閉じるボタン「マクロ(クリック時)」 ・情報の最新化ボタン「マクロ(クリック時)」 ※コンボボックスの選択項目追加時に反映用として配置 以上ですが、宜しくお願いします。
- ベストアンサー
- Access(アクセス)
- マクロで5個のBOOKのデータをBOOK1に転記
エクセルマクロで対話型でBOOK2~6の5個のデータを BOOK1のシート1に順番で転記したいです。 BOOK2~BOOK6は作業者にファイルを選択させたいです。 BOOK2~BOOK6は作業の都度行数がBOOKごとに変わります。 (500~5,000行でばらつきます) 流れとしては、 1.BOOK1を開いてマクロを軌道 2.エクセルのファイルを開くウィンドーが出る 3.ファイルを選択させる(例:マイネットワーク内のBOOK2を選択) 4.ウィンドーの開くをクリックする 5.転記1回目 指定したファイルが開いてデータが BOOK1のシート1に転記される この1回目は1行目からデータがある最終行まで。 その後BOOK2は閉じられる 6.メッセージボックスで「転記完了」と表示 7.メッセージボックスの「OK」をクリックすると エクセルのファイルを開くウィンドーが出る 8.ファイルを選択させる(例:マイネットワーク内のBOOK3を選択) 9.ウィンドーの開くをクリックする 10.転記2回目 指定したファイルが開いてデータの中の2行目~最終行までを BOOK1のシート1の最終行の次の行から転記を行う。 (NO.5のBOOK2が1,000行の場合1,001行目から BOOK3のデータ2行目以降が転記される) その後BOOK3は閉じられる 11.この作業を計5回行う (転記3~5回目も転記するデータは2行目~最終行) 13.メッセージボックスで「5個のBOOKの転記が終了」と表示 14.メッセージボックスの「OK」をクリックすると Call 編集 でSub 編集 というプロシージャーが起動する Sub 編集は出来上がってます。 (BOOK1のシート1を編集します。) NO.1~NO.14のマクロ記述を教えてください。 自分で作成した記述では全然駄目でした。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- VBA 任意のセルにデータを転記する方法
Excel のユーザーフォームを使って、データの入力をしたいと考えています。 入力ボタンを押すと、テキストボックスに入力した内容が別シートのセルに転記されるものです。 指定したセルに追加する、1番下の行に追加する、はできるのですが、コンボボックスに入力した内容によって転記するセルを変える方法はありますでしょうか? 具体的に言うと、 ユーザーフォーム内のコンボボックスで 月(4月~3月)を選べるようにしているのですが 4月を選べば4月を入力するセルに。7月を選べば7月を入力するセルに転記したいです。 何かいい方法はありますでしょうか。
- 締切済み
- Visual Basic
お礼
ありがとうございました。すいません、papayukaさんにはいつも回答をもらって感謝しています。確かに問題を丸投げしてしまうのはよくないと感じています。基本的な知識しかないのは事実です。もっと勉強します。少しひねられると、直ぐに分からなくなります。今回も助けてもらいありがとうございます。本当に感謝しています。ただ今後もお願いします。自分でも勿論勉強します。