- 349 名前：デフォルトの名無しさん [2007/02/24(土) 15:09:31 ]
- '初心者です。
Sub なんでだろう①()
Dim あ As Long
あ = Worksheets("Sheet1").Cells(1, 1)
If あ > 3 Then
Worksheets("Sheet1").Rows("1:5").Select
End If
End Sub
'だと動くのに
Sub なんでだろう②()
Dim あ As Long
あ = Worksheets("Sheet1").Cells(1, 1)
If あ > 3 Then
Worksheets("Sheet1").Rows("1:あ").Select
End If
End Sub
'だと動きません。なんでだろう。。。
'親切な方教えてください。
