今回は、可視セルのみを取得するSpecialCells(xlCellTypeVisible)メソッド使用時のバグと、バクの回避方法について考えてみたいと思います。 VBA界では有名?なのかどうか分かりませんが、非表示の行または列がシート内に1以上ある状態で、単一セル対してSpecialCells(xlCellTypeVisible)メソッドを使用すると謎のバグが発生するようです。 下のコードで試してみたいと思います。(単純に、選択している可視セルに絵文字を入力するだけのものです) Sub test() Dim myRange As Range For Each myRange In Selection.SpecialCells(xlCellTypeVisible) myRange.Value = "(@_@;)" DoEvents Next myRange End Sub このコードを下の