- 140 名前:デフォルトの名無しさん mailto:sage [2009/07/23(木) 07:47:58 ]
- >>138
エスパーするとやりたいのはこういうこと? Dim 値 As Integer 値 = WorksheetFnction.CountA(Range("B2:K2")) Range("B1").Offeset(1,値).Select 質問に直接答えれば宣言はいつしてもいいけど変数の使い方がおかしい Integer→Rangeに変えてSet 値 = Range("A1") 最後の行をActiveCell..Offeset(1,値.Value).Select
|

|