2つのコンボボックスから2つの変数をsubに渡すにはどうすればいいですか？ - excel、vba、excel-vba

コンボボックスが2つあります。各コンボボックスは変数になります。これら2つの変数（wc1とwc2）を別のsubに渡したい。
私のコードはうまくいきません。

Public Sub ComboBox1_Change()
wc1 = Sheets("Book1").Cells(1, 3).Address()
End Sub
Public Sub ComboBox2_Change()
wc2 = Sheets("Book1").Cells(2, 3).Address()
End Sub
Public Sub thirdf()
Dim tval As String
Set lola = Sheets("Book1").Range(wc1 & ":" & wc2)
For Each cel In lola
tval = tval & cel.Value
Next
Cells(1, 7).Value = tval

End Sub

回答：

javadのコメントに基づいて、Addressメソッドを削除し、Range（wc1、wc2）を使用してください。

Public Sub ComboBox1_Change()
thirdf Sheets("Book1").Cells(1, 3).Address,Sheets("Book1").Cells(2, 3).Address
End Sub

Public Sub ComboBox2_Change()
thirdf Sheets("Book1").Cells(1, 3).Address,Sheets("Book1").Cells(2, 3).Address
End Sub

Public Sub thirdf(c00,c01)
For Each cl Sheets("Book1").Range(c00 &":" & c01)
tval = tval & cl.Value
Next
sheets("Book1").Cells(1, 7).Value = tval
End Sub