どなたか教えて下さい。
社員名簿などのデータで例えば営業部のみのデータを表示させたい場合は
どのような機能を使えばいいでしょうか?
非表示したいセルを選択してユーザー定義で設定する方法はわかるのですが
特定のセルのみ表示させる機能を知りたいのですが‥。
どなたか分る方教えて下さい。よろしくお願いします。

A 回答 (1件)

こんにちは。


ちょっと希望されてるのと違うかもしれないんですが、
オートフィルターを使ってデータを抽出する方法はどうですか?
やり方は、まず表の項目の行を全て選択し、ツールバーの[データ]→[フィルタ]→[オートフィルタ]をクリックすると、項目行に▼のボタンがつくと思います。
その▼ボタンをクリックして、部署項目の「営業」だけを選んでやると、営業部のデータだけが抽出されて表示されます。
的外れだったらごめんなさい。
    • good
    • 0
この回答へのお礼

早速のお返事ありがとうございます。
的外れだなんてとんでもないです。この機能を探していたのです。
ありがとうございました!
又何かありましたらよろしくお願いします。

お礼日時:2001/03/05 13:19

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aと関連する良く見られている質問

QExcelのセルにデータがある場合のみ表示させる方法

Excelでシート1に以下のデータ(全情報)を入力したとします。

日付 温度℃ 濃度% 投入量kg …
8/1  50   5.0
8/2  45
8/3  48
8/4  49   4.8
8/5  55
8/6  57
8/7  44   4.5   25

シート2に以下のように日付と濃度のデータが自動的に表示されるようにしたい(シート1にデータがあるセルだけシート2に表示させたい)のですがどのようにすればよいでしょうか?

日付 濃度
8/1  5.0
8/4  4.8
8/7  4.5

Aベストアンサー

次の方法は如何でしょうか。
配列数式の為、入力完了時にshift+ctrl+enterキーを同時押下して下さい。因みに、データ行数は200行の為、調整して下さい。
■シート2のA2に=IF(ROW(A1)-1<COUNTIF(Sheet1!$C$1:$C$200,">0"),INDEX(Sheet1!A:A,SMALL(IF(Sheet1!$C$1:$C$200>0,ROW(Sheet1!$A$1:$A$200),99999),ROW(A1))),"")
■シート2のB2に=IF(ROW(A1)-1<COUNTIF(Sheet1!$C$1:$C$200,">0"),INDEX(Sheet1!C:C,SMALL(IF(Sheet2!$C$1:$C$200>0,ROW(Sheet1!$A$1:$A$200),99999),ROW(A1))),"")
■設定後、両セルを選択して下方向にコピーして下さい。
 

Q「セルの書式設定」の「ユーザー定義」でセルの値がTRUEなら○FALSEなら×と表示する方法について

マイクロソフトのエクセル2000で
「セルの書式設定」の「ユーザー定義」を
[=1]"○";[赤][=2]"×"にすると、
1なら○、2なら赤字の×をセルに表示される機能がありますが、
これを応用してTRUEなら○、FALSEなら赤字の×をセルに表示したいと思い、
[="TRUE]"○";[赤][=FALSE]"×"と設定してみたのですが、
上手く行かず困ってます。どこが違うのか、それともこの方法では出来ないのかを教えてください。

補足
何故これをやりたいのかと言うと、フォームのチェックボックスを使用し
「コントロールの書式設定」の「リンクするセル」の返り値が
TRUEとFALSEなので、このセル自身を見やすい文字に変更したいと思ったので・・・。
リンクするセルと違うところに○×を置くのは簡単にif関数で出来るんですが、
リンクするセル自身を○×に置くのができないです。

お手数かと思いますが、セルの書式設定に拘らず、
何らかのヒントを知ってる方、教えてください。

Aベストアンサー

質問のような表示ができるようにしてみました。(Excel97,2000で確認)
チェックボックスが何個あるか分かりませんので、2個のケースです。数によって『チェックボックス-1用』等を増やして下さい。『チェックボックス-1』に『チェックボックス-1用』のマクロを登録します。

※質問から推測すると、フォームのチェックボックスを使われているようですが、Excel97以降ならコントロールツールボックスのチェックボックス(他のコントロールも)を使われたほうがいいと思います。新しいし、設定も楽でコードも書き易いです。下はフォームのチェックボックスということで思い出しながら書いてみました。(使えるプロパティが無いのが欠点ですね)

※チェックボックスのリンクするセルを見えないところ(セル)を指定して(別シートでも)、表示したいセルに
  =チェックボックスのリンクするセル番地*1 (または+0)とすれば
「True」、「False」という Bool値を数値に変換できるのでマクロは不要になると思われます。


チェックボックスのリンクするセルの書式は [=1]"○";[赤][=0]"×" とします。

↓ここから。チェックボックスのあるシートのコードウインドウに貼り付けます。
Dim ChechBoxAddress As String 'チェックボックスのリンクするセルの番地
Dim ChechBoxClickFlg As Boolean 'チェックボックスをクリックすればTrue

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target.Address = ChechBoxAddress Then
    'チェックボックスのクリックだけに反応させる
    If ChechBoxClickFlg = True Then
      '選択されたセルがチェックボックスのリンクするセルなら
      'True→1、False→0に書き換える(チェックボックスの選択状態は変わらない)
      If Target.Value = True Then
        Target.Value = 1
      Else
        Target.Value = 0
      End If
      ChechBoxClickFlg = False
    End If
  End If
End Sub

'チェックボックス-1用(個々のチェックボックス用。例:F3がリンクするセル)
Sub CheckBox1_Valuechange_Numeric()
  'リンクするセルをセットする
  ChechBoxAddress = "$F$3": selectChechBoxRange ChechBoxAddress
End Sub

'チェックボックス-2用(個々のチェックボックス用。例:F5がリンクするセル)
Sub CheckBox2_Valuechange_Numeric()
  'リンクするセルをセットする
  ChechBoxAddress = "$F$5": selectChechBoxRange ChechBoxAddress
End Sub


'チェックボックスのリンクするセルを選択する(共通)
' ※チェックスボックスのクリックではWorksheet_SelectionChangeが起きないため自力で動かす
Sub selectChechBoxRange(rgChkBox As String)
  Dim rg As Range 'アクティブセルの番地を退避
  Set rg = ActiveCell

  If rg.Address <> rgChkBox Then
    'アクティブセルがチェックボックスのリンクするセルでなかったらリンクするセルを選択する
    Range(rgChkBox).Select
  Else
    'アクティブセルがチェックボックスのリンクするセルならリンクするセルの斜め右下を選択する
    rg.Offset(1, 1).Select
  End If
  '元のアクティブセルを選択状態にする
  rg.Select
End Sub

質問のような表示ができるようにしてみました。(Excel97,2000で確認)
チェックボックスが何個あるか分かりませんので、2個のケースです。数によって『チェックボックス-1用』等を増やして下さい。『チェックボックス-1』に『チェックボックス-1用』のマクロを登録します。

※質問から推測すると、フォームのチェックボックスを使われているようですが、Excel97以降ならコントロールツールボックスのチェックボックス(他のコントロールも)を使われたほうがいいと思います。新しいし、設定も楽でコードも書き...続きを読む

Qエクセルの列で、例えばC~F(その列にはデータが入ってます)を表示させ

エクセルの列で、例えばC~F(その列にはデータが入ってます)を表示させないようにするにはどのようにすれば良いのでしょうか?

Aベストアンサー

C~F列をドラッグして右クリックして、非表示をクリックしてください。
再表示したい場合は、B~G列を右クリックして再表示をクリックしてください。

Qエクセルのセルにカレンダーを表示させ、日付をセルに入力させたい

エクセルについて教えて下さい。

エクセルのセルをクリックすると、
カレンダーのようなものが表示され、
マウスで選択すると、
セルに日付が入力されるようにするには
どうしたらよいですか?

すみませんが、宜しくお願い致します。

Aベストアンサー

#02です。foo-mさんがVBAをお使いになるなら、以下のサンプルをいじってみてください。

このサンプルはC4セルがクリックされたときにカレンダーコントロールを表示して、日付を選んだらその日付をC4に書き込み、カレンダーコントロールを閉じるマクロです。

Private Sub Calendar1_Click()
Selection.Value = Calendar1.Value
ActiveSheet.Calendar1.Visible = False
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$C$4" Then
ActiveSheet.Calendar1.Visible = True
End If
End Sub

マクロはシートのモジュールとしてペーストして下さいね

QExcel セル範囲のデータをユーザーフォームのテキストボックスへ表示するには

範囲選択したセル内のデータを削除する前に、ユーザーフォームのテキストボックス内にデータを移すという作業をVBAで作成したいのですが、調べても見つかりません

どのようにしたらいいでしょうか?

Aベストアンサー

セル範囲をループし変数に値を蓄積していき、最後に
テキストボックスに転記という方法がありますが、
手っ取り早いのはコピペです。

Selection.Copy
Me.TextBox1.Paste


人気Q&Aランキング

おすすめ情報