2ちゃんねる ★スマホ版★ ■掲示板に戻る■ 全部 1- 最新50  

■ このスレッドは過去ログ倉庫に格納されています

Excel総合相談所 97

470 :ExcelVBA質問スレの568:2011/06/22(水) 20:09:31.07
>466 こんなんでいいのかな? rangeって引数や戻り値にできなかったっけ?
Sub test()
Dim myRng As String
 myRng = ActiveSheet.Range("C3").Address ' 最初のセル位置
 Do While (Range(myRng).Row < 50)
  myRng = ex_466(myRng)
  If myRng = "" Then
   Exit Do
  Else
   Range(myRng).Select
  End If
 Loop
End Sub レベル不足で長文貼れず、続く



345 KB
★スマホ版★ 掲示板に戻る 全部 前100 次100 最新50

read.cgi ver 05.01.03 2014/02/20 Code Monkey ★
FOX ★ DSO(Dynamic Shared Object)