締切済み

※ ChatGPTを利用し、要約された質問です（原文：hhhhhhh）

Private Sub UserForm_Initialize()の使い方とは？

2009/01/13 21:27

このQ&Aのポイント

Private Sub UserForm_Initialize()は、ユーザーフォームを初期化するための手続きです。
ComboBox1を初期化し、リストに1、2、3を表示します。
ComboBox1の値によってComboBox2のリストを動的に変更します。

noname#230358

環境対策技術・エコロジー
回答数1
ありがとう数0

みんなの回答 （1）
専門家の回答

みんなの回答

noname#230359

2009/01/14 01:06 回答No.1

この質問は↓の続きでしょうか？ http://mori.nc-net.or.jp/EokpControl?&tid=197234&event=QE0004 このタイトル本文とからはスパム投稿としか解釈できませんが？また、このプログラムは流量計算や電力計算とかでも無さそうですが何のプログラムで何を聞きたいのでしょう？

関連するQ&A

VBA ユーザーフォームのコードについて

下記の2つのコードの意味について教えて下さい。 Private Sub CommandButton1_Click() If ComboBox1 = "" Then ComboBox1.SetFocus・・・・・1 Exit Sub End If Application.Run (ComboBox1.List(ComboBox1.ListIndex))・・・2 End Sub 1と2がわかりません。 Private Sub UserForm_Initialize() TB = Array("マクロ１", "マクロ２", "マクロ３") Me.ComboBox1.List = TB End Sub 「Private Sub UserForm_Initialize()」と「Array」がわかりません。よろしくお願いします。
Private Sub UserForm_Init

いつもお世話になります。 Windws7 excell2010 です。同一のシートに二つの「Private Sub UserForm_Initialize()」があるときにどう名前を変えればまたはどうすればいいかご指導願えませんか。「Private Sub UserForm_Initialize()」が一つの時はE5のようにうまく作動してくれます。 E列に　売上の　「回収」のリスト Private Sub UserForm_Initialize() F列に　何時の　「売掛月」のリスト(1～12の数字) Private Sub UserForm_Initialize() A列に　=IF(B2="","",TEXT(B2,"mm")) 参考に下記します。～１ Private Sub UserForm_Initialize() With ComboBox1 .AddItem "振込" .AddItem "現金" .AddItem "小切手" End With End Sub ～２ Private Sub UserForm_Initialize() With ComboBox2 .AddItem "10" .AddItem "11" .AddItem "12" End With End Sub '**************** '設定 '**************** Private Sub CommandButton1_Click() y = 2 Do While Cells(y, 2) <> "" y = y + 1 Loop Cells(y, 2) = TextBox1.Text Cells(y, 3) = TextBox2.Text Cells(y, 4) = TextBox3.Text Cells(y, 5) = ComboBox1.Text Cells(y, 6) = ComboBox2.Text UserForm2.TextBox1.Text = "" UserForm2.TextBox2.Text = "" UserForm2.TextBox3.Text = "" UserForm2.ComboBox1.Text = "" UserForm2.ComboBox2.Text = "" UserForm2.TextBox1.SetFocus End Sub
コンボボックスのクリア方法について教えて下さい（vb6.5）

コンボボックスのクリア方法について教えて下さい（vb6.5） ComboBox1で選択したものによって、 ComboBox2で表示するものを変えたいと思っています。ただ、一度ComboBox1で選択した後にComboBox2を開くと、 ComboBox2は前回のものがどんどん足されていきます。コンボボックスのクリア方法について、どの様にすればよいかご教示のほど、宜しくお願い致します。 Private Sub ComboBox1_Change() UserForm1.ComboBox2.RemoveItem (0) If ComboBox1.Text = 1 Then UserForm1.ComboBox2.AddItem "A" UserForm1.ComboBox2.AddItem "B" UserForm1.ComboBox2.AddItem "C" ElseIf ComboBox1.Text = 2 Then UserForm1.ComboBox2.AddItem "D" UserForm1.ComboBox2.AddItem "E" UserForm1.ComboBox2.AddItem "F" Else UserForm1.ComboBox2.AddItem "G" UserForm1.ComboBox2.AddItem "H" UserForm1.ComboBox2.AddItem "I" End If End Sub -------------------------------------- Private Sub UserForm_Initialize() UserForm1.ComboBox1.AddItem "1" UserForm1.ComboBox1.AddItem "2" UserForm1.ComboBox1.AddItem "3" End Sub
スマホは修理できる？画面割れ・バッテリー交換・自作の限界

OKWAVE コラム
ＶＢＡでオプションボタン変更によって・・・

エクセルVBAのユーザーフォーム内にあるコンボボックス３つを選択することによりデータ入力を行っています。この度選択肢を増やすことになり、オプションボタンを２つ追加しようと思っています。オプションボタンはどちらかを決定することで、コンボボックスの選択内容を変更する予定です。コンボボックスは大中小分類としており、シート２から抽出したものをシート１に落としている現状をオプションボタン新設により、ボタン１は従来通りシート２から、ボタン２選択時はシート３にあるリストからコンボボックスへ繁栄させようとしたいのですが、方法が分かりません。どなたか、教えていただけると助かります。よろしくお願いします。現在のコードを下記に記します。 Private Sub UserForm_Activate() With UserForm3 .OptionButton1 = True ＊この段階でボタン２を選択時は、シート３にあるリストよりコンボボックスの内容を抽出したい。以下中小分類も同様としたい。 .ComboBox1.RowSource = "シート２!A3:A15" .ComboBox1.SetFocus End With End Sub Private Sub ComboBox1_Change() Dim myLlist As String myLlist = ComboBox1 With UserForm3 .ComboBox2.Text = "" .ComboBox3.Text = "" Select Case myLlist Case "大１" .ComboBox2.RowSource = "シート２!B21:B26" Case "大２" .ComboBox2.RowSource = "シート２!B27:B28" End Select End With End Sub Private Sub ComboBox2_Change() Dim myMlist As String myMlist = ComboBox2 With UserForm3 .ComboBox3.Text = "" Select Case myMlist Case "中１" .ComboBox3.RowSource = "シート２!C101:C111" Case "中２" .ComboBox3.RowSource = "シート２!C121:C124" End Select End With End Sub Private Sub OKボタン_Click() With UserForm3 ActiveSheet.Unprotect 行 = ActiveCell.Row 列 = ActiveCell.Column Cells(行, 列) = UserForm3.ComboBox1.Value Cells(行, 列 + 1) = UserForm3.ComboBox2.Value Cells(行, 列 + 2) = UserForm3.ComboBox3.Value ActiveSheet.Protect End With End Sub
同じコンボボックスを二つ以上作る方法

今同じ内容を表示するコンボボックスを二つ作ろうと思っているのですがつくり方がわかりません。どのようにすれば一つのプログラムで二つのコンボボックスを作れるのでしょうか例：表示でははいいいえプログラム： Private Sub UserForm_Initialize() ComboBox1.AddItem "はい" ComboBox1.AddItem "いいえ" End Sub Private Sub UserForm_Initialize() ComboBox2.AddItem "はい" ComboBox2.AddItem "いいえ" End Sub ↑のような作り方ではなく簡略化して Private Sub UserForm_Initialize() ComboBox●.AddItem "はい" ComboBox●.AddItem "いいえ" End Sub ●部を変更できれば一つのプログラムでコンボボックスを2つ操作できると思うのですがどのようにすればよろしいでしょうか？
VBAコンボボックスの内容が反映されない

超初心者で、申し訳ございません。下記のようなコードを入力しましたが、プルダウンは動くのですが、選択することが出来ません。誤りを指摘していただきたく、ご教授の程よろしくお願いします。 Private Sub UserForm_Initialize() With MainForm.ComboBox1 .List = Sheets("data").Range("A2:A11").Value .ListIndex = 0 End With Private Sub ComboBox1_Change() With MainForm.ComboBox1 .List = Sheets("data").Range("A2:A11").Value .ListIndex = 0 End With End Sub
ＶＢＡ初心者です。

ＶＢＡ初心者です。ユーザーフォームにテキストボックスとコンボボックスを１つずつ作り、それらを Private Sub ComboBox1_Change() 　　　TextBox1.Value = ComboBox1.Value End Sub というふうに繋いでるとき、テキストボックスにフォーカスをあてさせないようするため、 Private Sub UserForm_Initialize() 　　　TextBox1.Enabled = False End Sub このようにしました。ここまでは問題ありません。質問したいことは、このときテキストボックスに表示させる文字が淡色になるのを防ぐ方法です。　　　TextBox1.Locked = True これを上に付け加えればうまくいきそうなのですが、うまくいきませんでした…。どなたか解決方法を教えて下さい。
ComboBox1_Changeについて

Private Sub ComboBox1_Change() Dim si As Integer With UserForm1 .ComboBox2.Text = "" si = .ComboBox1.ListIndex ' ComboBox1 の何番目が選択されたかを得る Select Case si Case 0 ' 0番が選択されていたらComboBox2 の内容をC列から作成する .ComboBox2.RowSource = "Sheet1!C1" Case 1 .ComboBox2.RowSource = "Sheet1!C2" End Select End With End Sub コンボボックス1で選択された値に対して『Sheet1!C1』が表示されるようにするには、『.RowSource』の部分に適切な言語がありますでしょうか。また、『.RowSource』は、こういう効果がある等紹介しているサイトをご存知あれば教えてください。 (探してみたのですが、めぐり合えず)
エクセルのマクロ　コンボボックス他について

下記のプログラムでユーザーフォームを作成しました。まったく同じ記述で、他のブックでは、最終処理として、所定の箇所に選択した記号が表示（コピー）されるのですが、このブックでは表示されません。しかし、エラーは出ていないので文法的には合っているようにおもいます。それだけに、どこが違うのか尚更わかりません。なお、Unload UserForm1　を　Unload UserForm　にした場合、 Sheets("基本データ作成").Range("C3") = UserForm1.ComboBox1.Value　の UserForm1 を UserForm　にした場合、「実行時エラー４２４、オブジェクトが必要です。」のエラーが出ます。どこが悪いのかわかりません。どなたか、教えてください。なお、エクセルは２００３、OSはXPです。 Private Sub ComboBox1_Change() End Sub Private Sub ComboBox2_Change() End Sub Private Sub ComboBox3_Change() End Sub Private Sub CommandButton1_Click() Unload UserForm1 Sheets("基本データ作成").Range("C3") = UserForm1.ComboBox1.Value Unload UserForm1 Sheets("基本データ作成").Range("C4") = UserForm1.ComboBox2.Value Unload UserForm1 Sheets("基本データ作成").Range("C5") = UserForm1.ComboBox3.Value End Sub Private Sub UserForm_initialize() With ComboBox1 .AddItem "U" .AddItem "K" .AddItem "E" End With With ComboBox2 .AddItem "A" .AddItem "B" .AddItem "C" End With With ComboBox3 .AddItem "D" .AddItem "E" .AddItem "F" End With End Sub
Excel　コンボボックス2つ以上の時のコード

ユーザーフォームでコンボボックスを2つ作ったのですが、1つだけのときはうまくいったのですが、二つ目をつくったら、エラーが出てしまいました。コード入力は、Initializeに入力してあります。 Private Sub UserForm_Initialize() ComboBox1.Style = fmStyleDropDownCombo ComboBox1.RowSource = "sheet1!F2:F7" ComboBox1.ListIndex = -1 End Sub Private Sub UserForm_Initialize() ComboBox2.Style = fmStyleDropDownCombo ComboBox2.RowSource = "sheet2!B2:B3" ComboBox2.ListIndex = -1 End Sub コンボボックス1だけはうまくいったのですが、コンボボックス2をつくったら名前が適切でありませんとエラーがでました。どのようにしたらいいですか？教えてください。
エクセルVBA　ユーザーフォームのリストボックス

エクセルVBAのユーザーフォームのリストボックスについて教えてください。現在、以下のようにコードがされています。 Private Sub UserForm_Initialize() With UserForm.ListBox1 .AddItem "ABC" .AddItem "DEF" .AddItem "GHI" .ListIndex = 0 End With End Sub Private Sub ListBox1_Click() With ListBox2 .Clear Select Case UserForm.ListBox1.List(ListBox1.ListIndex) Case "ABC" .AddItem "123" .AddItem "456" .AddItem "789" Case "DEF" .AddItem "456" .AddItem "789" Case "GHI" .AddItem "789" End Select .ListIndex = 0 End With End Sub それで、ユーザーフォームを起動した時点で、ListBox1には"ABC"、ListBox2には"789"を選択し、青く色がついている状態にすることは可能でしょうか。よろしくお願いします。
エクセル　複数のComboBoxの連携

エクセルでフォームを使い、社内各部署での案件の一覧の検索データベースを作成中です。その際、ComboBoxを３つ使い、１「支店名」２「課名」３「チーム名」を選択するようにしたいのですが、支店により課名やチーム名が異なるため、１で選択した支店名と合致する課やチーム名が選べるようにしたく、以下のようなマクロを組みました。が、実行すると、支店名は表示されるものの、何故か選択できません。また、2つ目（課）の結果から３つ目（チーム名）も得る方法もいまいちよくわかりません。ご教示お願いいたします。 Option Explicit Private Sub ComboBox5_Change() Dim si As Integer With UserForm1 .ComboBox5.Text = "" si = .ComboBox5.ListIndex Select Case si Case 0 .ComboBox6.AddItem "A課" .ComboBox6.AddItem "B課" .ComboBox6.AddItem "C課" 以下必要分続く ’ComboBox６の結果から７を得るには？ End Select End With End Sub Private Sub UserForm_Initialize() ' ComboBox がアクティブの時の処理 With UserForm1 .ComboBox5.AddItem "A支店" .ComboBox5.AddItem "B支店" .ComboBox5.AddItem "C支店" .ComboBox6.AddItem "A課" .ComboBox6.AddItem "B課" .ComboBox6.AddItem "C課" .ComboBox7.AddItem "Aチーム" .ComboBox7.AddItem "Bチーム" .ComboBox7.AddItem "Cチーム" End With End Sub
コンボボックスにリストが表示されません・・・

ユーザーフォーム(UserForm)にコンボボックス(ComboBox1)を作ってリストを入れました。しかしユーザーフォームを実行してもコンボボックスに何もリストが出てきません。なにが悪いのでしょうか？チュートリアルどおりにやっているのですが・・・(T T) Private Sub UserForm_Initialize() With ComboBox1 .AddItem "東京" .AddItem "名古屋" .AddItem "福岡" End With End Sub Windows2000+Excel2000です。
ExcelVBA初歩的な質問

ExcelのVBAについてです。ネットのサイトなどを参考に勉強しはじめたばかりなので、非常に初歩的な質問かと思いますが、よろしくお願いいたします。ユーザーフォームにコンボボックスとテキストボックスを用意しました。それぞれコンボボックスは「combobox1」、テキストボックスは「textbox1」とします。コンボボックスからプルダウンで項目が選択できるよう Private Sub UserForm_Initialize() With combobox1 .AddItem "りんご" .AddItem "ぶどう" .AddItem "みかん" .AddItem "もも" End With End Sub としました。各項目が選択されたときに、テキストボックス「textbox1」にはそれぞれの固定値が入るようにしたいです。（例えばりんごなら1、ぶどうなら3、みかんなら10、ももなら25といったような感じで） Private Sub combobox1_Click() Dim listno As Long listno = combobox1.ListIndex With textbox1 Select Case para Case 0 .Text = 1 Case 1 .Text = 3 Case 2 .Text = 10 Case 3 .Text = 25 End Select End With End Sub としました。しかし、実行してみると、最初選択したときはtextbox1には数値が入るのですが、その後違う項目を選択してもtextbox1の値は変わりません。どのようにしたらよいのでしょうか？また、根本的なことなのですが、なぜ .Additem "りんご" ではメソッド(.Additemってメソッドですよね？）ではメソッドと値を並べて記述するのに、 case 0 .text = 1 では　=で結ぶのでしょうか？（.textもメソッドですよね？）
エクセルVBA

ユーザーフォームのテキストボックスに現在時間を表示し、表示を時計のように現在時刻を表示し続ける方法を教えてください。以下は現在のコマンドです。 Private Sub txtTime_Change() End Sub Private Sub UserForm_Initialize() UserForm1.txtTime.Value = Time End Sub よろしくお願いします。
エクセル　VBA　ID入力について

TextBox2に数字をIDを入力して名前をComboBox1.Text に表示させるようにしました。しかし、数字入力すると認識される物もあるのですが表示されない＝数字の値は同じ数字なぜなのでしょうか？ Private Sub TextBox2_Change() Dim vRet As Varianｔ vRet = Application.VLookup(TextBox2.Text, _ Sheets("マスタ").Range("A:B"), _ 2, _ False) If VarType(vRet) <> vbError Then ComboBox1.Text = vRet Else ComboBox1.Text = "<< 該当なし >>" End If End Sub Private Sub UserForm_Initialize() With TextBox2 .SetFocus .Text = "ID入力" 　.SelLength = Len(.Text) End With 教えて下さい！Sheet2の数字の書式が問題なのでしょうか？
連携する複数のコンボボックスに同じリストを設定

初心者なので質問がトンチンカンでしたらすみませんユーザーフォームにコンボボックスを計12個配置しています ComboBox1で選択した値に応じてComboBox2のリストが選ばれる ComboBox3で選択した値に応じてComboBox4のリストが選ばれる・・・・・・・ ComboBox11で選択した値に応じてComboBox12のリストが選ばれるという風に設定したいのですが、コンボボックスの数だけリストの設定をするのが大変なので見よう見まねで下記の様にしてみたのですが全く動きません。 UserForm_Initializeでイベント発生させてるので動かないのでしょうか？どこがおかしいのかご教授お願いします。 Private Sub UserForm_Initialize() Dim i As Variant Dim Ari As Variant Ari = Array("1", "3", "5", "7", "9", "11") For Each i In Ari If UserForm4.Controls("ComboBox" & i).Value = "車いす" Then With UserForm4.Controls("ComboBox" & i + 1) .ColumnCount = 5 .List = Worksheets("商品マスタ").Range("車いすテーブル").Value End With ElseIf UserForm4.Controls("ComboBox" & i).Value = "車いす付属品" Then With UserForm4.Controls("ComboBox" & i + 1) .ColumnCount = 5 .List = Worksheets("商品マスタ").Range("車いす付属品テーブル").Value End With ElseIf UserForm4.Controls("ComboBox" & i).Value = "特殊寝台" Then With UserForm4.Controls("ComboBox" & i + 1) .ColumnCount = 5 .List = Worksheets("商品マスタ").Range("特殊寝台テーブル").Value End With End If Next End Sub
ユーザーフォームに入力したデーターが転記できない

いつもお世話になります。 Windows7 excell2010 です。いろんなものに勉強してここまでに作成したユーザーフォームですが、データーは入力できるのですがコマンドボタンをクリックしても各セルに反映されません。色々と試行錯誤していますがうまくゆきません。どこに不具合があるかわからず恐れ入りますがどなたかご指導いただけませんか。参考にコードは参考に下記にします。ユーザフォームのVBAは下記ですコード ※Module1 Sub 売上() Do UserForm1.Show Loop End Sub Sub 入金() Do UserForm2.Show Loop End Sub ※UserForm1 Private Sub UserForm_Initialize() With ComboBox1 .AddItem "1" .AddItem "2" .AddItem "3" End With End Sub Private Sub CommandButton1_Click() n = Cells(Rows.Count, 1).End(xlUp).Row + 1 Cells(n, 2) = UserForm1.TextBox1.Text Cells(n, 3) = UserForm1.TextBox2.Text Cells(n, 4) = UserForm1.TextBox3.Text Cells(n, 11) = UserForm1.ComboBox1.Text Unload Me End Sub Private Sub CommandButton2_Click() Unload Me End End Sub ※UserForm2 Private Sub CommandButton1_Click() n = Cells(Rows.Count, 1).End(xlUp).Row + 1 Cells(n, 2) = UserForm2.TextBox1.Text Cells(n, 3) = UserForm2.TextBox2.Text Cells(n, 4) = UserForm2.TextBox3.Text Unload Me End Sub Private Sub CommandButton2_Click() Unload Me End End Sub
ListBoxに値を追加していくには。

Private Sub CommandButton31_Click() ListBox12.ColumnCount = 5 ListBox12.ColumnWidths = "4.0cm;4.0cm;2.0cm;3.0cm;2.0cm" End Sub Private Sub TextBox175_Change() SetList End Sub Private Sub TextBox176_Change() SetList End Sub Private Sub TextBox177_Change() SetList End Sub Private Sub TextBox178_Change() SetList End Sub Private Sub TextBox179_Change() SetList End Sub Private Sub SetList() ListBox12.Clear ListBox12.AddItem TextBox175.Text ListBox12.List(0, 1) = TextBox176.Text ListBox12.List(0, 2) = TextBox177.Text ListBox12.List(0, 3) = TextBox178.Text ListBox12.List(0, 4) = TextBox179.Text End Sub ここで、TextBox175~179の値をコマンドボタン1を押す度、 ListBox12の最終行の直下に挿入されていくようにしたいです。列はそのままです。 1行目 (0,1),(0,2),(0,3),(0,4) 2行目 (1,1),(1,2),(1,3),(1,4) 3行目 (2,1),(2,2),(2,3),(2,4) どのようにやればいいでしょうか。
エクセルVBAについて教えてください

エクセル2003です。 Sｈeet1　　　　A　　　　B　　　C　　　　　D 1　種類1　商品1 商品A　　商品あ 2　種類2　商品2　商品B　　商品い 3　種類3　商品3　商品C　　商品う　 4　　　　　商品4　商品D　　商品え 5　商品5　商品E　　商品お Sｈeet2 　　AB CDF　　　　　G　　　　H　　　　　I 1　　　　　　　　　種類表示　　　　　商品表示　 2　　　　　　　　　種類表示　　　　　商品表示　 3　　　　　　　　　種類表示　　　　　商品表示　 4　　　　　　　　　種類表示　　　　　商品表示　 5　　　　　　　　　種類表示　　　　　商品表示　 *Sheet2のG1をダブルクリックでSheet1のA列をユーザーフォームのコンボボックス1にてセルに表示　の上挿入 *コンボ1の選択によりコンボ2（Ｓｈｅｅｔ2のＩ1をダブルクリック）の表示を変更する *コンボ1　種類1　→　コンボ2　Ｓｈｅｅｔ1のＢ列を表示の上セルに挿入 *コンボ1　種類2　→　コンボ2　Ｓｈｅｅｔ1のＣ列を表示の上セルに挿入 *コンボ1　種類3　→　コンボ2　Ｓｈｅｅｔ1のＤ列を表示の上セルに挿入までは、出来きたのですが、Ｓｈｅｅｔ2の2行目以降も同作業をしたいのですが、、、 Offset等を使用するのでしょうか？あまりわかっていないので詳しく教えて頂ければ幸いですコードＳｈｅｅｔ2のコード Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Cancel = True With Target If .Address = "$F$1" Then UserForm1.Show ElseIf .Address = "$H$1" Then Dim k As Long, myFlg As Boolean, myArray myArray = Array("種類1", "種類2", "種類3") myFlg = False For k = 0 To UBound(myArray) If Range("F1") = myArray(k) Then myFlg = True End If Next k If myFlg = False Or Range("F1") = "" Then MsgBox "種類を選択して", vbOKOnly Range("F1").Select Exit Sub End If UserForm2.Show End If End With End Sub ユーザーフォーム1のコード Private Sub UserForm_Initialize() ComboBox1.RowSource = "sHEET1!A1:A3" End Sub コンボ1のコード Private Sub ComboBox1_Change() Worksheets("Sheet2").Range("F1") = UserForm1.ComboBox1.Text Worksheets("Sheet2").Range("H1") = "" Unload Me End Sub ユーザーフォーム2のコード Private Sub UserForm_Initialize() With UserForm2.ComboBox1 Select Case Worksheets("Sheet2").Range("F1") Case "種類1" .RowSource = "Sheet1!B1:B5" Case "種類2" .RowSource = "Sheet1!C1:C5" Case "種類3" .RowSource = "Sheet1!D2:D5" End Select End With End Sub コンボ2のコード Private Sub ComboBox1_Change() Worksheets("Sheet2").Range("H1") = UserForm2.ComboBox1.Text Unload Me End SuｂこのコードをいじくってＳｈｅｅｔ2以降も同作業できるようにお願いします

Private Sub UserForm_Initialize()の使い方とは？

hhhhhhh

みんなの回答

関連するQ&A

VBA ユーザーフォームのコードについて

Private Sub UserForm_Init

コンボボックスのクリア方法について教えて下さい（vb6.5）

スマホは修理できる？画面割れ・バッテリー交換・自作の限界

ＶＢＡでオプションボタン変更によって・・・

同じコンボボックスを二つ以上作る方法

VBAコンボボックスの内容が反映されない

ＶＢＡ初心者です。

ComboBox1_Changeについて

エクセルのマクロ　コンボボックス他について

Excel　コンボボックス2つ以上の時のコード

エクセルVBA　ユーザーフォームのリストボックス

エクセル　複数のComboBoxの連携

コンボボックスにリストが表示されません・・・

ExcelVBA初歩的な質問

エクセルVBA

エクセル　VBA　ID入力について

連携する複数のコンボボックスに同じリストを設定

ユーザーフォームに入力したデーターが転記できない

ListBoxに値を追加していくには。

エクセルVBAについて教えてください

注目のQ&A

カテゴリ
一覧

専門家に質問してみよう
専門家登録

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

Private Sub UserForm_Initialize()の使い方とは？

hhhhhhh

みんなの回答

関連するQ&A

VBA ユーザーフォームのコードについて

Private Sub UserForm_Init

コンボボックスのクリア方法について教えて下さい（vb6.5）

スマホは修理できる？画面割れ・バッテリー交換・自作の限界

ＶＢＡでオプションボタン変更によって・・・

同じコンボボックスを二つ以上作る方法

VBAコンボボックスの内容が反映されない

ＶＢＡ初心者です。

ComboBox1_Changeについて

エクセルのマクロ コンボボックス他について

Excel コンボボックス2つ以上の時のコード

エクセルVBA ユーザーフォームのリストボックス

エクセル 複数のComboBoxの連携

コンボボックスにリストが表示されません・・・

ExcelVBA初歩的な質問

エクセルVBA

エクセル VBA ID入力について

連携する複数のコンボボックスに同じリストを設定

ユーザーフォームに入力したデーターが転記できない

ListBoxに値を追加していくには。

エクセルVBAについて教えてください

注目のQ&A

カテゴリ 一覧

専門家に質問してみよう 専門家登録

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

エクセルのマクロ　コンボボックス他について

Excel　コンボボックス2つ以上の時のコード

エクセルVBA　ユーザーフォームのリストボックス

エクセル　複数のComboBoxの連携

エクセル　VBA　ID入力について

カテゴリ
一覧

専門家に質問してみよう
専門家登録