>>546
そりゃWithもないのに
> .Rows(r).EntireRow
なんてされてもExcelは困っちゃうわな

ルーチン名はDelete_Rowsなのに変数名はDereteRowとか、wsは何に使うつもりなのかとか色々指摘したいところがありまくり