●EXCEL・VBAの教えてスレ Part2●

●EXCEL・VBAの教えて ..

349:デフォルトの名無しさん
07/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

'だと動きません。なんでだろう。。。
'親切な方教えてください。

次ページ