【Excel-VBA】利用のメリット~セル結合~

こんにちは。Nakaiです。

やっと春らしいお天気になりましたね。
暖かい日差しに桜の花も喜んでいるようです。

さて、今日はExcelのVBAを利用するメリットです。
受講生の方からのご質問で多いのは、作業の効率化にまつわることが
ほとんどです。
その場合は、VBAを利用すると、、という説明をすることが最近特に
多いなと感じています。

こちらも受講生の方からのご質問ですが、

A列からC列に文字が入力されているデータを、文字を消さずに
それぞれセル結合をしたい。

 a.png

b.png

上記のイメージです。

普通にExcelでA1からC1を選択してセル結合をすると、
A1以外の文字は消えてしまいますよね。

こんなときはVBAを利用しましょう。
データの量が多くても合っという間に解決です。

Sub ketugo()

Dim buf As String, i As Long

Application.DisplayAlerts = False

With ActiveSheet

For i = 1 To Range(“a66536”).End(xlUp).Row

buf = .Cells(i, 1) & .Cells(i, 2) & .Cells(i, 3)

.Range(Cells(i, 1), Cells(i, 3)).MergeCells = True

.Cells(i, 1) = buf

Next

End With

MsgBox “結合完了”

Application.DisplayAlerts = True

End Sub

ためしに上記のコードを標準モジュールに記述し、実行してみて

下さい。

一瞬で解決します。

img01680.jpg

コードの内容を知りたい!というかたは、
パソコンスクールISA船橋FACE校まで是非ご来校下さい。

パソコンスクールISA船橋FACE校 Nakai

Follow me!

夢を叶えるキャリアアップスクール パソコン教室ISA船橋FACE校


「すべては受講生のために」をモットーに、ビジネスに必要なパソコンスキルから
就転職に向けてのパソコン資格の取得まで個別授業を行っています。
是非お気軽にご来校ください。

住所:千葉県船橋市本町1丁目3-1 FACEビル12F
連絡先:TEL: 047-424-3544
Mail: isa_funabashi@isa-school.co.jp
授業時間
月~木 10:30~20:30
金~日 10:00~17:00

パソコン教室ISA船橋FACE校のご案内はこちらから


個別授業の無料体験のお申し込みはこちらから

資料請求はこちらから

パソコン教室ISAのご案内はこちらから

MOS資格のご案内はこちらから

教育訓練給付制度のご案内はこちらから

コメントを残す

メールアドレスが公開されることはありません。 が付いている欄は必須項目です