中級者向けVBA課題 No.7 （じゃんけんゲーム）
概要
今回はExcelVBAによるゲームの構築問題
↓課題内容
中級者向けVBA課題 No.7
— いき As Variant (@aero_iki) 2023年7月24日
動画のようなジャンケンゲームを作りなさい」
#VBA実装術 #SoftexCelwear https://t.co/lRw75I8scO pic.twitter.com/sZZV3AWDIq
じゃんけんゲームはプログラミングの課題としてよく出題されるやつですが、今回の課題はよりリアルさを追求したもの。
実装のポイント
下記項目をクリアすれば同じようなものが作れます。
詳細はググるなり、今時なら生成AIに聞けば答えが出てくるので詳細の解説は行いません。
- 数字と変換後の表の情報取得
- 数字から自動的に変換されるセルの範囲設定
- 数字の入力を判定して自動変換（セルの値のChangeイベント）
- 「全部合格」と「初期化」ボタンの追加
コード
頂いた回答
今回も回答をいただきました。毎度ありがとうございます！
課題は意識せず自分なりにジャンケンゲーム作りました
— のるあ_遊VBA (@c2f9e84acc3b446) 2023年7月25日
簡単なのでVBA遊びデビューのネタにいいかもです！#VBA #ゲーム https://t.co/hsRi8SuRl1 pic.twitter.com/7VZN2ChiSa
前回課題
次回課題
PR
ExcelVBAでのツール開発を承っております。（対応実績350件以上 2023.8月）
お気軽にご相談ください。
中級者向けVBA課題 No.6 （テンキー操作だけで値入力）
概要
今回も「実装出来たら便利！」って問題
↓課題内容
中級者向けVBA課題 No.6
— いき As Variant (@aero_iki) 2023年7月20日
「動画のような入力システムを構築しなさい」
#VBA実装術 #SoftexCelwear https://t.co/lRw75I8scO pic.twitter.com/lfHW0nuWbQ
特定の数字を入力すると、瞬時に対応した変換文字列にセルの値が変換される
効率的な入力システムはいろいろ考案したが、現場で実装した中では最速の入力システム。テンキー操作だけで入力ができるようになるのがポイント。
実装のポイント
下記項目をクリアすれば同じようなものが作れます。
詳細はググるなり、今時なら生成AIに聞けば答えが出てくるので詳細の解説は行いません。
- 数字と変換後の表の情報取得
- 数字から自動的に変換されるセルの範囲設定
- 数字の入力を判定して自動変換（セルの値のChangeイベント）
- 「全部合格」と「初期化」ボタンの追加
コード
頂いた回答
今回はまだ回答をいただいておりません。
自ら試行錯誤した経験が自分の価値につながります！みんな頑張ってね！
前回課題
次回課題
PR
ExcelVBAでのツール開発を承っております。（対応実績350件以上 2023.8月）
お気軽にご相談ください。
中級者向けVBA課題 No.5 （セル値に応じた条件付き書式の一発設定）
概要
今回も「実装出来たら便利！」って問題
↓課題内容
中級者向けVBA課題 No.5
— いき As Variant (@aero_iki) 2023年7月18日
「動画のように条件付き書式を設定するマクロを構築しなさい。マクロ登録はリボンでもボタンでも構いません。」
#VBA実装術 #SoftexCelwear https://t.co/lRw75I8scO pic.twitter.com/pGN4Mahv6m
普段、開発用リボンに登録して使用しているマクロ。
リボンにマクロを登録するにはマクロをxlamに記述して、リボンで右クリック「リボンのユーザー設定」から登録できます。
セル値とセルの塗潰色をもとに、特定範囲の条件付き書式を半自動設定する
VBAでの開発処理の効率化につながる。
実装のポイント
下記項目をクリアすれば同じようなものが作れます。
詳細はググるなり、今時なら生成AIに聞けば答えが出てくるので詳細の解説は行いません。
- 選択範囲のセル範囲取得（Selection）
- ユーザーに対象のセル範囲を選択させる処理（Application.InputBox）
- セルに条件付き書式を設定する（RangeオブジェクトのFormatConditonプロパティ）
コード
実際にリボンに登録しているマクロのコードです。
SetFormatConditionValueColor · GitHub
頂いた回答
今回も回答をいただきました。毎度ありがとうございます！
今回もやってみました！
— のるあ_遊VBA (@c2f9e84acc3b446) 2023年7月19日
仕事とかでVBAやる人には、アイデアの勉強にもなるんじゃないですかね
知らないですが…#VBA https://t.co/vmlrlGnprh pic.twitter.com/SAmLg3qWl8
遅くなったけど、チャレンジ！
— 人妻チー牛 (@kota2hiz) 2023年7月20日
changeイベントで色選べる様にしたから、ついでに条件付き書式のマクロも入れても良かったか😕?
それはそうと、リボンタブのカスタマイズが美しい… https://t.co/vRJiRuI0xd pic.twitter.com/1yISbRpKKf
前回課題
次回課題
PR
ExcelVBAでのツール開発を承っております。（対応実績350件以上 2023.8月）
お気軽にご相談ください。
VBA開発事例紹介 No.1 (フロント、清掃スタッフのシフト表自動作成)
概要
最近対応した開発事例を紹介
今回は「フロント、清掃スタッフのシフト表の自動化」
簡単なシフト表自動作成の実装例
— いき As Variant (@aero_iki) 2023年7月19日
価格は5万～#VBAhttps://t.co/UTOEMrEhDL pic.twitter.com/TvzHwsPHJe
- スタッフが「フロント」「清掃」で担当が決まっている
- 1か月の最大出勤日数、何日に1回は出勤などの条件あり
- 事前に各スタッフで希望休を設定できる
- 希望休の入力はダブルクリックやコマンドボタンからの入力で簡単操作
- 1～3の条件を満足するようにシフト表を作成する。通常は毎回同じ。ランダムは毎回ランダムに出力する。出力時間はストレスの少ない範囲で1,2秒以内で行うこと。
- 出力されたシフト表から勤務表へと変換する
価格
対応した金額は約5万円
ちなみに実装には2時間程度で可能
念のためツイートの後に市場調査を行った結果がこちら。
考察に至るには母数が少ないので、「あくまで参考に」ですね。
ちなみに、この程度の実装なら2時間程度で可能。
— いき As Variant (@aero_iki) 2023年7月19日
だから低価格でも十分黒字なのよね。
ちなみに、巷のベンダーで同様のツールを開発しようとしたらどのくらいの価格だろうか？
PR
今回のような開発のご依頼はこちらから
中級者向けVBA課題 No.4 （ボタンからセル入力）
概要
今回は「実装出来たら便利！」って問題
第3回までより難易度をぐっと下げてみました。
↓課題内容
中級者向けVBA課題 No.4
— いき As Variant (@aero_iki) 2023年7月16日
「動画のような入力システムを構築しなさい。各ボタンに登録してあるマクロは同じものとします。」#VBA実装術 #SoftexCelwearhttps://t.co/lRw75I7Ung pic.twitter.com/ddZIoYyAPT
この実装が出来れば、キーボード入力やドロップダウンリストからの入力よりもさらに効率的に作業ができるようになる場面が出てきます。
実装のポイント
下記項目をクリアすれば同じようなものが作れます。
詳細はググるなり、今時なら生成AIに聞けば答えが出てくるので詳細の解説は行いません。
- シート上のコマンドボタンを押すと、そのコマンドボタンのテキスト文字が選択セルへ入力される（コマンドボタンのプロパティから情報取得）
- コマンドボタンに登録されるマクロは同じものとする。
- 押されたコマンドボタンをマクロ内で特定が必要（Application.Callerを利用）
- 入力される範囲は限定されるようにする（Intersect関数を利用）
- 複数セルが選択されている場合はそのセル範囲全体に値入力（For～EachもしくはRangeオブジェクトのValueプロパティ）
コード
休、有、朝、昼、夜に登録されているマクロのコードのリンクです。
自分用の汎用プロシージャを流用しているため処理は冗長になっておりますが、実際に実装時に記述したのは「S_ボタンから入力」「Get__入力範囲」のみです。
頂いた回答
今回も回答をいただきました。毎度ありがとうございます！
タイマーストップ：約13分。罫線の設定の短縮技を知らな過ぎて時間がかかる。#VBA実装術 #SoftexCelwear https://t.co/OGcQBeYBFa pic.twitter.com/0prnF0VpdG
— たーぼー（インコ） (@fenblen_puyo) 2023年7月16日
できたー！特定の選択範囲内に文字を出力するアイデア最高すぎる！
— 人妻チー牛 (@kota2hiz) 2023年7月17日
それと、罫線マクロは今後絶対使っていこう…超便利😌 https://t.co/YHKBNw7ruK pic.twitter.com/WMiasoMEQD
遅ればせながらやりました！
— のるあ_遊VBA (@c2f9e84acc3b446) 2023年7月17日
プロシージャの中身は５行ぐらいで書ける内容ですね#VBA https://t.co/AfsoR1kZnG pic.twitter.com/ekXOxK5WHH
前回課題
次回課題
PR
ExcelVBAでのツール開発を承っております。（対応実績350件以上 2023.8月）
お気軽にご相談ください。
中級者向けVBA課題 No.3 （百マス計算ゲーム）
概要
今回は百マス計算ゲームの構築が課題
小学生の算数の勉強用にもってこいですね。
↓課題内容
中級者向けVBA課題 No.3
— いき As Variant (@aero_iki) 2023年7月14日
「動画のようなゲームを作成しなさい。」#VBA実装術 #SoftexCelwear pic.twitter.com/wLEm1IC7vK
実装のポイント
下記項目をクリアすれば同じようなものが作れます。
詳細はググるなり、今時なら生成AIに聞けば答えが出てくるので詳細の解説は行いません。
- プレーヤーの名前入力（InputBox）
- スタートまでのカウントボタンのユーザーフォーム
- カウントダウン終了と同時に問題表示と、入力マスの左上選択
- 制限時間（180秒）のタイマー表示のユーザーフォーム
- 縦横の数字０～９を重複なくランダムに表示
- 入力マスで一番下の行を入力すると次の列の一番上の行へ自動的に選択セル移動（イベント機能）
- 回答チェックで正解、間違いを着色（条件付き書式）
- ランキングの登録と順位表示
コード
VBAコードを載せておきます。
頂いた回答
今回も回答をいただきました。毎度ありがとうございます！
タイマー実装した時点で満足してしまったので手抜きです。足し算にしました。最初２桁+２桁にしてたら時間切れになりました。 https://t.co/mzMvxEL34j pic.twitter.com/XcACCZIfDG
— たーぼー（インコ） (@fenblen_puyo) 2023年7月14日
何とか…実装できた（白目）合ってるかもはやわからない笑
— 人妻チー牛 (@kota2hiz) 2023年7月14日
ミリ秒の計算と変換が出来ずに3時間くらい詰んでた
なんでこんな問題作れるんや… https://t.co/maZe7qIqQE pic.twitter.com/toODA2zQ0q
空き時間にささっと作りましたー
— のるあ_遊VBA (@c2f9e84acc3b446) 2023年7月16日
(いろいろはしょってます)
前回の課題と比べて難易度抑えられてると思います https://t.co/e7DLH8IFm3 pic.twitter.com/wExjWgbE52
できました～
— えの (@KUenoSO_) 2023年7月27日
計算が苦手なので掛け算にもマクロ使っています（笑） pic.twitter.com/HxGRf0zHV4
前回課題
次回課題
PR
ExcelVBAでのツール開発を承っております。（対応実績350件以上 2023.8月）
お気軽にご相談ください。
中級者向けVBA課題 No.2 （ユーザーフォーム入力システム）
概要
前回の課題の続き
↓課題内容
中級者向けVBA課題（昨日の続き）
— いき As Variant (@aero_iki) 2023年7月13日
「動画のような入力システムを構築しなさい。」#VBA https://t.co/BctcpCaExl pic.twitter.com/Roe0MOVdyP
次は選択入力ユーザーフォームのコマンドボタンに元の一覧（B3セル以下）のセル塗潰色を反映させる処理。
より直感的に操作できるUIを構築する訓練ですね。
セルの塗潰色をコマンドボタンの背景色に反映する部分を実装するだけですが、この一工夫でさらに使いやすくなります。
頂いた回答
今回も回答をいただきました。毎度ありがとうございます！
うい！ https://t.co/Njv3zOBX4j pic.twitter.com/daKQ7V9PbS
— たーぼー（インコ） (@fenblen_puyo) 2023年7月13日
こっちもできた（と思う）！！いやぁ…発想がすごいや…。こういうアイデアが沢山出てくるから、プログラマーさんってカッコ良いんよなぁ。 https://t.co/iq0V6NkykW pic.twitter.com/QsNHdf6SZZ
— 人妻チー牛 (@kota2hiz) 2023年7月14日
前回課題
次回課題
PR
ExcelVBAでのツール開発を承っております。（対応実績350件以上 2023.8月）
お気軽にご相談ください。
