VB初心者質問スレPart3
■ このスレッドは過去ログ倉庫に格納されています
0772教えてください
NGNGDim i As Double
Dim iAnswer As Double
X = Worksheets(1).Cells(13, 2)
A = Worksheets(1).Cells(11, 7)
For i = X To A Step 0.0000001
iAnswer = i
Next
sAnswer = Str(iAnswer)
Worksheets(1).Cells(13, 8) = sAnswer
End Sub
-----------------------------------------
X=C10
A=IF(A13="",""ROUND(B13+E13+F13,6))
と、それぞれのセルには数式が入っています。
Aのセルは
sAnswerのセル(13, 8) に数値が入らないとAの答えが出ないから
「#DIV/0!」となってます
この状態で実行すると
For i = X To A Step 0.0000001
のとこで「型が一致しません」とエラーなります。
「#DIV/0!」だとダメなんでしょうか?
■ このスレッドは過去ログ倉庫に格納されています