Sub 指定した列の値を置換() '行と列をi,jにして複数範囲を置換しようとしたが、 'エラー「型が違う」とか出て無理だったので '列を指定してみたら上手く置換した。 '以下、「男」を「空欄」へ置換する。（値を削除） For i = 1 To 30 If ActiveSheet.Cells(…

構文 Replace(Expression, Find, Replace, Start, Count, Compare)以下の引数３つは省略不可 Expression Find Replace

セルA6を「1行×3列」に変更するには Range("A6").Resize(1, 3) となります。