• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:セルのデータをマクロで置換するには?)

セルのデータをマクロで置換する方法とは?

このQ&Aのポイント
  • エクセル2010でマクロを使ってセルのデータを置換する方法について教えてください
  • ネットで調べてもreplaceStrが使われているという情報しか見つけられませんでした
  • 日本語表現を含む式をエクセルで使用する場合、リンクするソフト側でエラーになるためマクロで書く必要があるとのことです。どう書けばよいでしょうか?

質問者が選んだベストアンサー

  • ベストアンサー
  • tom04
  • ベストアンサー率49% (2537/5117)
回答No.1

こんばんは! M7セルに =RSS|'3000.t'!更新済 という数式が入っていて、B7セルに4桁数値が入力された場合 仮に「2500」の場合はM7セルの数式が =RSS|'2500.t'!更新済 のようになればよい!というコトでしょうか? Private Sub Worksheet_Change(ByVal Target As Range) Dim str As String, buf As String If Target.Address = "$B$7" Then If IsNumeric(Target) Then If Target > 999 And Target < 10000 Then buf = Range("M7").Formula str = Mid(buf, InStr(buf, "'") + 1, 4) Range("M7").Formula = Replace(buf, str, Target) End If End If End If End Sub こんな感じではどうでしょうか?m(_ _)m

maamaa
質問者

お礼

早速教えていただきましてありがとうございます おかげさまですぐにできました 世間には優秀な方がいるんですね この一ヶ月ほど、ずっとネットで調べていたのですがだめでした 本当にありがとうございました この型を組み合わせて完成させたいと思います 完璧に教えてもらっておきながら簡単なお礼で申し訳ありません ありがとうございました

関連するQ&A