No.1ベストアンサー
- 回答日時:
質問者さんの意図とは少し違いますが、次のような簡単な方法があります。
適当な回答がなければ、ご検討ください。(1)2枚目以降のシートで =sheet1!A1 などとして、1枚目のシートの該当するセル範囲(これから入力される可能性のある部分を含む)のデータをすべて取り込む
(2)オートフィルタで望みの行だけ表示する
(3)1枚目のデータが増えたり変更されたりしたら、フィルタの「再適用」(2007ではボタンあり)をして最新の結果を得る
(2007とその97-2003互換モードで確認しました。)
No.2
- 回答日時:
この質問の内容は、VBA向きです。
>マクロはよくわからないのと
エクセルで、操作で出来そうに無いことで、何かやりたいことを実現するには、VBAを勉強してください。勉強しないで、楽したいこと、難しいことをやりたいといっても、無理です。
>最初に開くときに面倒なので
何のことだかわかりません。
ーーーー
入力の都度でなく、一応入力が終わってからなら、
フィルターを行い、コピー貼り付けを繰り返す
フィルタオプションの設定を繰り返す
ソートして区分ごとにコピー貼り付けを繰り返す
部門ごとの連番を振って関数で処理する(下記。自称 imogasi方式)
ーーーーー
例データ
A列 B列 C列 D列
コード内容計数連番
人事x121
営業y21101
総務z31201
人事u412
人事v423
営業s43102
総務t12202
総務v12203
人事w124
ーー
どの列でもよいが(各部100人以内と仮定する)
H列 I列
人事0
営業100
総務200
ーーーーーーー
D列の式は
=VLOOKUP(A2,$H$1:$I$3,2,FALSE)*1+COUNTIF($A$2:A2,A2)
下方向に式を複写。
各部別に、出現別に、連番を振っている。
ーー
Sheet2で
A2に
=INDEX(Sheet1!$A$1:$C$100,MATCH(ROW()-1,Sheet1!$D$1:$D$100,0),COLUMN())
C2まで式を複写。
A2:C2を下方向に式を複写
結果
人事x12
人事u41
人事v42
人事w12
#N/A#N/A#N/A
ーー
Sheet3のA2で
=INDEX(Sheet1!$A$1:$C$100,MATCH(ROW()-1+100,Sheet1!$D$1:$D$100,0),COLUMN())
MATCH(ROW()-1+100とここで100足していることに注意。
以下人事の場合と同じ。
総務の場合は200を足す。
結果
営業y21
営業s43
#N/A#N/A#N/A
#N/Aを出さない方法の点は省略。imogasi方式でGoogle照会すれば、何処かに書いている。
ありがとうございます
参考にさせていただきます
VBAを一応勉強し、ボタンを作ったり、若干編集もできるようにはなりましたが、能力不足やあまり使わないこともあって、なかなか使いこなせません。
それとそのブックを開くときにマクロを有効にするかどうか毎回聞かれるのがうっとうしいのです。作ったマクロが気に入ってすべてのブックに適応させたりすると、必要でないブックであっても開くときにいちいち聞いてきていらいらします。聞かれないよう設定できるのかもしれませんが、今のところその方法は不明です。
とにかく私の希望はマクロを使わないで済ませたいのです
imogasiさんのVBAを使わないで済ませる方法を参考にしながら、なんとか作っていきたいと思います。
ありがとうございました
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) エクセルについて教えてください。 3 2023/06/28 09:11
- Excel(エクセル) エクセルで最下行にデータを追加するVBA 6 2023/05/09 09:30
- Excel(エクセル) エクセルシートのデータを1列飛ばしで別ブックのシートに貼り付けるマクロが知りたい 2 2023/06/05 22:37
- Excel(エクセル) EXCEL 関数を教えてください。(A列の同じ値が複数ある場合vlookupで出来ますか) 4 2022/12/07 20:54
- Excel(エクセル) 複数セルデータを別シートの単一セルにコピーしたい。(詳細をご参照ください) 1 2022/12/14 15:08
- Excel(エクセル) Excelマクロ 差分抽出の方法が知りたいです。 2 2023/03/07 13:25
- Excel(エクセル) Excelで、別シートの表のステータスに伴った動的な自動転記をしたいです。 2 2023/06/14 15:56
- Excel(エクセル) エクセルのマクロで複数シートを両面印刷するには? 2 2022/12/08 23:23
- Visual Basic(VBA) Excel VBA 最終行を取得しVlookup関数をコピーする方法をコーディングで教えてください。 3 2023/05/11 13:14
- Excel(エクセル) シートが違う2枚のエクセルシートにある数値を別シートにコピーしたい(VBA?) 8 2022/03/31 12:24
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【関数】スペースがいくつ入っ...
-
西暦や和暦の表示をyyyymmdd表...
-
【Microsoft Office Excel Comp...
-
Excelはなんで先頭の0を消すん...
-
Excelのセルを飛ばして入力する
-
別シートからの文字を変更
-
エクセルの行の抽出について質...
-
Excelのオートフィル
-
Excel 2019 のピボットテーブル...
-
スプレッドシート クエリ関数 1...
-
excelの不要な行の削除ができな...
-
Excel初心者です。 詳しい方、...
-
【Excel】セル内の時間帯が特定...
-
Excel初心者です。 詳しい方、...
-
EXACT関数とIF関数の組み合わせ...
-
Excelのグラフ軸について
-
スマートな関数を教えて下さい。
-
Excelで全角を半角にしたいので...
-
【マクロ】エクセルにかいてあ...
-
Excel:一部のフォントでセルの...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ファイル内にある数字の出現回...
-
Excel関数の先頭に「@」が入っ...
-
エクセルの気味悪い不思議
-
Excel VBAで、実行時にsheet上...
-
表示されている人数だけを数え...
-
他人が作ったマクロの理解
-
Excelの関数について質問です。
-
Excel 集計表
-
エクセル 日時の計算式について
-
Excelの関数に関して質問です。...
-
エクセル:セル内の文字列の下...
-
絞り込み検索
-
エクセルの関数で
-
エクセルの書式設定について教...
-
余分なEXCELファイルに印刷され...
-
VBA 同一シート内での転記の仕方
-
長期休みの関数はありますか
-
Excelの空のセル
-
エクセルで入力してある文を別...
-
Excelのマクロで、セルを結合し...
おすすめ情報