• ベストアンサー
※ ChatGPTを利用し、要約された質問です（原文：ユーザフォームに同フレームを複数配置し出力したい）

ユーザフォームに同フレームを複数配置し出力したい

このQ&Aのポイント
  • VBAを使用して、ユーザフォームに同じフレームを複数配置し、出力したいと思っています。
  • 複数のレコードを表示するため、可変な数のフレームを配置する必要がありますが、手動で配置するのは手間がかかります。
  • そこで、既存のフレームを複数コピーし、Userform内に配置する方法を知りたいです。

質問者が選んだベストアンサー

  • ベストアンサー
  • kkkkkm
  • ベストアンサー率65% (1624/2466)
回答No.1

以下のような感じでできると思いますが、新しいFrame名などは貼り付け後にコントロールの名前をすべて取得して最新のものを取得して指定するなど手間が必要です。 Me.Frame1.SetFocus Me.Copy Me.Paste With Me.Controls("Frame2") '新しいFrame名 .Caption = "タイトル" .Left = Me.Frame1.Left + 150 .Top = Me.Frame1.Top End With Me.Controls("TextBox3").Value = "333" '新しいTestBox名

gge00741
質問者

お礼

ありがとうございました。フレームの中のテキストボックスやラベル等は、コピーしたフレームでは、シーケンシャルに番号がついていき、その名前でアクセスうまくいきました。 （新たなフレーム名だけ変えて、中のテキストボックスや、ラベルの番号が変わらなければもっとよかったのですが、現状の仕様では無理ですよね） ただ、10数個のフレームで縦長となったユーザフォームに対し、先頭のヘッダ部分だけ残し、スクロールして参照できる方法に躓いています。 とりあえず、質問の目的は達成できました。ありがとうございました。

gge00741
質問者

補足

回答ありがとうございます。 今週より試してみていますが、コピーして新しいフレームを作成した後のアクセスがうまくいきません。 もう少し、トライしてみます。ヒントをありがとうございました。

全文を見る
すると、全ての回答が全文表示されます。
  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. Visual Basic

関連するQ&A

  • ユーザーフォームのインスタンス

    こんにちは。 早速質問させていただきます。 ExcelVBAでプログラムを組んでいて、 そのExcelシート上に同じUserFormを動かすためのコマンドボタンが 数十個あります。 ちなみに、UserFormの中身はチェックボックスです。 数十個のコマンドボタンそれぞれを押下後、 UserFormでチェックした項目を再度表示させたいのですが、 それぞれのコマンドボタンから同じUserFormを呼んでいるため、 UserForm.Hide では、他のコマンドボタンでチェックした内容が 出力されてしまいます。 どのようにしたら、UserFormを複数作らずに UserFormの内容を保持できるでしょうか。 回答よろしくお願いします。

  • ユーザーフォームにデータを入力

    「開発」→「Visual Basic」→「フォーム」の「UserForm1」をクリックして表示されるUserFormに何個かのテキストボックスを作成しています。 そのテキストボックスに入力するデータをワークシートにあるデータを自動的に入力( 表示)させる方法はありませんか？ ちなみに、ワークシート上でセルをクリックするとそのワークシート上にデータが自動的に入力されたUserFormが表示されるようにはしています。 今回の質問は、「開発」→「Visual Basic」→「フォーム」の「UserForm1」をクリックして表示されるUserFormのテキストボックスのことです。(この画面では、手入力しかできないのでしょうか？) Excel 2013 です。 よろしくお願いします。

  • 複数の.jpgファイルなどを配置して一括選択したい

    Word 2010で次の(1)～(3)をした後で(4)をしたいのですが、そのためには(1)から(3)をどのように作成したらいいでしょうか。 (1)複数個の.jpgファイルを配置（表示）する。 (2)複数個のテキストボックスを配置（表示）する。 (3)複数個の図形配置（表示）する。 (4)上記(1)～(3)のすべてを（例えば、「オブジェクトの選択」で）一括選択する。 まず描画キャンパスを作ってその中に(1)～(3)を作成すれば(4)をすることができるかと思ったのですが、描画キャンパスには.jpgファイルを配置（表示）すことができません。

  • Excel ユーザーフォーム間の Value 送受

    VBA の迷走者です。 Excel の同じブック内に、入力忘れがないことを確認して貰うため、２個のユーザーフォームを作りました。（メッセージボックスの機能は見つかりません） UserForm1 の Textbox1 に入っている数値を、UserForm2 で示して、「これでよいか」と確認させるには、 UserForm1 と UserForm2 には、それぞれどう書けばよいのでしょうか。 UserForm2 は 表示だけなので、ラベルではうまくいきませんか。 教えて下さい。よろしくお願いします。

  • ExcelVBA　ユーザーフォームに関しての質問です。

    ExcelVBA　ユーザーフォームに関しての質問です。 ユーザーフォームでフレームを使って、 フレーム内に複数のチェックボックスを配置したとします。 行いたい作業としては次の２点 ?フレーム内に配置したチェックボックスのうち、チェックが入っているものだけの数を調べる ?チェックが入っているボックスの値（caption）を取得して、変数に入れる 以上のことができるでしょうか？

  • 同一のフォームを複数開いて

    まず、同一のフォームを複数開く。 そのフォームにテキストボックスがある時に、 複数開いた中から指定のフォームのテキストボックスに文字を挿入するにはどのようなプログラムを組めばよいでしょうか？

  • エクセルVBA　フレーム内のイベント

    フレーム内に、テキストボックスを配置し、 そのテキストボックスをExitした場合にFormatを変更したいのですが、 フレーム内にテキストボックスがあるためかイベントが発生しません。 　　1) Frame1　の中に　Textbox1　を配置 　　2) Textbox1には数値を入力 　　3) 入力後、次のコントロールに移動した場合、 　　 Textbox1.textをformat(Textbox1.text,"#,##0")にする 　　Private Sub Textbox1_Exit(ByVal Cancel As　MSForms.ReturnBoolean) 　　　　msgbox "Exit" 　　End Sub 　　としましたが、ユーザフォームを終了した時に、msgが出力されます。 フレーム内のイベントはどのようにすればよいか、教えていただきたいです。 よろしくお願いいたします。

  • VBAにて、ユーザーフォーム上のマルチページ上に配置したテキストボック

    VBAにて、ユーザーフォーム上のマルチページ上に配置したテキストボックスの番号を取得したい 例えば、userform1のmultipage1上にtextbox10というオブジェクトがあるとします。 textbox10のchangeイベントにて、この10という番号を取得したいのですが、どのような構文でできるのでしょうか？

  • エクセルVBA・ユーザーフォームでトーナメント図は可能？

    エクセル2002使用です。 VBAのユーザーフォームでトーナメント図のような表示にしたいのですが、可能なのでしょうか？ 　　　　　□ 　　　　　｜ 　　　　－－－ 　　　｜　　　｜ 　　　□　　　□ □をテキストボックスで配置し、縦線横線を置く方法がわかりません。 ラベルに半角傍線-----------でつなぎあわせるとかしかないのでしょうか？ よろしくお願いします。

  • VisualBasicで一つのフォームを複数で使用

    クラスのような概念で、一つのフォームを複数使用できないかと考えています。 Aというフォームを作成し、これを１０個表示させたいのです。中に配置するラベルのキャプションはすべて異なります。 よろしくお願いします。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する