VBA 指定した区間の差を取得

1-10,11-20,21-末で区間を区切って、区間の差を取得する。

 

VBA 選択範囲拡張ショートカット

特定のセルを選択した状態で実行すると、指定した列幅まで選択範囲を拡張する。事務処理で頻繁に目視チェック→塗りつぶしの作業があったため。

開発>マクロ>オプション>test>Ctrl+E
(重複しないショートカットを設定)

VBA 選択した複数シートからコピー

複数のシートを選択している状態なので、リボン(メニューバー)にボタンを追加

 

VBA Access SQL一括処理

Excelのシート上に保存してあるデータを関数などでSQL化し、一括でAccessに流し込む必要があったので。

 

VBA ATPVBAEN.XLA

古いエクセルファイルを動かしたら、
Application.Run(“ATPVBAEN.XLA!COMPLEX”, r, q)
の部分でエラーがでた。

XLAMに直せば動かくかと思ったら、駄目だったので、
Application.WorksheetFunction.Complex(r, q)
このように書き換えたら動いた。

 

VBA 販売管理

Excelで販売管理を作成してみた。

UserForm1

出荷予定表

請求期間

請求書

設定

納品書

 

VBA 請求期間を計算

マスタの締日、現在の日付から請求期間、支払予定日を計算。

 

VBA モジュールエクスポート

 

VBA 印刷設定(すべての列を1ページ)

 

VBA 選択範囲の行を一意に取得