excel - Sub に変数を渡す

Question

Test1 サブルーチンの最終行をコーディングすると、エラーが発生します。「=を期待している」と言います。何か案は？

Sub selectByUsedRows(usedCol As String, selectCol As String)
n = Range(usedCol).End(xlDown).Row
Range(selectCol & "1:" & selectCol & n).Select
End Sub

Sub Test1()
Dim a As String, b As String
a = "A"
b = "B"
selectByUsedRows (a, b)
End Sub

コメントからの正しいコード、ありがとう!

Sub selectByUsedRows(usedCol As String, selectCol As String)
n = Range(usedCol & "1").End(xlDown).Row
Range(selectCol & "1:" & selectCol & n).Select
End Sub

Sub Test1()
Dim a As String, b As String
a = "A"
b = "B"
selectByUsedRows a, b
End Sub

Answer 1

関数を呼び出しselectByUsedRowsているかのように呼び出しています。サブルーチンを呼び出すときに括弧は必要ありません。

selectByUsedRows a, b