- ベストアンサー
エクセル関数で伝票の発送代金を調整する方法
tom04の回答
No.1~3・7です。 >「先頭の一つ」ではなく、「最後の一つ」にまとめて >加算することもできるのでしょうか? というコトですので・・・ No.1の画像の配置通りで、データが3行目からあるとします。 Excel2007以降のバージョンではE3セルに =IF(A3="","",IF(AND(B3=MAX(IF(A$3:A$1000=A3,B$3:B$1000)),COUNTIFS(A:A,A3,B:B,B3)=COUNTIFS(A$3:A3,A3,B$3:B3,B3)),B3+SUMIF(A:A,A3,D:D),B3)) Excel2003までのバージョンではE3セルに =IF(A3="","",IF(AND(B3=MAX(IF(A$3:A$1000=A3,B$3:B$1000)),SUMPRODUCT((A$3:A$1000=A3)*(B$3:B$1000=B3))=SUMPRODUCT((A$3:A3=A3)*(B$3:B3=B3))),B3+SUMIF(A:A,A3,D:D),B3)) どちらも配列数式ですので、Shift+Ctrl+Enterで確定してみてください。 ※ No.7の画像のようにデータが2行目以降にある場合は E2セルに式を入力するようになりますが、 上記数式の「3」の部分をすべて「2」に置き換えてもらえば大丈夫のはずです。 ※ 好奇心旺盛の方であれば、最大値が3個以上ある場合2番目に入れたい!という欲求が出てくると思いますが、 それに対応しようとするとIF関数で条件を分岐しなければならなくなり、かなり長い数式になってしまいますので とりあえずこの程度で・・・m(_ _)m
関連するQ&A
- 関数の使いすぎでエクセルが重いです・・・
ヤフオクの管理をエクセルでやっていて、今度発送連絡文もエクセルで作ってしまおうと思っています。 添付のような管理ファイルです。 H列の発送連絡に以下のような関数を記入しました。 ------------ =A1&"さん 発送しました。 伝票番号は"&G1&"です" ------------ ※実際にはもっと長いです。 これをコピーして取引ナビ(連絡用掲示板)に貼り付ける予定です。 これが、1シートに500行以上あり、さらに12シート(12ヶ月分)あります。 とりあえず作ってみたのですが・・・重すぎてエクセルが開けなくなりました。 マクロはある程度使えます。 なんとか、重くならずに上記を実現する方法はありませんでしょうか。 ご教授お願いいたします。
- ベストアンサー
- オフィス系ソフト
- エクセル関数について教えて下さい。
商品発送リストがありまして、漢字名・郵便番号・住所・電話番号・発送日・商品名の入力があります。 この中からAさんに何時・何を・何回発送したかを調べたいのです。 名前で検索をかけ、データにAさんの名前がある行数分、全てを抽出したいです。 例)Aさん・〒・住所・TEL・発送日・商品名 のデータ全てを1行にし、Aさんへ5回発送していたら、5行に渡り各発送時の内容を全て表示させたいのです。 この場合何の関数を使えばよいでしょうか? 名前のかな表示を別セルで作るべきでしょうか? 急いでおります。 宜しくお願いしますm(__)m
- ベストアンサー
- SE・インフラ・Webエンジニア
- エクセルと関数について
エクセルと関数について 以下のような表を作成しました。 漫画喫茶の料金を計算したいのですが、 喫茶Aは1時間まで400円、それ以降は30分毎に200円加算。 喫茶Bは20分毎に300円 喫茶Cは10時間まで1時間ごとに100円、10時間以降は1000円加算。 下記表のA列3行目以降に時間の表示を入力しています。 1時間も1:00ではなく、数値の1.0を入力して時間としています。 下記の表の空欄セルにどんな数式を入力すればいいでしょうか。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- Excelの関数について
A列に分類番号(1~9)、B列に金額 この二つのデータがズラーっと並んでいるデータを A列の分類番号ごとに合計を出したいのですが、 IF文の知識がないので、ご存知の方ご教授願います。 集計結果として各分類番号ごとの合計がほしいのですが、 さらにデータを追加していったときに自動的に分類番号を認識してその番号の合計に加算されていくようにするための関数を教えてください。 A列 B列 5 1,500 2 4,250 1 1,200 5 3,500 3 1,300 9 2,320 ・ ・ ・ ・ ・ ・ <集計結果> 分類 合計金額 1 ○円 2 ○円 3 ○円 ・ ・ ・ ・ ・ ・
- ベストアンサー
- オフィス系ソフト
- エクセル 関数 下から一番最初の行番号
図のように下から数えて一番最初にヒットする空白でない行番号を取得したいのですが、 いい関数はありますか? VBAは避けたいです。 ご教授よろしくお願い致します。
- ベストアンサー
- オフィス系ソフト
- エクセルで伝票を作りたいのですが・・・
エクセルで伝票を作りたいのですが、関数やデータ入力規則など分からないことが多く困っています。 伝票と商品リストをシートで分け、伝票でフィルタの商品番号行を選ぶと、商品リストに対応した商品名、入数、単価が出てくるような伝票を作りたいのですが、どのようにしたらできますでしょうか? 教えて下さい。よろしくお願いします。
- 締切済み
- Windows Vista
- excel 条件に一致する行に関数で数値を入れたい
添付図のように、日付が入っている行に対して 上から番号を自動で打ちたいです。 条件 ・ この日付が入っている行は空欄行を超えて頻繁に上下入れ替わります。 ・ 入れ替わった後は、番号も入れ替わり後の位置に準ずる値になります。 今は手作業でやっているのですが、関数でどうにかできないでしょうか。 (マクロは使用しない方向でお願い致します)
- ベストアンサー
- Excel(エクセル)
- 商品発送費について
まだ経理をはじめたばかりの初心者です。 伝票作成について教えていただけないでしょうか? 現在伝票を作成しているんですが、商品の発送料金を一律1000円で頂いていますが、各商品により微妙に発送料金が違います。商品代金は代引きでいただいています。 例) 商品代金1000円、発送料600円、手数料10%とした場合下記のような書き方で宜しいのでしょうか 借 方 貸 方 1000円 売掛金 / 売上 1000円 1000円 現金 / 売掛金1000円←(2枚目別伝票に記入) 100円 売掛金 / 手数料 100円 100円 現金 / 売掛金100円 ←(2枚目別伝票に記入) 1000円 売掛金 / 立替金 600円 雑収入 400円 1000円 立替金 / 売掛金 1000円←(2枚目別伝票に記入) このような伝票でよいのでしょうか?この場合最後行の売掛金はもう一行作成して 1000円 現金 / 売掛金 1000円 としたほうがよいのでしょうか? 発送料は今年お客様に負担していただいた部分は、必要経費には参入しない書き方にしたいのです。 長々と書きましたがよろしくお願い致します。
- 締切済み
- 財務・会計・経理
- Excelマクロ 複数の条件と範囲条件
色々と自分でもやってみたのですがうまくいかないので教えて頂けたら嬉しいです。 添付画像の左側の様な伝票番号と通し番号と商品名がふってあるシートが存在します。 同じ伝票番号内で商品に「松」もしくは「梅」が含まれているときのみ、その伝票番号の最終行に「送料」の行を追加したいです。その際に通し番号も加算したものを追加します。 これが上手く作れません。 ↓とりあえず作りかけたものの変に行が挿入されるマクロを記載します。ここからの修正でうまくいくなら修正点を教えて頂けると幸いです。 Sub 更新伝票情報() Dim lastRow As Long Dim currentRow As Long Dim currentInvoice As String Dim currentNumber As Integer ' シートの最終行を取得 lastRow = Cells(Rows.Count, 1).End(xlUp).Row ' 初期値の設定 currentInvoice = Cells(2, 1).Value currentNumber = 1 ' 行ごとに処理 For currentRow = 2 To lastRow ' 伝票番号が変わった場合 If Cells(currentRow, 1).Value <> currentInvoice Then ' 新しい伝票番号の設定 currentInvoice = Cells(currentRow, 1).Value ' 通し番号をリセット currentNumber = 1 End If ' 商品名に「松」または「梅」が含まれる場合 If InStr(1, UCase(Cells(currentRow, 3).Value), UCase("松")) > 0 Or InStr(1, UCase(Cells(currentRow, 3).Value), UCase("梅")) > 0 Then ' 最終行の下に新しい行を挿入 Rows(currentRow + 1 & ":" & currentRow + 1).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove ' 通し番号を加算し、B列を更新 Cells(currentRow + 1, 2).Value = currentNumber ' C列を「送料」に更新 Cells(currentRow + 1, 3).Value = "送料" ' 通し番号を1つ加算 currentNumber = currentNumber + 1 End If Next currentRow End Sub
- ベストアンサー
- Visual Basic
- excelで同じ番号の1行目を検索することは可能でしょうか
excel2000を使っています。 顧客データから請求書を作るときに、伝票番号は同じでその中の1行目だけとか、3行目だけとか値を取り出すことは出来るのでしょうか? どなたかお知恵を お願いします 0001 タバコ 250 0001 お菓子 500 0002 タバコ 250 0003 お酒 800 ○○様 No.10002 タバコ 250 お菓子 500 合計 750円 という感じで伝票番号を入れると一覧で出す計算式をやりたいのです。よろしくお願いします
- 締切済み
- オフィス系ソフト
お礼
No.1様 「最後の一つ」にまとめての加算もできました。 ひとりではこの式には絶対たどりつけなかったと思います。 本当にありがとうございました!!