Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

10566 / 76734

←次へ　｜　前へ→


	【71714】Re:セル結合

kanabun - 12/4/1(日) 10:30 -


	引用なし

	パスワード

▼SATO さん： >※A5:A8までを１つの結合ｾﾙに、B5:B8までを1つの結合ｾﾙに、 > C5:C8までを1つの結合ｾﾙに,3000行まで、 > ﾃﾞｰﾀがすでに一部入ってる為VBAでのセルの結合を行いたい (参考です。もっといい方法があるかもです) Sub try1() 　Dim i As Long 　Dim c As Range 　　Application.ScreenUpdating = False 　Application.DisplayAlerts = False 　For i = 5 To 3000 Step 4 　　　For Each c In Cells(i, 1).Resize(4, 3).Columns 　　　　　c.Merge 　　　Next 　Next 　Application.DisplayAlerts = True 　Application.ScreenUpdating = True 　　　 End Sub