いま、かなり大きく、複雑な表をエクセル2000で
(ウィンドウズ2000)つくっています。
いろんな所の列や行を非表示にして見やすくしたの
ですが、その非表示にした列や行をまたぐようにして
その前後、左右の周囲のセルをドラッグし反転させ、
クリア等すると、非表示になっている列または行のセル
に入れてある数式等までクリアされてしまいます。
表示されているセル(可視セル)のみいじれて、
非表示セル(不可視セル)はいじれないように
一括して簡単に設定する方法はないでしょう?
確かに、方法としてはその不可視セルだけ
保護するとかありますが、不可視セルがいろんな所に
所々あって、それらを一つ一つ保護設定すると
作業が非常に煩雑で、保護忘れもでてきそうです。
いいお知恵があれば拝借させてください。
よろしくお願いいたします。
A 回答 (4件)
- 最新から表示
- 回答順に表示
No.4
- 回答日時:
> いいお知恵があれば拝借させてください。
ということですので、VBAで処理する方法ですが、下記コードは、
「保護」に関係なく、選択範囲に「不可視セル」が含まれている場合には、
メッセージを表示し、選択を解除する方法です。
宜しかったらテストしてみてください。
※「不可視セル」が含まれていても「シート全体」や「列単位」を選択した
ときだけは、有効にしたいのであれば、コードの3行目を有効にします。
一応、コードの設定方法を書いておきます。
・ 使用しているシートの「シート名タブ」を右クリックし、「コードの表示」を
選択します。
・ コードウィンドウに下記コードをコピーして貼り付けます。
・ Alt+Q でこのウィンドウを閉じ、シートに戻り、動作を確認します。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Rng As Range
'If Target.Rows.Count = 2 ^ 16 Then Exit Sub '列の選択を有効
Set Target = Application.Union(Target.Resize(1), Target.Resize(, 1))
For Each Rng In Target
If Rng.EntireRow.Hidden = True Or Rng.EntireColumn.Hidden = True Then
MsgBox "この範囲には、不可視セルが含まれています。", vbExclamation
ActiveCell.Select
Exit For
End If
Next
Set Target = Nothing
End Sub
No.3
- 回答日時:
どこまでお役にたつか、わかりませんが、不可視セルにだけ、一括して、保護設定を行う方法です。
(1)[編集]-[ジャンプ]を実行
(2)[ジャンプ]ダイアログの[セル選択]をクリック
(3)[選択オプション]ダイアログの[可視セル]をONにして[OK]
(4)[書式]-[セル]を実行
(5)[セルの書式設定]ダイアログ-[保護]タブの[ロック]をOFFに
(6)[ツール]-[保護]-[シートの保護]を実行
以上で、不可視セルだけがロ保護された状態となりますので、うっかり不可視セルの内容がクリアされるのは防げます。
ただし、「非表示にした列や行をまたぐようにしてその前後、左右の周囲のセルをドラッグし反転させ、クリア等」しようとするとエラーとなります。不可視行(列)をはさまないようにセル選択し直す必要がありますので、ちょっと面倒くさいような気もしますが....まずは、お試しください。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
貼り付けで複数セルに貼り付けたい
-
セルをクリック⇒そのセルに入力...
-
Excelでのコメント表示位置
-
エクセル “13ヶ月”を“1年1ヶ月...
-
数字の配分
-
エクセルで Aならば1. Bならば2...
-
エクセルの一つのセルに複数の...
-
複数桁の数字を1セルずつ表示...
-
【エクセル】IF関数 Aまたは...
-
エクセルで指定したセルのどれ...
-
枠に収まらない文字を非表示に...
-
Excelで数式内の文字色を一部だ...
-
(Excel)数字記入セルの数値の後...
-
エクセルのセルの枠を超えて文...
-
エクセルのセル交点に丸印をつ...
-
エクセル 足して割る
-
EXCEL VBA セルに既に入...
-
Excelでセルの上下にはみ出る文...
-
エクセルで縦に1112223...
-
対象セル内(複数)が埋まった...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
貼り付けで複数セルに貼り付けたい
-
【エクセル】IF関数 Aまたは...
-
Excelで数式内の文字色を一部だ...
-
エクセルで指定したセルのどれ...
-
(Excel)数字記入セルの数値の後...
-
枠に収まらない文字を非表示に...
-
セルをクリック⇒そのセルに入力...
-
Excelでのコメント表示位置
-
対象セル内(複数)が埋まった...
-
【Excel】 セルの色での判断は...
-
エクセル オートフィルタで絞...
-
エクセル “13ヶ月”を“1年1ヶ月...
-
Excel 例A(1+9) のように番地の...
-
エクセルのセルの枠を超えて文...
-
エクセル 足して割る
-
excelの特定のセルの隣のセル指...
-
エクセルの一つのセルに複数の...
-
Excel for Mac使用中ポインタが...
-
エクセルで住所と建物名を分け...
-
EXCEL VBA セルに既に入...
おすすめ情報