DB に書き込もうとしているときに、いくつかの VB コードを Excel で動作させるのに苦労しています。このカンマエラーが発生し続けますが、カンマがどこにないのか一生わかりません...コードは次のとおりです...
While Not IsEmpty(startRange.Offset(i, 0))
tentype = startRange.Offset(i, 0).Value
tendelivery = "EMAIL"
tenevent = startRange.Offset(i, 1).Value
tentext = startRange.Offset(i, 2).Value
tensubject = startRange.Offset(i, 3).Value
tentrailer = startRange.Offset(i, 4).Value
tenlanguage = startRange.Offset(i, 5).Value
tenid = 10 + i
With objCommand
.ActiveConnection = "Driver={Microsoft ODBC for Oracle};Server=*;Uid=*;Pwd=*"
.CommandText = "INSERT INTO TEN_TEMPLATE VALUES (" & tenid & ", " & tendelivery & ", " & tentype & ", " & tenevent & ", " & tentext & ", " & tenlanguage & ", " & tensubject & ", " & tentrailer & ")"
.Execute
End With
i = i + 1
Wend
助けていただければ幸いです。
ありがとう、ブレット