メッセージボックスに現れる言葉をセルに上書きするにはどうしたらいいですか?



「エクセルのセル内の文字列操作マクロをお願いします。」
http://q.hatena.ne.jp/1306425084

という質問で解答を依頼したのですが、コードを最後修正したいのですが、
教えていただけますでしょうか?


簡単にいうと、ある選択をしたあとに、最後メッセージボックスに現れる言葉
をそのまま選択してあるセルに上書きして貼り付けてほしいのです。A1のセルでマクロを実行したとしたら、そのままA1のマクロ内に値を上書きしたいのです。

最後の、コードを変えればいいと思うのですが、よくわかりません。
教えてくださいませ。

回答の条件
  • 1人5回まで
  • 13歳以上
  • 登録:2011/05/31 17:14:42
  • 終了:2011/05/31 18:36:54

ベストアンサー

id:taknt No.1

きゃづみぃ回答回数13537ベストアンサー獲得回数11982011/05/31 17:43:08

ポイント100pt

最後のコードって

MsgBox outputText & Mid(readText, startPosition)

ですよね。

これを

ActiveCell.Value = outputText & Mid(readText, startPosition)

にすれば いいんじゃないかな。

id:naranara19

ありがとうございます!助かりました。前回のご回答者様と負担とポイントがみあわないように感じるかもしれませんが、前回の方には別にポイントを進呈しております。

急いでいましたので大変助かりました。

2011/05/31 18:36:41

コメントはまだありません

この質問への反応(ブックマークコメント)

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

絞り込み :
はてなココの「ともだち」を表示します。
回答リクエストを送信したユーザーはいません