Excel / Excel VBA メモ

■べんりなソース

・最後の行を取得

ThisWorkbook.ActiveSheet.Cells(1, 1).SpecialCells(xlLastCell).Row

・右クリックメニュー追加

参考: Office TANAKA - Excel VBA Tips[右クリックメニューに追加]

Application.CommandBars("Cell").Controls.Add()

・右クリックメニューリセット

参考: EXCEL備忘録「右クリックメニューのリセット」 - エクセル

下記ソースを貼り付けてF5(実行)、またはなにかのトリガーで呼び出させるとか。

Sub method()
    Application.CommandBars("Cell").Reset
End Sub

・UserFormを変数化

参考: Office TANAKA - Excel VBA Tips[UserFormを変数で操作する]

UserForms.Add("フォーム名").Show

→フォームを開いたり、開く処理をメニューに追加したりするModuel

　UserFormManageModule.bas - Google ドライブ

・UserFormの各項目の変数化

参考: ExcelVBAでコントロールオブジェクト（TextBoxとか）を変数制御する *Ateitexe

・UserFormの[？]ボタン

参考: ■Excel2003-[ユーザフォーム]-タイトルバーにヘルプ[？]を表... - Yahoo!知恵袋

・条件付き書式で反映された書式を取得する、DisplayFormat

Range("A1").DisplayFormat.Interior.Color

参考: 条件付き書式で変わったセルの背景色をマクロで取得する - Qiita

■作成したマクロ

条件付き書式設定ツール.xlsm - Google ドライブ

計算ツール.xlsm - Google ドライブ

アドイン_Excelシート名一括変更.xlam - Google ドライブ

アドイン_罫線ひきやつ_v1.2.xlam - Google ドライブ

■ブック名を関数のみで取得

=MID(CELL("filename",A1),FIND("[",CELL("filename",A1))+1,FIND("]",CELL("filename",A1))-FIND("[",CELL("filename",A1))-1)

ここから：ファイル名・ワークブック名をセルに表示−CELL関数・FIND関数・MID関数:Excel(エクセル)の関数・数式の使い方-文字列