![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67b6d)
No.4ベストアンサー
- 回答日時:
No.2です。
>使用者の任意で1列ずつ非表示されるようにしたいのです
マクロを実行するたびにC列から順に非表示にするようにしてみました。
Sub 非表示()
Dim i As Long, j As Long
For j = 14 To 3 Step -1
If Columns(j).Hidden = True Then Exit For
Next j
If j < 14 Then
Columns(j + 1).Hidden = True
End If
End Sub
尚、再表示も必要だと思うので↓が再表示になります。
Sub 再表示()
ActiveSheet.Columns.Hidden = False
End Sub
※ 再表示は1列ずつの再表示ではなく、列すべてが再表示されます。
>「-」ボタンを使用者が押下すると非表示になり・・・
アウトラインのような感じをお望みなのでしょうかね?
この辺がよく判らないので単純なマクロにしていますが、
ダブルクリックイベントなどにすれば対応できるような気がします。m(_ _)m
おおお。
ありがとうございます!!
非表示に関しては、まさに思い描いていた通りになりました。
再表示もご提示いただいたものの方が潔いかもしれませんw
前回も今回も最初の説明も拙いのにお付き合いくださって
ありがとうございます。
![](http://oshiete.xgoo.jp/images/v2/common/profile/M/noimageicon_setting_14.png?e8efa67b6d)
No.3
- 回答日時:
No1です。
>ですので、「+」ボタンでC列~以降を順番に非表示にすることで
>B列と本来ミス内容が含まれる列を隣同士に並べたいのです。
「+」ボタンとは、添付図のようなコマンドボタンのことを言われているのでしょうか?(添付図の赤線で囲んだボタン)
もし、そうであれば、このボタンが1つなら、1つのマクロしか割り当てられません。
1つのマクロでは1つの機能(例えばC列を非表示にする)のみですので、
もし、他の機能(C,D列を非表示にする)とか更に他の機能(非表示にした列を再表示する)については、他のマクロが
必要になるかとおもいますが、いかがでしょうか。
![「列を1つずつ非表示にしたい」の回答画像3](http://oshiete.xgoo.jp/_/bucket/oshietegoo/images/media/5/106271_5b166441438f0/M.png)
tatsu99さん
ありがとうございます。
おっしゃるとおりです、「+」と「-」のボタンを作成する予定です。
「-」を押下するとC列以降が1つずつ非表示になり
「+」を押下すると非表示になっている列が再表示される
というように考えております。
No.2
- 回答日時:
こんばんは!
>B列のデータとC列のデータ
>B列のデータとD列のデータ・・・と見比べる必要があります。
とは、行ごとの検索(見比べ)になるのでしょうか?
① すなわち、B列2行目?(1行目が項目行になっているコトが多いので)からB列最終行までを対象に
各行ごとに判断するのか?
② 質問文では一致なのか不一致なのかが書いてありませんね。
B列と一致する場合のC~N列、それとは逆に不一致の場合のC~N列を非表示にするのか?
この辺が判らないとコードの記載のしようがありません。m(_ _)m
前回もご回答いただいた方ですね。
いつもありがとうございます。
B列 C列 D列 E列
1 ABCDE ABCDE ABCDE ABCED
2 BCDEF BCDEF BCDEF NCDEF
3 HIJKE HIJKD HIJKE HIJKR
C列の3行目にミス
D列はミスなし
E列の1行目と2行目と3行目にミス
前回は、B列とC列以降に異なる値の場合に背景色をつけたいと
質問をさせていただきました。
今回は、B列とC列を見比べた後にC列、次にミスのないD列を
「-」ボタンを使用者が押下すると非表示になり
B列の隣にE列が表示されて見比べやすくしたいのです。
※因みに、ミスのないD列も見比べることは可能にしたいので
使用者の任意で1列ずつ非表示されるようにしたいのです
非表示にして
![](http://oshiete.xgoo.jp/images/v2/common/profile/M/noimageicon_setting_14.png?e8efa67b6d)
No.1
- 回答日時:
>そこで、見比べやすくするためにC列~N列までを順番に列の非表示を行いたいのです。
>そして、可能であれば一旦非表示にした列も逆順に再表示を行ないたいです。
1回のマクロの操作で非表示にするのは1列(例えばC列)のみですよね。
それなら手作業で行っても問題ないと思いますが、マクロにこだわる理由は何でしょうか。
また、マクロで行うにしても、
①どの列を対象にするかの情報
②その列を非表示にするのか、元にもどすのかの情報
を外部から与える必要があるかと思いますが、それについてはどのように考えてますか。
ありがとうございます。
今作っているツールはミス内容の確認のために使う予定です。
使用者はあまりExcelが得意ではない方が多く「列の非表示」、
「列の再表示」を素早く行うこと、ショートカットを行うことが
難しいと考えています。
ミスを見つけることではなく、素早く見つけてどうやって同じ
ミスを繰り返さないかを考える時間に時間を費やせるように
マクロ化することを考えております。(私も使用者の一人です。)
B列に回答が入っているのは確定です。
C列~N列に使用者の回答が入っております。
B列とC列を見比べる必要があるときもあれば
B列とE列を見比べる必要があるときもあります
ですので、「+」ボタンでC列~以降を順番に非表示にすることで
B列と本来ミス内容が含まれる列を隣同士に並べたいのです。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
- ・ゆるやかでぃべーと タイムマシンを破壊すべきか。
- ・「I love you」 をかっこよく翻訳してみてください
- ・歩いた自慢大会
- ・許せない心理テスト
- ・字面がカッコいい英単語
- ・昔のあなたへのアドバイス
- ・かっこよく答えてください!!
- ・あなたが好きな本屋さんを教えてください
- ・これ何て呼びますか Part2
- ・人生で一番思い出に残ってる靴
- ・ゆるやかでぃべーと すべての高校生はアルバイトをするべきだ。
- ・初めて自分の家と他人の家が違う、と意識した時
- ・単二電池
- ・チョコミントアイス
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
「段」と「行」の違いがよくわ...
-
VLOOKUPの列番号の最大は?
-
エクセルで離れた列を選択して...
-
LEFT関数とIF関数の組み合わせ...
-
Excelの行数、列数を増やしたい...
-
最近急にVBAの処理速度が遅くな...
-
エクセルで最初の行や列を開け...
-
Excel文字列一括変換
-
VBAで結合セルを転記する法を教...
-
VBA 指定した列にある日時デー...
-
【マクロ】【VBA】条件付き書式...
-
エクセルマクロPrivate Subを複...
-
列方向、行方向の定義
-
Alt+Shift+↑を一括で行うには、...
-
EXCEL VBA 文字列から電話番号...
-
データシートビューのタイトル...
-
エクセルのデータ検索&抽出作...
-
エクセル 任意の列数で分割する...
-
エクセルで複数列の検索をマク...
-
エクセルの行を65536以上に増や...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
「段」と「行」の違いがよくわ...
-
エクセルで離れた列を選択して...
-
VLOOKUPの列番号の最大は?
-
LEFT関数とIF関数の組み合わせ...
-
Excelの行数、列数を増やしたい...
-
列方向、行方向の定義
-
VBA 指定した列にある日時デー...
-
エクセルマクロPrivate Subを複...
-
Excel文字列一括変換
-
エクセル マクロ 範囲指定で...
-
Alt+Shift+↑を一括で行うには、...
-
CSVファイルの「0落ち」にVBA
-
VBAで結合セルを転記する法を教...
-
エクセルで複数列の検索をマク...
-
リストからデータを紐付けしたい
-
横軸を日付・時間とするグラフ化
-
エクセルで最初の行や列を開け...
-
エクセルのソートで、数字より...
-
エクセルマクロの組み方
-
☆Excel VBAでAVERAGE関数を使う...
おすすめ情報