vba
設定シートの情報で繰り返しブックを開き値編集しつつ新規ブック作成するひな形 Excelの新規ブックを開き、リボンの「開発 > Visual Basic」を開いて開発モジュールを挿入し以下のソースを張り付ける。 以下のソース内に記載しているが新規ブックのシート内…
With句を使うと以下のように可読性をあげることができる。 また、毎回オブジェクトの参照がなくなる(?)ためか多少の速度改善も見込める。 繰り返し処理が多い場合や少しでもコーディング量が多くなる場合には積極的に使っていきたい。 'With句 '以下のよ…
'''''''''''''''''''''''''''''''''''''''''' ' 現在のブックに読み取り専用推奨するオプションをつける '''''''''''''''''''''''''''''''''''''''''' Sub addReadOnlyOption() rc = MsgBox(ActiveWorkbook.name & "に読み取り専用を推奨するオプションをつ…
'ファイル属性値の一覧 '0 :標準ファイル '1 :読み取り専用ファイル '2 :隠しファイル '4 :システムファイル '8 :ディスクドライブボリュームファイル '16 :ファルダ/ディレクトリ '32 :アーカイブファイル '64 :リンク/ショートカット '128:圧縮フ…
久しぶりにExcelVBAと戯れているのでメモレベルでかきかき。 '''''''''''''''''''''''''''''''''''''''''' ' 現在のブックを読み取り専用で開き直す '''''''''''''''''''''''''''''''''''''''''' Sub readOnlyOpen_NoSave() rc = MsgBox(ActiveWorkbook.name…