Q&A
> 【希望】
> メッセージボックスに「完了しました」と
>「3つの添付を読み込みました」を出したい。
>（できれば添付数が増えた場合、数字を変動させたい）
出せば良いと思いますが・・・ 具体的に何に困っているのでしょうか？？改行の仕方が分からないってことでしょうか？
マクロのメッセージボックスに
表示したいことがございます。
【現状】
フォルダAに入ってるいる
3つのエクセルを1つのエクセルにまとめて
作業が完了するとメッセージボックスに
「完了しました」と出る。
【希望】
メッセージボックスに「完了しました」と
「3つの添付を読み込みました」を出したい。
（できれば添付数が増えた場合、数字を変動させたい）
わかる方ご教授お願いいたいします。
改行の仕方は分かるのですが
マクロのコードを何と記述したら良いかわからないです。
> 改行の仕方は分かるのですが
> マクロのコードを何と記述したら良いかわからないです。
「改行の仕方は分かる」とはどういう意味ですか？
私が言ったのはもちろんメッセージボックス中の”改行”のことですが、何か行き違いが起きていますか？？
3つのExcelを読み込んだ場合
「3つの添付を読み込みました」と表示したい。
例えばフォルダAに〇つ添付が入っていて
読み込みが終わったら）
「〇つの添付を読み込みました」と表示させたいです。
読み込んだ件数をメッセージボックスに表示できるかというお話になります。
分かりづらく申し訳ございません。
> フォルダAに入ってるいる3つのエクセルを1つのエクセルにまとめて
上記が実現できているのですから「できれば添付数が増えた場合、数字を変動させたい」も出来るはずですが、何に困っているのかが分からないのです。「フォルダAに入ってる」ファイルの数はメッセージを出すときには既に分かっているのですからそれを表示させるだけです。
具体的なコードについては【現状】のコードの作り方に依ると思います。
恐らく3つのExcelファイルを1つにまとめる部分は質問者さんとは別の方が作ってできていて、「3つの添付を読み込みました」とのようにメッセージボックスを表示させる修正を担当したが、そのコードの書き方が分からないので、どう書くんでしょうか?という質問(?)なのでしょうね。そうでないと複数のExcelファイルを読み込んでひとつにする処理の方がよほど面倒で難しそうなのに、説明が付かない。
dodoxさんのおっしゃる通りです。
> dodoxさんのおっしゃる通りです。
そうであればそのように最初から質問に書いてください。その場合は元のコードも提示しないと話が繋がりません。そもそも前任者に聞けば良いだけでは？という疑問も沸いてきます。情報は可能な限り隠さず提示しましょう。
これも推測でのコメントで、間違っていたらごめんなさいなのですが、恐らく質問者さんはプログラマーとか技術職ではなくて、前任者の作成したExcel VBAマクロの修正をいきなり任されて
困ってしまったような一般(?)職の方なのではないでしょうか。たまに間違っちゃって質問される方もいるのですが、teratailは技術者向けのQ&Aサイトで、
「プログラムをどう書いたらいいですか?」とのような無邪気な質問は、無償のコード作成依頼とも受け取れるので推奨されていません。(初投稿で誤解があったのでしょうから、非難している訳ではありません)
[推奨していない質問] https://teratail.com/help/avoid-asking
色々な回答スタイルがあるので、質問内容によってはどなたか回答してくれることもあります。
他の方の回答で解決しました！
dodoxさん
まさにその通りです。今度からコードを提示出来るようにします。
ご教授いただきありがとうございました。
meg_さま
コメントいただきありがとうございました。
解決されたようで良かったです。ご存じないかもしれませんが、質問は後からでも「編集可能」です。今後の参考になさってください。
https://teratail.com/help
回答1件
0
ベストアンサー
以下のようなことをしたいのでしょうか。
VBA
1Public Sub メッセージボックス表示() 2 Dim temp_count As Long '添付件数 3 temp_count = 3 '3つの添付を読み込んだことにする 4 MsgBox ("完了しました" & vbCrLf & temp_count & "つの添付を読み込みました") 5End Sub 6
実行結果
投稿2025/02/20 12:48
総合スコア5520
あなたの回答
tips
プレビュー
