マガジンのカバー画像

マクロ実践編

5
本
仕事で使いたいときにすぐコピーして使えるようにメモ代わりに書いています。
運営しているクリエイター
三輪

#VBA

三輪

三輪

【マクロ実践編５】数式セルに保護をかける

【マクロ実践編５】数式セルに保護をかける

数式を消されないように数式が入ったセルのみ保護をかける。

Worksheets("シート名").Unprotect
Cells.Locked = False
Worksheets("シート名").UsedRange.SpecialCells(xlCellTypeFormulas).Locked = True

もっとみる
三輪

三輪

【マクロ実践編４】フォルダ内のファイルを書きだす

【マクロ実践編４】フォルダ内のファイルを書きだす

【マクロ実践編３】の考え方

指定フォルダに入っているファイルをA列に全て書込む Dim cnt As Long
Dim fs As New Scripting.FileSystemObject
Dim basefolder As Scripting.Folder
Dim tarPath As String
　tarPath = ThisWorkbook.Path
S

もっとみる
三輪

三輪

【マクロ実践編３】指定の文字を含むファイルを検索する

【マクロ実践編３】指定の文字を含むファイルを検索する

【マクロ実践編１】の処理の部分に適用できる

A列に指定の文字が入力されているとき、その右のセルB列に指定の文字を含んだファイル名を書込む

◆Point
Likeの書き方とflgを立ててファイルが見つかったらfor文から抜けること

For i = 2 To maxRow
　flg = False
　For Each mysubfile In mysubfiles
　　If mysubfile.

もっとみる