2列目でフィルターをかけて、"佐藤"を抽出。 見出し行以外を削除する。(行を一行下にずらす) フィルターを解除する。 With Range("A1").CurrentRegion .AutoFilter field:=2, Criteria1:="佐藤" .Offset(1, 0).EntireRow.Delete .AutoFilter End With with…
引用をストックしました
引用するにはまずログインしてください
引用をストックできませんでした。再度お試しください
限定公開記事のため引用できません。