vba 実行時エラー＜デバッグ＞‘13’ 「型が一致しません。」について

Question

Anonymous

「型が一致しません。」が解けずに2時間が経過しました。

文字を打ち換えたり、はたまた定数に直接数値を入力（TYAKUJUN＝16、C_4＝40）したり、引き算の左右を並びを変えたり、勿論再起動もしました。ネットで調べてもお手上げです。

Sub Step2_D()

lRow = Cells(Rows.Count, 1).End(xlUp).Row

For i = lRow To 2 Step -1

If Worksheets("step2").Cells(i, TYAKUJUN).Value - Worksheets("step2").Cells(i, C_4).Value > 3 Then

Worksheets("step2").Cells(i, L_COR_G_OV_3).Value = "〇"

End If

Next i

End Sub

上記コードの修正をお願いできる方よろしくお願いします。

ちなみに引っかかっているのは「If Worksheets("step2").Cells(i, TYAKUJUN).Value - Worksheets("step2").Cells(i, C_4).Value > 3 Then」この部分です。　　　　　　　真黒　御手上

ロックされた質問。この質問は、Microsoft サポートコミュニティから移行されました。役に立つかどうかに投票することはできますが、コメントの追加、質問への返信やフォローはできません。

0 件のコメント

2 件の回答

Answer 1

Anonymous

yuki様

　新しいアドレス（問い合わせ先）を教えて下さりありがとうございます。感謝しています。

0 件のコメント

Answer 2

Anonymous

こんにちは。
当フォーラムはWindowsやofficeのトラブルシュートがメインとなります。
VBA専用のフォーラムがございますので、下記へご投稿してみて下さい。
https://social.msdn.microsoft.com/Forums/ja-JP/...

0 件のコメント