VBA ユーザーフォーム コンボボックスの作成方法を解説

#VBA #ユーザーフォーム #コンボボックス #UserForm #画面設計 習得必須！ユーザーフォームに必要不可欠な重要コントロール、 「コンボボックス」作成手順を解説して参ります。 動画をご覧いただきありがとうございます。 毎週(金)夜９時に定期配信しています！ 〜タイムスタンプ〜 00:00　オープニング 00:42　ご挨拶,本日の動画説明(【必修】VBAユーザーフォーム 画面設計(4/8)コンボボックス) 00:54　前回までの復習と、今回の内容 01:18　実演デモの前の説明【独立型】【連動型】 02:26　補足①コンボボックスの特徴 02:59　補足②留意点 04:04　補足③メリット 05:12　補足④活用シーン(絞り込み選択) 05:54　受注書確認 06:32　今回の【独立型】説明 07:17　可読性UPのポイント 07:37　【独立型】イメージ図 08:10　UF05作成開始 　　　 (4)ComboBox入力可否 　　　 (5)ComboBox幅 11:20　～セルネッツ流～準備済みひな型使用 12:33　98の最終行が取れているか確認 12:21　コンボボックス作成 16:04　順番にプログラムソース確認 18:12　実演デモ①確認と追記 19:45　(5)ComboBoxの幅作成 22:23　本日のプログラムソース確認 24:12　今後のゴール 24:39　本日のまとめ 26:26　エンディング [業務効率化チャンネルとは？] Excel業務効率化を目的としたVBA活用に関する役立つ情報を配信 ✅業務効率化ご相談（企業・法人の方はこちら） https://www.cellnets.co.jp/lp/ 1-1.ExcelVBA業務システム開発 1-2.はじめてのシステム導入アドバイス 1-3.現行Excel運用の無料診断 ✅タケモ塾［ExcelVBA学習サイト] https://www.cellnets.co.jp/takemojuku/ 2-1.VBAスキルアップ支援 2-2.システム開発や設計アドバイス（入門） 2-3.既存マクロの改修アドバイス ◆解説した内容まとめ ------↓ここから 1．まずは、シート内データをBuffer格納しましょう。 　これを使えば、処理の遅い［セル操作］ではなく［メモリ操作］なので高速です。 　しかも、たった一度だけ格納すればいつでも行列概念で活用できるので、是非マスターしましょう。 　 P_98Fin行 = O_98.Cells(O_98.Rows.Count, 1).End(xlUp).Row P_98Fin列n = O_98.Cells(1, O_98.Columns.Count).End(xlToLeft).Column 'Fin列基点で左へ P_98Buf範囲 = O_98.Range(O_98.Cells(1, 1), O_98.Cells(P_98Fin行, P_98Fin列n)) 2．Sub UF05設定_04CombmoBox入力可否() cmbセミナー名.Style = fmStyleDropDownList cmbセミナー名.Clear For i = 2 To P_98Fin行 cmbセミナー名.AddItem P_98Buf範囲(i, 2) & ":" & P_98Buf範囲(i, 3) Next i cmbセミナー名.ListIndex = 0 End Sub 3．Sub UF05設定_05ComboBox幅() cmbセミナー名.ListRows = 12 cmbセミナー名.ListWidth = 156 '★横幅 cmbセミナー名.ColumnWidths = 156 End Sub  （まとめ） 　　・必ず、クリアしてからAddItem 　　・先頭データから表示（INDEXレコード番号を0） 　　・選択肢はプログラムで記述しない 　　（固定ではなく、可変で設計する） 　　・原則、コード管理（表記ゆれによる不具合を防止） 　　・幅や行数などきちんと定義する ------↑ここまで ✅株式会社セルネッツ https://www.cellnets.co.jp/ ◆システム開発方針 ～ 可読性を重視 ～ セルネッツの事業は、Excel業務の効率化支援サービスです。 「ExcelVBA」は、そんな課題解決の手法のひとつであり、 プログラム開発方針では、「可読性（コードの読みやすさ）」を重視しています。 その理由は、お客様の実務に、3つの共通点があるためです。 1．システム開発に「改修」はつきもの（第三者改修） 2．VBAと基幹系データベースの直接データ連携は、ほぼ皆無 3．問題の本質は、Excel業務の運用方法にある ◆低コスト＆高品質サービスを提供するために必要なこと システム開発料金は、 技術料もさることながら「発生工数(時間数)」ベースで積算されるもの。 そのため、工数低減はサービス向上のために必要不可欠となります。 高度なプログラミング技術に依存した場合、それに比例しコスト増を招いてしまいますが、 シンプルに書かれたソースコードは、ベテランエンジニアにとっても解読が容易であり、 この記述スキルこそ「価値の高い技術」と考えます。 さらに、ご依頼元のお客様が、日常的にExcelやVBAを駆使している背景から、 「事務系VBA初心者」でも読みやすいコードを提供できるスキルが求められます。 システム導入コストの低減を目指し、弊社は何より「可読性」を重視します。 ◆動画をご覧いただきたい対象者 （1）はじめてシステム発注する方 右も左もわからない！システム導入で失敗したくない！ そんな方のご不安を解消するために必要なシステム導入の留意点などをご紹介 （2）「ひとりエクセルVBAプロジェクト」に取り組む方 社内では、独学でVBAを習得に取り組むものの、独学の限界に直面して困っている方。 「設計」、「品質保証」、「上流工程」、「デバッグ」、「テスト検証」について、 解説します。 ◆プロフィール 竹本 一道（たけもと　かずみち） 株式会社セルネッツ　代表取締役 ◆セルネッツ起業までの経歴 ↓業務システム開発実績（開発言語） ホテルニューオータニ（売掛買掛金管理システム）、 日本IBM（販売管理システム）、DCカード（会員管理システム）、 日本旅行（ツアー工程管理システム）、東京電力（図書管理システム）、ほか多数 「BASIC、COBOL（HITAC）、RPGIII（AS/400）、MAPPER、C#、ほか」 COBOL/RPG/MAPPER言語を中心に10年間にわたり汎用系業務システム開発に従事。 その後、ソフトウェアメーカーでのマーケティング業務や、 製造業での業務改善プロジェクト推進リーダーを経験。 基幹システムにおいて、わずかな修正が10万円！！との現実に驚きをかくせず、 Excelマクロ開発のメリットに着目し、「餅は餅屋」、得意分野を得意なツールに任せることで、 圧倒的コストパフォーマンスを得られた体験から、 2007年「業務効率化は最も身近なExcel業務から」をコンセプトにセルネッツを設立（杉並区）。 ◆講演／セミナー ・はじめての業務システム導入（セミナ―） 　～ 失敗から学ぶ！システム導入成功のコツ ～ ・小さな会社の業務改善（講演） 　～ 業務効率化は、最も身近なExcel 業務から ～ ◆セルネッツ事業サービス内容 （1）ExcelVBAツール開発 （2）VBAインハウス支援（開発内製化サポート） （3）VBAスキルアップ研修 最近は、システム導入セカンドオピニオンもやってます！ インハウスVBAとは、VBA開発を外注するのではなく自社内で行うことです。 主に5つの内容をご支援しております。 　1. VBA既存マクロ保守サポート 　2. VBA設計アドバイス 　3. VBA改善提案アドバイス 　4. VBA部分Module提供 　5. VBA添削チェック ◆小冊子プレゼント「システム開発には100万円も払いたくないという社長の教科書」 （1）製本版プレゼント応募フォーム 　https://www.cellnets.co.jp/present-ss01 （2）ＰＤＦ版の資料請求フォーム 　https://www.cellnets.co.jp/request 　[1] 小冊子ＰＤＦ版ダウンロード 　[2] VBA開発の価格リスト 　[3] 業務システム導入事例集 ◆ご質問、ご要望など メールでのお問い合わせはこちら！ 株式会社セルネッツ ｢YouTubeチーム｣ 東京都杉並区高井戸東3-7-2 ピケビル3F 電話：03-5941-9130　（月～金／ 9：00 ～ 18：00） Ｅメール: [email protected]