Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
5799 / 13655 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【48859】CからF列をつなげてCに表示する えり 07/5/12(土) 11:45 質問[未読]
【48860】Re:CからF列をつなげてCに表示する ぱっせんじゃー 07/5/12(土) 12:19 発言[未読]
【48861】Re:CからF列をつなげてCに表示する ぱっせんじゃー 07/5/12(土) 12:59 発言[未読]
【48862】Re:CからF列をつなげてCに表示する ぱっせんじゃー 07/5/12(土) 13:37 発言[未読]
【48863】Re:CからF列をつなげてCに表示する えり 07/5/12(土) 15:59 お礼[未読]
【48859】CからF列をつなげてCに表示する
質問  えり  - 07/5/12(土) 11:45 -
引用なし
パスワード
   複数行のC列からF列のセルをつなげてC列に表示したいです。

どうすればいいのでしょうか？
【48860】Re:CからF列をつなげてCに表示する
発言  ぱっせんじゃー  - 07/5/12(土) 12:19 -
引用なし
パスワード
   For〜Next

などでループし

MyStr = MyStr & Rng.Value

のように文字列を追加しながら蓄積し、最後に
表示したいセルに代入してやればいいです。

ただ、複数行ですと、

WorksheetFunction.Concatenate
などのようにワークシート関数を利用したほうが手っ取り早いです。
【48861】Re:CからF列をつなげてCに表示する
発言  ぱっせんじゃー  - 07/5/12(土) 12:59 -
引用なし
パスワード
   >WorksheetFunction.Concatenate

これは使えないようです。

＆
で繋げたほうがいいかも、ですね。
失礼しました。
【48862】Re:CからF列をつなげてCに表示する
発言  ぱっせんじゃー  - 07/5/12(土) 13:37 -
引用なし
パスワード
   ユーザー定義関数のサンプルです。

Function mycon(mycell)
Dim c As Range
Dim s As String
　For Each c In mycell
　 s = s & c.Value
　Next
　mycon = s
End Function
【48863】Re:CからF列をつなげてCに表示する
お礼  えり  - 07/5/12(土) 15:59 -
引用なし
パスワード
   ありがとうございます。
やって見ます
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
5799 / 13655 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free