[[20170818190959]]　『VBAで数式を入れる』（Q-PE）　ページの最後に飛ぶ

『VBAで数式を入れる』（Q-PE）

 お世話になっております
教えてください
下記のように数式入れようとすると
赤文字になってしまいます
A1セル値の[]内の文字を抜き出したいです

よろしくお願いいたします

Range("h1").FormulaR1C1 = "=REPLACE(MID(A1,FIND("[",A1)+1,FIND("]",A1)-FIND("[",A1,1)-1),1,3,"")"

＜使用 Excel：Excel2013、使用 OS：Windows10 ＞

FormulaR1C1でなくFormulaです。

（マナ） 2017/08/18(金) 19:29

 ＞A1セル値の[]内の文字を抜き出したいです

 提示された数式自体、そんな作りになっていると思えないのですけど・・・

  Range("H1").FormulaR1C1 = _
      "=REPLACE(REPLACE(RC[-7],FIND(""]"",RC[-7]),300,""""),1,FIND(""["",RC[-7]),"""")"

 または
  Range("H1").Formula = _
      =REPLACE(REPLACE(A1,FIND(""]"",A1),300,""""),1,FIND(""["",A1),"""")"

（半平太） 2017/08/18(金) 19:51

 マナ様　半平太様
有難う御座います
お礼遅くなり　申し訳ございませんでした

取りあえず　下記のような感じで出来上がりました

今後ともよろしくお願い足します

Range("H1").FormulaR1C1 = _

        "=REPLACE(MID(RC[-7],FIND(""["",RC[-7])+1,FIND(""]"",RC[-7])-FIND(""["",RC[-7],1)-1),1,3,"""")"
（Q-PE） 2017/08/19(土) 17:14

コメント返信：