次の１・２を「簡単な方法」で実現できる操作を詳しく説明できる方、お願いします。２００Ｐ進呈！

秀丸エディタ等で正規表現を使えるテキストエディタを使えばですが・・・

①その処理をしたい範囲を選んでコピーし、新規に開いたエディタに貼り付ける。その後、エディタの文字列置換で正規表現を有効にし、改行コードをスペースに置換する(置換元に"\n"、置換先に" "を記述)。

これで全体がスペース区切りの１行になるので、それをコピーして目的のWord等に貼り付ける。

②その処理をしたい行を選んでコピーし、新規に開いたエディタに貼り付ける。その後、エディタの文字列置換で正規表現を有効にし、スペースを改行コードに置換する(置換元に" "、置換先に"\n"を記述)。

これで全体が単語毎に改行されるので、それをコピーしてExcel上で先頭にしたい場所に貼り付ける。

これで一応いけますよ。

Excelからクリップボードに書き込むマクロとクリップボードから読み込むマクロを作ってみました。

まず、以下のマクロを使うためにMicrosoft Forms 2.0 Object Libraryの参照設定をしてください。

http://pc.k-solution.info/programming/vba/excelvba1.aspx

１）選択したセルから下に空白が出るまでのセルを、間に空白を入れて連結してクリップボードにコピーするマクロ。

Sub setCB()
    Dim r As Long
    Dim str As String
    Dim myDO As New DataObject
    str = Selection.Value
    r = Selection.Row + 1
    While Cells(r, Selection.Column).Value <> ""
        str = str & " " & Cells(r, Selection.Column).Value
        r = r + 1
    Wend
    myDO.Clear
    myDO.SetText str
    myDO.PutInClipboard
End Sub

２）クリップボードの文字列を空白でばらばらにして、選択したセルから下方向に貼り付けるマクロ。

Sub getCB()
    Dim myDO As New DataObject
    Dim myCF As Variant
    Dim str As Variant
    Dim i As Integer
    
    myCF = Application.ClipboardFormats
    If myCF(1) = True Then Exit Sub
    If myCF(1) = xlClipboardFormatText Then
        myDO.GetFromClipboard
        str = Split(myDO.GetText, " ")
        For i = 0 To UBound(str)
            Selection.Offset(i, 0).Value = str(i)
        Next i
    End If
End Sub

それぞれのマクロにショートカットを割り当てればより便利に使うことができると思います。

（１）を回答　　（（２）は回答なし）

　　セルＢ１に「=" "」を入力。　セルＣ１に「=A1&B1」を入力。　　Ｂ１、Ｃ１をコピー＆ずーっと下の行まで選択してペースト。　Ｃ列全体を選択＆コピー。　メモ帳を開く＆ペースト。　メモ帳でＣＴＲＬ＋Ａしてコピー。　ワードを開く＆ペースト。　改行をはずす。（はずし方は：　http://www.relief.jp/itnote/archives/000269.php）。

Excelだけで済ませる方法。

あまり、ささっという感じではないですが。

①Excelで縦の列を選択コピーしてから、「形式を選択して貼付け」を選んで、下にある「行列を入れ替える」のオプションにチェックを付けて、空白のシートにペーストする。そのシートをテキストで保存する。

②テキストを、Excelで開く際に、区切りをスペースにして、開いて、上と同じく、コピーペースとの際に、行列を入れ替える。

やり方はいろいろありますが、次のようなものはいかがでしょうか？（作業時間、約１分ぐらい）

※手順２はExcel2007の場合

１）手順１:　　B2 に「=A1＆"　"＆B１」を入力

　　手順２：　B２をB列全体にコピー（再下段が求める形式）　

２）手順１:　テキストをExcelにコピー

　　手順２：　データ　→　区切り位置　で横に並べる

　　手順３:　コピー　→　行列を入れ替えて貼り付け

僕なら、秀丸エディタに貼り付けて正規表現置換かマクロで整形する。

が、秀丸禁止なら・・・

まずExcelでコピーした後、別のExcelシート（作業用）に「形式を指定して貼り付け」る。このとき、オプションで行と列を入れ替えて貼り付け。そしたら、その結果を再度コピーして、メモ帳に貼り付け。これでタブ区切りの一行データになると思うので、タブ文字を空白に置換して完成。（置換ダイアログのテキストボックスにタブ文字を打てなければ、どこか別のメモ帳とかで打ったタブ文字をコピーしてきて貼り付ける。）

逆方向は、順番逆にするだけね。