Excel VBA質問箱 IV

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

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


39603 / 76732 ←次へ | 前へ→

【42239】Re:数行の文字を連結したい
発言  ハチ  - 06/9/4(月) 20:17 -

引用なし
パスワード
   ▼TAKA さん:

どの範囲の文字列を、どこに が不明確なので良くわかりませんが。

選択範囲を先頭にセルを挿入して・・なら
Sub Test()

Dim R As Range
Dim Str As String

  For Each R In Selection.Cells
    Str = Str & R.Value
  Next R
  
  ActiveCell.Insert xlDown
  ActiveCell.Value = Str

End Sub

このマクロだと
複数列を選択すると結合の並びは制御できません。
0 hits

【42237】数行の文字を連結したい TAKA 06/9/4(月) 19:51 質問
【42239】Re:数行の文字を連結したい ハチ 06/9/4(月) 20:17 発言
【42240】Re:数行の文字を連結したい ichinose 06/9/4(月) 20:31 発言
【42246】Re:数行の文字を連結したい TAKA 06/9/4(月) 22:22 回答
【42250】Re:数行の文字を連結したい ichinose 06/9/4(月) 22:41 発言
【42254】Re:数行の文字を連結したい TAKA 06/9/4(月) 23:38 お礼
【42262】Re:数行の文字を連結したい Kein 06/9/5(火) 10:28 発言
【42249】Re:数行の文字を連結したい TAKA 06/9/4(月) 22:35 お礼

39603 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free