?
=?iso-2022-jp?B?RVhDRUwbJEIhIRsoQk5FV1M=?=
thanks for your help.
sorry to let me ask something more about it.
Function getval(v, chara, chara1, chara2, chara3, chara4)
getval = v
End Function
Sub funtest()
v = 123
c = "ok"
c1 = "ok"
c2 = "ok"
c3 = "ok"
c4 = "ok"
c5 = "ok"
ActiveCell.FormulaR1C1 = "=getval(" & v & "," & c & "," & c1 & "," & c2 &
"," & c3 & "," & c4 & ")"
'ActiveCell = "=getval(" + v + "," + c + ")"
End Sub
the value is ok.,but the following message (#name? errors) appears
,why,(when click "=")
regards
sorry to let me ask something more about it.
Function getval(v, chara, chara1, chara2, chara3, chara4)
getval = v
End Function
Sub funtest()
v = 123
c = "ok"
c1 = "ok"
c2 = "ok"
c3 = "ok"
c4 = "ok"
c5 = "ok"
ActiveCell.FormulaR1C1 = "=getval(" & v & "," & c & "," & c1 & "," & c2 &
"," & c3 & "," & c4 & ")"
'ActiveCell = "=getval(" + v + "," + c + ")"
End Sub
the value is ok.,but the following message (#name? errors) appears
,why,(when click "=")
regards