EXCEL VBAの記述を教えてください。

こんばんは。
EXCEL VBAの記述を教えてください。（エラーがわかりません。）

dim j as long

"=IF(MOD(F " & j & "" , J " & j & " ),IF( F " & j < J " & j ", """" , 1 ),(F " & j " ) "

No.3 ベストアンサー 回答者： zongai 回答日時： 2022/12/04 19:51

セルに関数式を入れたいってことだと思います。

VBAの記述…っていう以前で、単純に　""　と　&　の整合性が取れてないだけじゃないかな？
メモ帳等に貼り付けて、&　で改行して行けばおかしなところが見えてくると思います。

ちょっと極端に改行してみると・・・

"=IF(MOD(F "
&
j
&
"" , J " 　　【←　””　？？？】
&
j
&
" ),IF( F "
&
j < J " 　　【←　頭に当たる　”　が無い！】
&
j ", """" , 1 ),(F "　　【 j と　"　の間の　& 　抜け】【F の前の ( 不要では？】
&
j " ) "

っと気になる部分が見えてくる。


どういう処理をしたいのかは不明だけど
j=2とするならば、この式で

"IF(MOD(F" & j & ",J" & j & "),IF(F" & j & "<J" & j & ","""",1),F" & j & ")"

この内容がが出来上がります。

=IF(MOD(F2,J2),IF(F2<J2,"",1),F2)

この回答へのお礼

zongaiさん、試行錯誤で何とかできました。
ありがとうございました。

お礼日時：2022/12/05 20:37

No.2 回答者： めぐみん_ 回答日時： 2022/12/04 19:23

ＭＯＤ関数は剰余を求める物ですから、例えば

=IF(MOD(F2,J2)=1,"A","B")

F2:5
J2:2
5÷2=2 余り 1

であった時、剰余は１なので条件式　MOD(F2,J2)=1　によりセル表示は A になります。

J2:3
5÷3=1 余り 2

であれば、剰余は２なので B 。

今回その比較演算子（ = < > <> ）がない事と比較する値（ 1 ）がない事に気づくのが遅れました。
エラーはそれかも？

この回答へのお礼

めぐみんさん、何とかできました。
ありがとうございました。

お礼日時：2022/12/05 20:37

No.1 回答者： めぐみん_ 回答日時： 2022/12/01 20:59

"=IF(MOD(F " & j & " , J " & j & " ),IF( F " & j & "< J " & j & ", """" , 1 ),(F " & j & " ) "

かな？
数式は余りやってこなかったから違うかもですが。

この回答へのお礼

こんばんは。
めぐみん＿さん、ご回答ありがとうございました。
コピペしましたが、エラーがでました。
VBAでご存じでしたらご教示いただけないでしょうか

お礼日時：2022/12/02 21:04