ユーザーフォーム前回、システムの棚卸機能を作成しました。この記事では、メニュー画面にサイズ調整機能を追加していきます。調整範囲VBA在庫管理システムVer01フォームのサイズ調整このシステムの各画面は、ディスプレイの表示高さの90%の割合で表示されるように初期設定してあります。Subまた、各ユーザーフォームのInitiarizeプロシージャに、Zoomプロパティを使用し、サイズ調整のコードを入れてあります。Subパブリック変数の高さ割合に、任意の割合を入力できるようにして、画面の表示サイズをユーザーが設定できるようにしていきます。画面作成メニュー画面にサイズ調整用のコントロールを追加します。ツールボックスでラベル・テキストボックス・スピンボタンを選択し、frmMenuのヘッダー内でドラッグして追加し、書式設定を利用しながら、見た目を整えます。各オブジェクトの配置は、横配置は配置図を参考に、縦配置はlblHeaderを基準に上下中央合わせし設定します。fmBackStyleTransparent)に設定します。高さ割合を表示させます。Subスピンボタンで、表示された高さ割合を変動させます。変動動作は、変動幅を0.05とし、1.00〜0.70までの範囲とします。Subラベルのクリックで、サイズ調整を実行させます。通常では、サイズ調整は、若干のオブジェクトずれ程度で拡大・縮小されます。サイズ感が分かる様に、背景に全画面表示したエクセルシートをおいています。70%PCの環境によっては、サイズ調整により、画面崩れが発生する場合がありますので注意が必要です。使用環境で動作確認し、微調整が必要となります。70%画面端部のズレなどは、オブジェクトサイズを微調整すれば解消する場合がありますが、オブジェクト内のキャプションの文字ズレが発生した場合は、修正は難しくなります。対応としては、サイズの調整範囲を文字ズレが許容できそうな範囲に変えるか、サイズ調整機能自体をやめるか、といったところです。ユーザーフォームの初期サイズやワイド画面への対応を工夫するといいかもしれません。メニュー画面のサイズ調整機能ができました。次回は、システムの配布用にメニュー画面に追加機能を作成し、システムを完成させます。reserved.引用をストックしましたストック一覧を見る閉じる引用するにはまずログインしてくださいログイン閉じる引用をストックできませんでした。再度お試しください閉じる限定公開記事のため引用できません。