[[20150421202917]] 『結果表示でjoinを使用するとき』(ko) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『結果表示でjoinを使用するとき』(ko)

VBA初心者です。
教えてください。

結果表示をするときにjoin関数を使っています。
そこで質問なのですが、結果が複数ある場合、その結果の先頭全てに”★”を付け、
最後に改行をしたいのですが、複数項目を入れるとエラーが出てしまいます。
先頭に”★”を入れ、見やすくするために改行を入れるにはどのようにしたら良いでしょうか。

こういう風にしたいです。

★aaaaaaa
★bbbbbbb
★cccccc

このようにすると一つ目の結果にしか★を付けてくれません
MsgBox("結果は以下になります。" & vbLf & vbLf & "★" & Join(Dup.keys, vbLf), vbOKOnly)

★aaaaaaa
bbbbbbb
cccccc

また、このようにすると頭に★はつけてくれますが、改行してくれません
MsgBox("結果は以下になります。" & vbLf & vbLf & "★" & Join(Dup.keys, "★"), vbOKOnly)

★aaaaaaa★bbbbbbb★cccccc

このようにするとエラーが出ます
MsgBox("結果は以下になります。" & vbLf & vbLf & "★" & Join(Dup.keys, vbLf , "★"), vbOKOnly)

因みにDupにはこれ以前の処理で、指定した文字列がA列にあるか検索し、一致したものをDupに次々入れていくような形になっています。
なので、結果が1個のときもありますし、複数ある場合もあります。

皆様教えてください。

< 使用 Excel:Excel2007、使用 OS:Windows7 >


 Join(Dup.keys, vbLf , "★")
 を
 Join(Dup.keys, vbLf & "★")
 にしてみてどうでしょうか。
(Mook) 2015/04/21(火) 20:53

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.