
こんにちは。
仕事で伝票を管理しているエクセルデータを管理ソフトに一括でインポートするため、管理ソフト用のデータ作成をしようとしています。
図のように伝票番号ごとに(色分けごとが1枚の伝票)管理しています。
これを管理ソフトインストール用にするには、1枚の伝票に使用した「桁数」が必要で、更に伝票の最後に1行増え、品名の欄に「伝票番号」がきます。
関数で何とかしようとやり始めましたが、お手上げになりました。
伝票の枚数が多いので、時間短縮できるよう、やり方を教えてくださる方のお力をお借りできるとありがたいです。
お手数をおかけしますが、よろしくお願いいたします。

No.2
- 回答日時:
一方通行で良いなら
まず、そのままデータ(シート)のコピー
データ - 小計
○グループの基準 伝票
○データの個数
○個数
できた左の[2]をクリックして
個数の部分を選択して[Alt]+[;]
0 を入力して[Ctrl]+[Enter]
金額も同様
[3]でもどして
データ - 小計 [すべて削除]
総合計の行も削除
「伝票」列の[Ctrl]+[H]置換
*データの個数 → (空白)
「品名」列を選択し[Ctrl]+[G]ジャンプ
[セルの選択]●空白セル OK
=B4
[Ctrl]+[Enter]
日付も同様
桁番号はG列としてG2セルに
=IF(B2="",G1+1,COUNTIF(B$2:B2,B2))
フィルハンドルダブルクリック
数式は値ににして列の並びを変える
不要な列は削除

すごーい!
こんな機能使ったの事がありませんでした。
エクセルはいろんなことができるんですね。
やってみたら、できました!!
ただ、いろんな人がこれをやることになると思うので、もう少し手数が少ない方法があると助かります。
ご親切に教えてくださり、ありがとうございました。
No.1
- 回答日時:
桁番号はCOUNTIF関数を使った工数を数えるスタンダードなやり方でできるでしょう。
=COUNTIF(A$1:A1,A1)
これをC1セルに入力して、必要な行までセルをコピーする…って方法。
日付順に並ぶ品名の下に1行追加してそこへ伝票番号を入れるのは、正直なところ、一つずつ手で修正することを勧めます。
なるほど!
そうやってカウントしていく方法がありますね。
今、一番ネックになっているのは、1番下に1行追加して伝票番号を入れるところなんです(´・ω・`)
そこが自動化できれば助かるな~と思っています。
ご親切に教えてくださり、ありがとうございました(^^)
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(データベース) 伝票番号、品番、在庫としてマクロでもAccessでもデータ表を作りたいのですが、ご指導お願いします 1 2022/11/13 23:48
- メルカリ らくらくメルカリ便でクロネコヤマトを使って商品を送ってもらいましたが数日経っても伝票未登録のままです 1 2022/09/29 19:56
- Java Java 配列<選挙> 4 2023/07/31 15:07
- その他(ビジネス・キャリア) 正社員と同じ内容のしごとでなければ契約社員はかんたんに雇い止めできるの??? 6 2023/01/14 17:31
- Visual Basic(VBA) EXCEL関数LOOKUPとFILTERについての質問です 1 2022/12/21 05:53
- その他(パソコン・スマホ・電化製品) エクセル初心者です。 仕事でエクセルを使っていて、普段は素人でもできる簡単な関数を使ったことがある程 1 2022/05/25 11:17
- Excel(エクセル) エクセルで納品書(入伝票)を作成 7 2022/04/14 10:15
- Visual Basic(VBA) VBAコードが作動せず、どこに問題があるのか教えて下さい。 3 2023/06/13 13:20
- その他(ソフトウェア) 現在と過去の顧客名簿、新規・解約・更新など作りたいのですが「やよいの顧客管理」なら簡単に扱えますか? 1 2022/05/18 10:44
- 分譲マンション 総会前にきて、管理会社のフロントマンに振り回され役員一同が困っています。 5 2023/05/15 03:12
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・一番好きなみそ汁の具材は?
- ・泣きながら食べたご飯の思い出
- ・「これはヤバかったな」という遅刻エピソード
- ・初めて自分の家と他人の家が違う、と意識した時
- ・いちばん失敗した人決定戦
- ・思い出すきっかけは 音楽?におい?景色?
- ・あなたなりのストレス発散方法を教えてください!
- ・もし10億円当たったら何に使いますか?
- ・何回やってもうまくいかないことは?
- ・今年はじめたいことは?
- ・あなたの人生で一番ピンチに陥った瞬間は?
- ・初めて見た映画を教えてください!
- ・今の日本に期待することはなんですか?
- ・集中するためにやっていること
- ・テレビやラジオに出たことがある人、いますか?
- ・【お題】斜め上を行くスキー場にありがちなこと
- ・人生でいちばんスベッた瞬間
- ・コーピングについて教えてください
- ・あなたの「プチ贅沢」はなんですか?
- ・コンビニでおにぎりを買うときのスタメンはどの具?
- ・おすすめの美術館・博物館、教えてください!
- ・【お題】大変な警告
- ・洋服何着持ってますか?
- ・みんなの【マイ・ベスト積読2024】を教えてください。
- ・「これいらなくない?」という慣習、教えてください
- ・今から楽しみな予定はありますか?
- ・AIツールの活用方法を教えて
- ・最強の防寒、あったか術を教えてください!
- ・歳とったな〜〜と思ったことは?
- ・モテ期を経験した方いらっしゃいますか?
- ・好きな人を振り向かせるためにしたこと
- ・スマホに会話を聞かれているな!?と思ったことありますか?
- ・それもChatGPT!?と驚いた使用方法を教えてください
- ・見学に行くとしたら【天国】と【地獄】どっち?
- ・これまでで一番「情けなかったとき」はいつですか?
- ・この人頭いいなと思ったエピソード
- ・あなたの「必」の書き順を教えてください
- ・14歳の自分に衝撃の事実を告げてください
- ・人生最悪の忘れ物
- ・あなたの習慣について教えてください!!
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Accessフォームのボタンの二度...
-
弥生会計11 現金出納帳 並び替え
-
エクセルでシリアリナンバーを...
-
勘定奉行での伝票の追加方法
-
アクセスのパラメータに既定値...
-
エクセルにて伝票番号ごとに小...
-
Excel VBAについて
-
何か言い方ある?「毎月最終水...
-
数量・会社ごとに異なる単価表...
-
弥生会計って酷くないですか?
-
弥生会計と、マネーフォワード...
-
「弥生・会計」の導入に関して...
-
総合振込形式のFBデータが作成...
-
弥生販売14pro のテーブル構成...
-
PCA商魂 エクスポートについて
-
弥生販売08の親機と子機を入れ...
-
Quickbooks
-
弥生販売と弥生会計のソフトを...
-
弥生会計に移行
-
「弥生会計」は毎年買い替える...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
アクセスのパラメータに既定値...
-
ヤマト運輸 宅急便の社員割引...
-
Accessフォームのボタンの二度...
-
勘定奉行の売上削除
-
【弥生販売】請求締切後の売上...
-
会社で複写式伝票を手書きで作...
-
伝票のプリンタはレーザーかド...
-
エクセルにて伝票番号ごとに小...
-
弥生会計11 現金出納帳 並び替え
-
勘定奉行での伝票の追加方法
-
エクセルでシリアリナンバーを...
-
Excel VBAについて
-
弥生会計の伝票バインダ
-
弥生販売で数量や金額に0ゼロ...
-
弥生販売の請求書番号を印刷し...
-
弥生会計の印刷
-
プリンターで印刷できる、複写...
-
弥生販売で売上伝票をエクスポ...
-
excel VBAで納品書の雛形から納...
-
PCA社の会計ソフトの専用帳票は...
おすすめ情報
こんばんは。
マクロで変換できると非常に有り難いです(*´ω`*)
区分けは「伝票番号」です。
色分けは、伝票が分かれているのが理解しやすいようにしてあるだけで、実際には色分けはしていないです。
「999」の送料は発生する人もいるし、かからない人もいるので、必ずあるとは限りません。
1枚の伝票で何品かお買い上げになっていて、送料があったりなかったりです。
その売り上げがエクセルの表でずらーと並んでいます。
日付けの順番もバラバラなので「伝票番号」だけが区切りになります。
わかりずらくて申し訳ありません。
よろしくお願いいたします。
すごい!!!すごい!!!すごすぎる!!!!!!
手品みたいです!!!
ありがとうございます(≧▽≦)
わ~、これがあれば業務が進みます。
実際のデータはもっと沢山の項目がありますが、これは
For Each k In Array(1, 2, 3, 6, 5, 4) '項目の順序
や
With .Range("A1:F1")
.Value = Array("日付", "桁番号", "品番", "品名", "個数", "金額")
の項目を増やしていけばいいのでしょうか?
興奮冷めやらぬ状態です!!
嬉しいです!
Sheet1は以下の項目です。
"日付","相手先出荷番号","注文番号","ご注文方法","項目","その他","金額","数量","商品名"
Sheet2は以下の項目です。
"削除マーク","締めフラグ","チェック","日付","伝票番号","伝票区分","取引区分","税転嫁","金額端数処理","税端数処理","得意先コード","空白1","担当者コード","行番号","明細区分","商品コード","空白2","商品名","課税区分","単位","入数","ケース","倉庫コード","数量","単位","金額","空白3","税抜き金額","原価","原単価","備考","納入期限","受入残数","数量少数桁","単位少数桁","規格・型番","色","サイズ","伝票区分","得意先名1","空白5","空白6","空白7","空白8","空白9","空白10","空白11","空白12","空白13","空白14","空白15","空白16","得意先名2"
これは、この間の質問で WindFallerさんに教えていただいたマクロで作成しました(*^_^*)
大変役立っております。
お世話になりっぱなしで申し訳ありませんが、もうしばらくご指導よろしくお願いいたします。
すみません。
Sheet1の”相手先出荷番号”が質問した「商品名」の下にくる「伝票番号」です。
Sheet2の”伝票番号”は管理ソフト側の伝票番号なので、自動記入のため、関係ありません。
わかりづらくて申し訳ありませんが、よろしくお願いいたします。
すみません。
こちらに書いた方が良かったんですよね。
もう一度、同じ内容ですが、記載いたします。
何度もやり直しをしながら作成をしてくださっているようで、本当に有り難く何とお礼を申し上げたらよいかわからない程、感謝しております。
ありがとうございます。
以前の質問内容と記述が異なり、紛らわしくて申し訳ありません。
桁番号は、Sheet1には存在しておらず、Sheet2では"行番号"にあたります。
Sheet1の”相手先出荷番号”が質問した「商品名」の下にくる「伝票番号」です。
ですので以前の質問の「伝票番号」⇒「相手先出荷番号」です。
以前の質問の「品名」⇒「商品名」となります。
こんな面倒なことをお願いし、申し訳ありません。
どうぞ、よろしくお願いいたします。
ありがとうございます(*゚▽゚*)
本当にご面倒をお掛けし、申し訳ありません。
本当に本当に助かります。
ご親切にありがとうございます。
よろしくお願いしますm(__)m
すご----------い!!ヽ(^o^)丿
できました!ありがとうございます!
本当に感動で鳥肌がたちました(#^.^#)
甘えついでに、もう一箇所だけ教えていただいても宜しいですか?
これで、もう完璧になり、誰にでも使ってもらえそうです。
「削除マーク」「締めプラグ」などは伝票を記入する際、必ず同じ数字を記入する必要があります。
対応表に追加しました。(ピンク色)・・・図①
マクロを作成できない私は、関数で何とかしようと、Sheet1に追加した欄には「=IF(I4="","","1")」を入れて商品名が入ったら「1」など規定の数字が入るようにしました。
試してみると図②になってしまいました。
なりたい形としては図③です。
何度もお時間をいただき申し訳ありませんが、これが最後だと思いますので、どうぞよろしくお願いいたします。
WindFallerさま
できました!!!めっちゃ綺麗にできました\(◎o◎)/!
感動以外ないです。
本当にありがとうございました。
>それにしても、今回、詳しい説明をしていませんでしたが、仕様変更にもかかわらず、よく設定・実行ができたことに、かなり驚きました。
マクロは以前すこーしだけ学んだことがあって挫折しました・・・
なので、貼り付け場所や実行方法などはわかっているので、なんとかできました。
こんな魔法のようなマクロを作成していただいたことに深く感謝いたします。
本当にありがとうございました。
ベストアンサーは皆さんがよく使用しそうな初めに送っていただいた回答にさせていただきますね。
長きに渡りお付き合いありがとうございました。
何度お礼を言っても足りないくらいです。
本当に感謝です。ありがとうございました。