No.3
- 回答日時:
マクロでやりたいご質問でしたね。
シート名タブを右クリックしてコードの表示を選び,下記をコピー貼り付けておきます。
private sub Worksheet_Change(byval Target as excel.range)
if application.intersect(target.cells(1), range("A:E")) is nothing then exit sub
with range("A2:E" & target.cells(1).row + 1).borders
.linestyle = xlcontinuous
.weight = xlthin
.colorindex = 1
end with
end sub
#参考
「その行だけ」に書式を施すと,あとで印刷したり諸々に際して不都合の原因になる場合があります。
No.2
- 回答日時:
ANo1さんの方法、参考になりました。
わたしはまだエクセル2000なので、VBAでの方法を考えてみました。
> もしくは入力してある最終行にカーソルがある時、改行を押した場合
改行を押した結果、「下の空白行のA~E列のどれかをセレクトした場合」ということでよろしいでしょうか?
ならば以下をお試しください。
1. 該当するシートのシートタブを右クリックして、[コードの表示]。
2. 出てきた白い所に、以下のコードを貼付けます。
'********これより下**********
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Row < 3 Then Exit Sub
If Target.Column > 5 Then Exit Sub
If Application.WorksheetFunction.CountA(Cells(Target.Row, "A").Resize(, 5)) > 0 Then Exit Sub
With Cells(Target.Row, "A").Resize(, 5).Borders
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
End Sub
'********これより上**********
3.Alt+F11キーでワークシートへもどります。
これでOK
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) Accessのクエリの結果を、既存のエクセルに追加したい 2 2022/07/31 22:44
- Visual Basic(VBA) 【VBA】Excelで罫線を引きたい 3 2022/07/14 12:04
- Visual Basic(VBA) VBA 罫線について B列3行目から21行毎にデータがはいります。 データがはいったらデータが入った 6 2022/11/15 17:22
- Excel(エクセル) 【エクセル」 特定のセルで条件抽出した列を、別シートに上から詰めて表示したい。 8 2022/04/08 16:00
- Visual Basic(VBA) 3つのプロシージャをまとめたら実行時エラー発生で対応不能 6 2022/05/17 01:47
- Excel(エクセル) excelにおける転記マクロの書き方 2 2023/05/12 03:16
- Excel(エクセル) 列の最終行に新たに入力されたらその値を自動参照 1 2023/01/21 09:59
- Visual Basic(VBA) 列と行の名前(重複あり)が交差するセルに、データを入力したい 2 2022/06/25 22:42
- Excel(エクセル) 列を自動で追加したい 3 2022/07/11 12:58
- Word(ワード) ワードでの罫線の改行につい 4 2022/10/24 11:05
このQ&Aを見た人はこんなQ&Aも見ています
-
外出時に「待たせる妻」vs イライラする「待つ夫」は日本だけ?見習いたい海外事情
夫の家事参加に積極的なイメージのある海外でも、同様の事例はあるのか。結婚カウンセラーの佐竹悦子さんに伺ってみた。
-
VBAで最終行まで罫線を掛ける方法
Excel(エクセル)
-
行を挿入すると表の罫線が消えてしまわないようにしたい
その他(データベース)
-
マクロ最終行挿入
Excel(エクセル)
-
-
4
Rangeメソッドは失敗しました。globalオブジェクトについて
Excel(エクセル)
-
5
ExcelVBA データを消去すると罫線も消える?
その他(プログラミング・Web制作)
-
6
エクセルでデータがある部分だけ罫線で囲いたいです。
Excel(エクセル)
-
7
エクセルVBAでセルに入力したパスでブックを開く
Excel(エクセル)
-
8
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
9
VBAでループ内で使う変数名を可変にできないか。
Visual Basic(VBA)
-
10
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
11
エクセルの参照行の挿入による追加と行の削除に対応できる関数を教えてくだ
Excel(エクセル)
-
12
エクセル マクロ名にブック名が付いた場合の修正方法
Excel(エクセル)
-
13
UserForm1.Showでエラーになります。
工学
-
14
Excel VBAで条件ごとの自動採番について
Excel(エクセル)
-
15
Application.ScreenUpdating = Falseが効きません
Visual Basic(VBA)
-
16
i=cells(Rows.Count, 1)とi=cells(Rows.Count, 2)の違い
Visual Basic(VBA)
-
17
Worksheets メソッドは失敗しました。のエラー処理のやり方
Visual Basic(VBA)
-
18
ExcelのVBAで連番を振る。
Excel(エクセル)
-
19
フォントの大きさ
Visual Basic(VBA)
-
20
検索して修正したデータの上書転記
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセル機能 オートフィルター
-
Excel の複数シートの列幅を同...
-
Excelで、ファイル名、シート名...
-
【VBA】シート名と見出しが一致...
-
VBAで検索して、行をコピー&追...
-
別シートに成約をボタン1つで転...
-
Excelで全てのシートに一気に列...
-
Excelでの並べ替えを全シートま...
-
SUMPRODUCTにて別シートのデー...
-
Excel VBA ピボットテーブルに...
-
Excelの別シートから共通部分を...
-
Excel セルに入っている日付を...
-
VLOOKアップ関数の結果の...
-
マクロでVLOOKUPを使用した複数...
-
ExcelのVlookup関数の制限について
-
エクセルの特定の複数の行を非...
-
【条件付き書式】countifsで複...
-
左矢印キーでカーソルを動かす...
-
マクロか関数で処理したいので...
-
EXCEL VBAのコンボボックスに取...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ExcelのVlookup関数の制限について
-
文字の色も参照 VLOOKUP
-
オートフィルタ使用時にCOUNTIF...
-
エクセルの保護で、列の表示や...
-
VBAで繰り返しコピーしながら下...
-
エクセル関数に詳しい方、教え...
-
【条件付き書式】countifsで複...
-
Excel の複数シートの列幅を同...
-
エクセル マクロ 標準モジュー...
-
エクセルで横並びの複数データ...
-
エクセルの列の限界は255列以上...
-
Excelでの並べ替えを全シートま...
-
VLOOKアップ関数の結果の...
-
SUMPRODUCTにて別シートのデー...
-
エクセルで、チェックボックス...
-
Excel VBA ピボットテーブルに...
-
【エクセル】1列のデータを交...
-
エクセルVBAで、ある文字を含ん...
-
エクセルのブック分割マクロを...
-
excel 複数のシートの同じ場所...
おすすめ情報