• ベストアンサー

ある文字が含まれているセルのみを抜き出す方法

たくさんあるセルの中から、ある文字が含まれているセルのみを印刷したいのですが、 やり方が思いつきません。 例えば”裁判所”という文字が含まれているセルのみを 抜き出して印刷したいのです。 ctrl+F→すべて検索ボタンを押す と、「”裁判所”という文字」が含まれているセルの一覧表がでます。 これらのセル(その文字が含まれているセル全部)をコピペ したいのですが、どうしたらいいのでしょうか? 一個一個コピーしていくのではなく一括でコピーできないものでしょうか? ある文字の含まれているセルのみを印刷したいのです。 よろしくお願いします。

質問者が選んだベストアンサー

  • ベストアンサー
  • llalpple
  • ベストアンサー率17% (33/186)
回答No.1

  文字列がA列に入ってるとして、B列に =IF(ISERROR(FIND("裁判所",A1)),0,1) を入れてA列の文字列が入っている所までコピーします。 B列で整列すれば「裁判所」のある行が並びますからそれを印刷して下さい。  

karasu4649
質問者

お礼

教わった方法で B列に0と1が表示されましたので、C列に=If(B1=1,A1,"") と打ち、オートフィルをして抜き出しに成功しました。 お忙しいところありがとうございました。m(__)m ところで、C列に出来た空白セルを一括で消したいのですが どのようにしたらうまくいくものなのでしょうか?

karasu4649
質問者

補足

自己解決できました。 selection.specialcells(xlcelltypeblanks).select とVBAで実行し、 空白セルのみを選択してから空白セルを一括削除しました。 このたびは大変助かりました。 ありがとうございました。

その他の回答 (2)

  • yastaro
  • ベストアンサー率23% (5/21)
回答No.3

Sheet1に”裁判所”の文字がたくさんのセルにあるとして、 Sheet2のA1に次の式を貼り付け、縦横にコピーすると どうでしょう? =IF(ISERROR(FIND("裁判所",Sheet1!A1)),"",Sheet1!A1)

  • mshr1962
  • ベストアンサー率39% (7418/18948)
回答No.2

縦方向に並んでるのであれば「データ」「フィルタ」「オートフィルタ」で その列の▼を押して「オプション」を選択して「裁判所」「を含む」とすれば その行だけを表示します。印刷が終わったら▼を押して「すべて」で元に戻ります

関連するQ&A

  • 特定の文字をが含まれたセルを検索し、値をクリアする方法

    商品名:で始まるセルと、品番:で始まるセルを一括でクリアする方法についておたずねします。 削除してセルをシフトするのではなく、値をクリアするだけです 「商品名:あいう」「商品名:かきく(100)」「商品名:たちつ120」 このような感じに 商品名:の後には文字や数字、()や記号など色々と入ります。 現在は下記の手順でクリアしています 1.CTRL+Fで検索窓を立ち上げる 2.検索する文字列のところに 商品名: を入力 3.すべて検索クリック 4.検索窓の上でctrl+a 5.シートの上で右クリック 6.数式と値のクリア 7. 2.に戻り、検索するする文字列に 品番:を入力 このような手順で当該セルをクリアしているのですが もっと簡単に当該セルをクリアする方法はないでしょうか。 エクセルのバージョンは2003です。 ご教授お願いいたします。

  • エクセル2003 VBAなのですが

    エクセル2003 VBAなのですが   A   B    C    D    E    F 1 あ   い   う   お   う   123 2 お   さ   え   あ   お   お 3 あ   い   え   お   え   888 上記のような表があるときに 3個以上同じ文字がある場合にセルに色をつけていきたい状況です 上記表でいうと『あ』と『え』と『お』のセルに色をつけたいのです セルには文字列のほかに数字も入っている状況です 単純にCtrl+Fで検索をして『すべて検索』で 出てきたセル全部に色をつける。 それをA1から文字があるところ全部やる と言った事をマクロでやりたいと思っております。 皆様よろしくお願いいたします。

  • セルに入りきらない文字

    エクセルで表を作成しました セルの中の文字が多くて、印刷してみたら入りきらない場合があったのですが、 プレビューではきちんとセルの中に入っているのです。 プレビューと実際の印刷は違うものなのでしょうか?

  • セルの幅、書式、文字など全てのコピー

    既にできあがった表をそのままセルの幅や文字をそのままコピーして隣に貼り付けたいのですが、そのままコピーと貼り付けをすると、セル幅がすべて標準値になってしまうようです。セル幅も文字も選択範囲は全て一緒にコピーして貼り付ける方法とかありますか?またセル幅だけでもコピーする方法がありましたら、教えてください。 こんがらがってきてわからなくなってきました。 Excel2000です。 よろしくお願いします。

  • EXCEL VBA でCTRL+Fのダイアログからすべての検索で一覧表

    EXCEL VBA でCTRL+Fのダイアログからすべての検索で一覧表示 Application.Dialogs(xlDialogFormulaReplace).Show "置き換え文字", "置き換え文字" までは、こちらのサイトで発見! すべての検索ボタンから一覧表示が可能ですか?

  • excel VBA 緑色の付いたセルをすべてコピー

    お世話になります。excel2007です。 緑色の付いたセルをすべてコピーするマクロを作成したいのですが・・・ マクロの記憶の実行 検索(ctrl + F) ⇒ オプションでセルを緑 ⇒ すべて検索 ⇒ 検索結果をすべて選択(ctrl + A) ⇒ 検索を閉じる ⇒ コピー(ctrl + C) マクロの記憶の終了 エクセル上ではしっかりコピーできています。 VBAは以下の通りでした Sub 緑色のセルをすべてコピー() ' 緑色のセルをすべてコピー Macro    With Application.FindFormat.Interior     .PatternColorIndex = xlAutomatic     .Color = 5287936     .TintAndShade = 0     .PatternTintAndShade = 0    End With    Selection.Copy End Sub このマクロを実行しても、現在選択されているセルを コピーしてしまいます(緑色を検索してくれないです)。 どのようにVBAを編集すればよろしいのでしょうか??

  • セルの文字を消したい

    WIN XP エクセルです セルに文字が入っています(印刷されます) その文字を消したいのですが消えないのですが・・・ デリートキー等は無効 空白セルを入れると消えます (しかし印刷時に当然無駄な空白な紙が出てしまいます) 未表示のセルがあるのかと思い全部表示にしても何処に文字が入ったいる状態なのか解りません 当然文字の上にマウスを置いても通常文字がそこにあれば上の数式が表示されるまどにも表示されるのですが表示されません 以上の状態です 宜しくお願い致します

  • 複数のセルの文字列を結合して1つのセルに収める方法

    いくつかの行または列のセルに入っている文字列を 結合して1つのセルに収める方法がありますか? 今はコピーペーストを繰り返すだけですが、数が多いと大変です。 メニュー「データ」から「区切り位置」の逆に近いことをやりたいのです。対象のセルを選んでたとえばCTRL+ XXキーでできればほぼ望みに近いものです。 よろしくお願いします。   

  • Wordでセル内の文字を選択してタブを挿入する方法

    Word2010で二列の表を使って、対訳形式で翻訳作業をする際に、タブがうまく反映させることができないし、検索しても見つからないので、質問させていただきます。 表のセル内でタブを挿入するには、tabではなくて、ctrl+tabを入力すれば、数文字空けることができます。 ですが、選択した文字全体に、タブを反映させることが、この方法では、できないので、困っています。 図の右側が訳の部分です。右上セルの下側のように、長いので改行されてしまう部分にも、ちゃんとタブが反映されるようにしたいです。ですが、直接入力してうまく反映させる方法が分かりません。これはコピペしてうまく反映させましたが、それだと、対訳しながら作業する意味がありません。 文頭にカーソルを置いて、ctrl+tabを押せば、右下セルのようになります。ですが、ご覧のように、長くて改行されてしまう箇所にタブが反映されません。訳出の際の混乱を防ぐために、この作業を行なっているのに、タブがリセットされてしまうと、訳が分かりにくくなってしまいます。 どのように入力すれば、表内に、ちゃんとタブを反映させたい部分全体を、指定して反映させることができるでしょうか?それとも、タブを反映させたい場合は、表組みで作業しない方がいいのでしょうか? お知恵を拝借できれば助かります。

  • 多数のセルに入力してある数式を$を使わずに絶対参照コピーする方法

     初めて質問いたします。  技術系計算をエクセルで組み立てる際、多数のセルに入力されている相当長い数式等を$を使用することなくコピーする方法を教えてください。  以前他のサイトで、単にコピーしたいセルを選びCtrl+C Ctrl+V 程度の操作で一括絶対参照コピーができる(コピーした先のセル内の数式にも$がつていなかったように記憶しています)を覚えたのですがその操作方法を忘れてしまいました。   多数のセルを対象にしていますのでF4 キーによる変換では相当な時間がかかるので投稿しました。  宜しくお願いいたします。

専門家に質問してみよう