引数に数値、文字列の混在

Cells(row,1).value = 1で数値、　Cells(row, 4).value=７８９の文字列、Cells(row, 5).value=　３３の文字列、　次が　NULL、と　０の　数値
Ret=Rss（1,”789”,”33”, ,0）
としたい。

Dim Ret
Str As Variant
Str=(Cells(row,1).value, Cells(row, 4).value, Cells(row, 5).value, Cells(row, 6).value , Cells(row, 8).value)
Ret=Rss(Str)　これだと当然、引数は数値のみ　（1,789,33,,0）
で、
Str=(Cells(row,1).value, & “”” & Cells(row, 4).value & “”” & , & “”” Cells(row, 5).value & “”” & , Cells(row, 6).value , Cells(row, 8).value)
これだと
（1, Cells(row, 4).value, Cells(row, 5).value,,0）セルがダイレクトに入る・・・
”789”　となるには？　また　ＮＵＬＬ　の扱い　,空白,　とするには？？
よろしくお願いします

No.1 ベストアンサー 回答者： tatsumaru77 回答日時： 2024/01/31 10:14

Str=(Cells(row,1).value, Cells(row, 4).value, Cells(row, 5).value, Cells(row, 6).value , Cells(row, 8).value)

の構文が正しい前提ですが
Str = (Cells(row, 1).Value, CStr(Cells(row, 4).Value), Cells(row, 5).Value, CStr(Cells(row, 6).Value), CLng(Cells(row, 8).Value))
でどうでしょうか。

この回答へのお礼

感謝、Str で　前に空白が入って失敗
CStr　は　やってなかった。
やってみます。

お礼日時：2024/01/31 10:32