「オブジェクト変数またはブロック変数が設定されていない」VBAを克服するにはどうすればよいですか？

Question

Sub bordersTest() 
    Dim theRange As Range 

    theRange = Range(ActiveCell, ActiveCell.End(xlDown).End(xlToRight)).Select 
End Sub 

Answer 1

あなたは、変数を設定する必要があります。

Sub bordersTest() 
    Dim theRange As Range 

    Set theRange = Range(ActiveCell, ActiveCell.End(xlDown).End(xlToRight)) 
    theRange.Select 
End Sub