No.1ベストアンサー
- 回答日時:
以下のマクロをALT+F11でVBE画面を開き、左上のVBA Projectでシート名を右クリックし「挿入」→「標準モジュール」で表示される画面に貼り付けて下さい。
マクロの実行はALT+F8でマクロ一覧を開き、マクロ名を選択して「実行」ボタンです。Sub Macro1()
Dim ptrS, idx As Long
ptrS = 2
For idx = 2 To Range("A65536").End(xlUp).Row
If Cells(idx, 1) <> Cells(idx + 1, 1) Then
Range(Cells(ptrS, 1), Cells(idx, 2)).Borders(xlEdgeTop).LineStyle = xlContinuous
Range(Cells(ptrS, 1), Cells(idx, 2)).Borders(xlEdgeBottom).LineStyle = xlContinuous
Range(Cells(ptrS, 1), Cells(idx, 2)).Borders(xlEdgeLeft).LineStyle = xlContinuous
Range(Cells(ptrS, 1), Cells(idx, 2)).Borders(xlEdgeRight).LineStyle = xlContinuous
ptrS = idx + 1
End If
Next idx
End Sub
マクロをボタンに割り付けるにはシート上にオートシェイプの四角形を描き、シェイプ右クリック→マクロの登録→マクロ名選択で行うことができます
No.2
- 回答日時:
>VBAを使って作成したいと思っています
VBAでなくてもできます。
下記操作をマクロの記録で、VBA化もできます。
例データ A1:B10
ax
ay
az
au
bz
by
bu
cx
cy
dz
書式ー条件付き書式ー式が で式に
=$A1<>$A2
$を付ける位置と有無が大切です。
書式に罫線の下(底)線を指定
OK
上例でA4:B4、A7:B7、A9:B9,A10:B10に線が引かれます。
外枠は別途引く。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- 統計学 確率統計:正規分布している実力のロットから部品を2つ抜き取って製品化する場合、製品の実力は良くなる? 5 2023/05/24 00:29
- その他(Microsoft Office) 同じ番号に並び替え 1 2022/10/21 22:37
- その他(Microsoft Office) Microsoft OneDriveのofficeについて 1 2022/09/03 11:10
- Excel(エクセル) エクセルでフィルタ後の列の重複を回避したい 6 2022/10/13 12:50
- Excel(エクセル) Excelで在庫表(クエリ、ピボット) 2 2022/04/11 17:11
- 統計学 統計量および正規分布と分散の加法性の演習問題です。 5 2023/07/29 10:46
- その他(ビジネススキル・経営ノウハウ) クラウドファウンディングによる新製品の販売支援要求。「あれ?この商品、もう完成品じゃね?」という疑問 2 2022/08/22 12:32
- 事件・犯罪 キャンペーン商品が品切れのスシロー。「人気商品が品切れ」を待機客に告知させるのは営業妨害か? 5 2022/07/22 13:30
- Amazon 新規でAmazon商品ページ作成方法について 1 2022/03/28 00:22
- メルカリ メルカリの自動取引延長について 1 2022/04/14 00:20
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ローマ字→カタカナへ変換(エク...
-
マクロ 実行ボタンを押さずに...
-
Excelを開いた時に表示さ...
-
Excel VBA のdebug(F8キー) が...
-
複数ファイルにある特定のシー...
-
EXCELのセルへ、デジタル時計を...
-
エクセル グラフの軸の最小値最...
-
EXCEL 複数のシートの同一の位...
-
ワードマクロで画像を選択する方法
-
Excel2000 データの並べ替えで...
-
エクセルのマクロ機能で前のシ...
-
Image J ソフトの使い方
-
《エクセル2000》非表示になっ...
-
開いているフォルダを全て閉じ...
-
UWSCからエクセルのマクロを実行
-
Accessのクエリを実行するショ...
-
ワードで一連作業の繰り返し
-
ExcelVBAで印刷設定の拡大率を...
-
マクロを実行したけど…
-
マクロを実行するとフリーズし...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ローマ字→カタカナへ変換(エク...
-
複数ファイルにある特定のシー...
-
マクロ 実行ボタンを押さずに...
-
EXCELのセルへ、デジタル時計を...
-
Excelを開いた時に表示さ...
-
エラーになってないのにVBA...
-
Excel VBA のdebug(F8キー) が...
-
ワードからエクセルへ貼り付け...
-
エクセルのマクロ機能で前のシ...
-
Excelのワークシート上に検索窓...
-
モジュール内のマクロを全て実...
-
エクセル グラフの軸の最小値最...
-
EXCEL 複数のシートの同一の位...
-
エクセルで複数のシートをまと...
-
【Excel VBA】エラー番号400
-
Excelマクロでオプションボタン...
-
Wordの画面を左右にスクロール...
-
マクロ ブックをマクロなしでコ...
-
Wordで「原稿用紙○枚」を換算す...
-
AccessのテーブルデータをExcel...
おすすめ情報