エクセルの学校：全文検索：Hyper Estraier： cell filename

Results of 1 - 1 of about 295 for cell filename (0.001 sec.)

cell (1170), filename (1981)

[[20061027115220]]: #score: 11170; @digest: 35434ab0bbd52ba72750d4cddb85be2b; @id: 26216; @mdate: 2012-02-13T05:15:36Z; @size: 6421; @type: text/plain; #keywords: myshi (49106), トd (7899), ト群 (7799), トc (6699), トb (5486), トa (4069), 数シ (3273), ルb2 (3154), は” (2792), 空の (2786), 便乗 (2721), シー (2704), 表! (2514), ート (2150), filename (1911), 一覧 (1873), 覧表 (1762), クシ (1666), ベタ (1594), のワ (1569), cell (1408), スレ (1310), ーク (1148), 抽出 (1093), 別シ (1057), ワー (1047), 欄に (904), 情報 (899), 新規 (856), 複数 (800), worksheets (799), の抽 (784); 『複数シートのセルの抽出』（エイミー）
シートが複数あり、ある決まったセルのみを抽出し、新たなシートに一覧表を作成したいのですが。。。教えて下さい。例）シートAのセルB2欄には”AA1”とB3欄には”BB1” シートBのセルB2欄には”AA2”とB3欄には”BB2” シートCのセルB2欄には”AA3”とB3欄には”BB3” がそれぞれ入力されているとして、新たなシートDに AA1 BB1 AA2 BB2 AA3 BB3 の一覧表を作成したい宜しくお願い致します。 ---- =シートA!B2 =シートA!B3 AA1 BB1 =シートB!B2 =シートB!B3 AA2 BB2 =シートC!B2 =シートC!B3 AA3 BB3 ということでしょうか? 抽出条件も考慮した式をお望みなのでしょうか? (Ohagi) ---- 早速ありがとう御座います。シートが100個位あり、上記の式を入れるのが面倒なんです。何か良い方法ありませんか? ---- シートDの構成はどうなるのですか? 一覧表となっていましたので、複数のセルを参照させたいのは分かりますが… 抽出元のセル番地と抽出先のセル番地に一貫性はあるのでしょうか? >ある決まったセルのみを抽出何を条件にすると「決まったセル」になるのでしょうか? 一行目が、シートA B列二行目が、シートB B列三行目が、シートC B列行番号 = 列数シートDのA1セルから入力であったなら A1 =INDIRECT("シートA!B"&COLUMN()+1) A2 =INDIRECT("シートB!B"&COLUMN()+1) A3 =INDIRECT("シートC!B"&COLUMN()+1) として、横にコピーシート名の一覧を取得して参照させたらいかがです? [[20040712163424]]『複数シートのシート名と特定セルの内容をリストに』（taka） (Ohagi) ---- ベタベタなんですが各シートのB2,B3のデータをDシートへ Sub Test() Dim myShi As Worksheet For Each myShi In Worksheets If myShi.Name <> "D" Then With Worksheets("D").Range("A65536") .End(xlUp).Offset(1, 0).Value = myShi.Range("B2").Value .End(xlUp).Offset(0, 1).Value = myShi.Range("B3").Value End With End If Next End Sub (kyoko) ---- すばらしい!できました! ありがとう御座いました! ---- 横から便乗しましてすみません。 kyokoさんので私も参考にさせて頂き助かりました。逆バージョンはできないかと検索してみましたが、まだまだ勉強不足のためこれぞというものがみつけられません。エイミーさんのを例にさせて頂きますと、もともとシートDの一覧になっているものが最初に用意されているとしてそれぞれのシートの決められた箇所（ここでいうとB2,B3でしょうか）に値がいくようになるマクロはありますでしょうか。どなたかよろしくお願いいたします!（みきたん） ---- 数式ですが・・・。 ↓「表」シートの状態 [A] [B] [C] [1] シート名 B1へ B2へ [2] シートA AAA AAAA [3] シートB BBB BBBB シートA,シートBの B1セルへ =VLOOKUP(MID(CELL("FILENAME",A1),FIND("]",CELL("FILENAME",A1))+1,LEN(CELL("FILENAME",A1))),表!A:C,2,FALSE) B2セルへ =VLOOKUP(MID(CELL("FILENAME",A1),FIND("]",CELL("FILENAME",A1))+1,LEN(CELL("FILENAME",A1))),表!A:C,3,FALSE) 各シートへは、作業グループにして入力すると一度で入力出来ると思います。テスト試行は、保存してあるブックでなさって下さい。解決できない様で有れば、新たにスレをたてられるのが宜しいかと思います。 (HANA) ---- 恐れ入ります、便乗で教えていただきたいのですが、 kyokoさんの↓ Sub Test() Dim myShi As Worksheet For Each myShi In Worksheets If myShi.Name <> "D" Then With Worksheets("D").Range("A65536") .End(xlUp).Offset(1, 0).Value = myShi.Range("B2").Value .End(xlUp).Offset(0, 1).Value = myShi.Range("B3").Value End With End If Next End Sub これで非常に助かりました。ありがとうございました。ひとつ質問なんですが、串刺し計算の為に、先頭に空のワークシートAと「集計」(上記で言う所のDシート)の前に空のワークシートBを用意し、この空のワークシート間でのみシートを増幅させ、計算式を守っています。現在、一覧には全てのワークシートが反映されてしまいますので、この空のワークシート2枚を除外させる方法を教えていただけませんでしょうか。仮に名前を「空のワークシートA」「空のワークシートB」とします。やっとマクロに足を踏み入れたばかりの初心者です。何卒お力をお貸し下さいませ。宜しくお願いします。 (JUJU) ---- And で条件をつなげます。 If myShi.Name <> "A" And myShi.Name <> "B" Then (ROUGE) ---- ROUGE様早速のレスありがとうございました。お陰様でうまく実行できました。ありがとうございました! (JUJU) ---- 失礼します。初心者です。複数シートのセルの抽出でkyokoさんの Sub Test() Dim myShi As Worksheet For Each myShi In Worksheets If myShi.Name <> "D" Then With Worksheets("D").Range("A65536") .End(xlUp).Offset(1, 0).Value = myShi.Range("B2").Value .End(xlUp).Offset(0, 1).Value = myShi.Range("B3").Value End With End If Next End Sub こちらで、自分のシートにもB2、B3に当てはまるセルを別シートに一覧表示させることができました。さらに、50程度のセルを別シートに一覧表示させたいと思っています。 B2の情報は別シートのA2から下に、 B3の情報は別シートのB2から下に一覧となって表示されました。ということは、B4、B5、C1、・・・は別シートのC2、D2、・・・というふうに表示できるのかと考えています。また、もうひとつ、可能でしたら教えていただきたいのは、元のシート群には、 B2に情報が入っている場合と入っていない場合があり、できた表をみたところ、情報が入っていないセル分は上に詰められてしまっているようです。情報が入っていないセルも空のまま一覧に表示させる方法はありますでしょうか。どなたか教えていただけたらうれしいです。 n -------------------------------------------------------------------------------- ---- このスレは大人気ですね。どこかにリンクでも有るのかな?? Google先生のキャンペーン? ＞元のシート群には、 B2に情報が入っている場合と入っていない場合がありと言う事であれば、ロジックを少し変えた方が良いのではないかと思います。長くなってこのスレ自体も読みにくくなって仕舞うといけませんので新規で質問をされるのが良いと思います。同じ様な質問を探してみると、もっと適したサンプルが見つかると思います。新規で質問をする事に抵抗が有るなら、探してみられても良いかもしれません。 (HANA) 2012/02/09 ---- 2006年のスレ・・。 ---- アドバイスありがとうございます。複数シートのセルの抽出という検索を考えつくのにも数か月かかっていて、やっとヒットしていい感じにできたので、ついでにと思ってしまいました。失礼しました。確かに、2006年、古いですね。こちらを引用?する感じで新規で質問してみたいと思います。 ---- nさんは↓こちらで新規で質問されました。 [[20120209133706]] 『複数シートのセルの抽出A』（n） (HANA) ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/200610/20061027115220.txt - [detail] - similar

PREV NEXT

訪問者：カウンタ