|
こんにちは。かみちゃん です。
>エクセルで例えば
> 1
> 2
> 3
> 4
> 5
>と並んでいる文字を違うセルにVBAをつかって
> 12345
>というようにコピーするようなプログラム
これは、
A B C
1 12345
と表示させたいのか
A B C D E
1 1 2 3 4 5
と表示させたいのですか?
前者であれば、For〜Nexを使わないとできませんが、
後者であれば、「形式を選択して貼り付け」の「行列を入れ替える」をすれば
少しヒントになると思います。
後者は、「マクロの記録」を使えばできますので、ご自分で確認してみてください。
前者は、学習としては、以下のような感じでできると思います。
Sub Macro1()
Dim i As Integer
For i = 1 To 4
With Cells(1, 1)
.Value = .Value & Cells(i + 1, 1).Value
End With
Next
End Sub
汎用性を持たせるならば、こんな感じでできると思います。
Sub Macro2()
Dim i As Integer
For i = 1 To 4
With ActiveCell
.Value = .Value & .Offset(i).Value
End With
Next
End Sub
> このような作業の簡単な方法(公式)などありませんか。
Excelヘルプに使用例が載っていますので、試してみることです。
あとは、ここの掲示板などいろいろなWebでサンプルなど紹介されていることが多いので、試してみることです。
|
|