□ 戻る　 □VBAのサロン　 □ 使用方法　 □ 新着記事 　□ 新規に質問する！　 □ トピック一覧　 □ 検索 　□ 過去ログ
[ 親トピックをトピックトップへ ]
このトピックに書きこむ
Name/
E-Mail/

└>このツリーのレス記事をメールで受信しますか? YES/ NO/
Title/
URL/
Comment/ 通常モード->　 図表モード-> (←の場合適当に改行を入れて下さい)
タグが使用できます。例 ⇒ <font color="blue">文字</font>
解決！！ありがとうございました！ 解決       保留中です・・・ 保留        迷宮入りorほかあたって見ます・・ 迷宮入       すいませ〜ん。誰か〜！ Help! ←※回答者専用
解決したらチェック       保留(コードテスト中など・・)         解決不可orレスが全く付かなくてほかのサイトに行くときなど・・
削除キー/
(半角8文字以内)　

このトピック参照回数 :
Re[11]: 賞味期限チェック表作成

    [134995] Re[11]: 賞味期限チェック表作成-

    ■記事引用/メール受信=OFF■

    □投稿者/ レウ -(2025/03/27(18:01))
    □U R L/

      半平太さま
      申し訳ございません。
      行の上に表題を追加したためずれておりました。
      無事できました。
      いつもご無理をお願い致しましてありがとうございます。
      これで効率化できます。
      本当にありがとうございました。



    [134994] Re[10]: 賞味期限チェック表作成-

    ■記事引用/メール受信=OFF■

    □投稿者/ 半平太 -(2025/03/27(17:38))
    □U R L/

      ＞変化なしです。

      今まで「2ヶ月以内」となっていたものが、そのままと言うことですよね？

      この式で、「2ヶ月以内」が出ることはないので「変化なし」はあり得ません。
      　　↓
      ＞=IF(B2="","",IF(B2<=EDATE(TODAY(),1),"廃棄、または使用禁止",IF(B2<=EDATE(TODAY(),2),"残り１ヶ月","")))



    [134993] Re[9]: 賞味期限チェック表作成-

    ■記事引用/メール受信=OFF■

    □投稿者/ レウ -(2025/03/27(17:23))
    □U R L/

      恐れいります。
      変化なしです。
      =IF(B2="","",IF(B2<=EDATE(TODAY(),1),"廃棄、または使用禁止",IF(B2<=EDATE(TODAY(),2),"残り１ヶ月","")))



    [134992] Re[8]: 賞味期限チェック表作成-

    ■記事引用/メール受信=OFF■

    □投稿者/ 半平太 -(2025/03/27(16:59))
    □U R L/

      E2セル =IF(B2="","",IF(B2<=EDATE(TODAY(),1),"廃棄、または使用禁止",IF(B2<=EDATE(TODAY(),2),"残り１ヶ月","")))




    [134991] Re[7]: 賞味期限チェック表作成-

    ■記事引用/メール受信=OFF■

    □投稿者/ レウ -(2025/03/27(15:43))
    □U R L/

      半平太 様
      誠にありがとうございます。

      ちなみに1ヶ月以内、2ヶ月以内の項目はそれぞれ文章を分けることは可能でしょうか？
      当方の賞味期限の決まりが賞味期限一ヶ月前で廃棄となっており
      たとえば
      2ヶ月を　残り１ヶ月
      1ヶ月を　廃棄、または使用禁止

      のようにできますか？
      お手数ですが何卒よろしくお願い申し上げます。


      ++++++++++++++++++++
      OS      ⇒Windows 11
      Version⇒Office365
      ++++++++++++++++++++



    [134989] Re[6]: 賞味期限チェック表作成-

    ■記事引用/メール受信=OFF■

    □投稿者/ 半平太 -(2025/03/26(23:10))
    □U R L/

      「期限切れ」とかじゃなくなったんですね？（ホントかなぁ）
      すると条件付き書式と同じ考えでよさそうですけど・・

      E2セル =IF(B2="","",IF(B2<=EDATE(TODAY(),1),"1ヶ月以内",IF(B2<=EDATE(TODAY(),2),"2ヶ月以内","")))

      下にコピー



    [134988] Re[5]: 賞味期限チェック表作成-

    ■記事引用/メール受信=OFF■

    □投稿者/ レウ -(2025/03/26(22:09))
    □U R L/

      おそれいります。
      もう一つおたずねしたいのですが、ステータスの項目が
      =IF(D3<=0,"有効期限切れ", "有効")
      にしているのですが1ヶ月以内、2ヶ月以内になるようにお願い致します。
      お手数ですがよろしくお願いします。


      ++++++++++++++++++++
      OS      ⇒Windows 11
      Version⇒Office365
      ++++++++++++++++++++



    [134987] Re[4]: 賞味期限チェック表作成-

    ■記事引用/メール受信=OFF■

    □投稿者/ レウ -(2025/03/26(22:03))
    □U R L/

      素晴らしい！！！ありがとうございます。出来ました。



    [134986] Re[3]: 賞味期限チェック表作成-

    ■記事引用/メール受信=OFF■

    □投稿者/ 半平太 -(2025/03/26(21:13))
    □U R L/ 
      条件付き書式

 [適用範囲]　=$A$2:$E$500　(範囲の最下行はテキトーです)

 [数式を使用して、書式設定するセルを決定] 
  　黄条件の数式　=AND($B2<>"",$B2<=EDATE(TODAY(),2))
  　赤条件の数式　=AND($B2<>"",$B2<=EDATE(TODAY(),1))

※赤の条件の方を最優先にする



    [134985] Re[2]: 賞味期限チェック表作成-

    ■記事引用/メール受信=OFF■

    □投稿者/ レウ -(2025/03/26(21:00))
    □U R L/

      そうです。よろしくお願いします。



    [134984] Re[1]: 賞味期限チェック表作成-

    ■記事引用/メール受信=OFF■

    □投稿者/ 半平太 -(2025/03/26(19:09))
    □U R L/ 
      ＞1ヶ月2ヶ月前になると

「1ヶ月以内、2ヶ月以内になると」ですかね？
そうじゃないと、該当日の翌日になると、色が消えますけども。



    [134983] 賞味期限チェック表作成-

    ■親トピック/記事引用/メール受信=OFF■

    □投稿者/ レウ -(2025/03/26(17:13))
    □U R L/ 
      以下の賞味期限チェック表作成したいのですがご教示お願いします。
1ヶ月2ヶ月前になるとそれぞれの行に赤と黄色を表示させたいです。

商品名	賞味期限	在庫数	有効日数　ステータス

たい	2025/6/21	20	87	　有効
いくら	2025/3/24	35	-2	　有効期限切れ
はまち	2025/3/25	10	-1	　有効期限切れ
ぶり	2025/3/26	50	0	　有効期限切れ
さけ	2025/9/27	25	185	　有効
さば	2025/3/28	30	2	　有効
あじ	2025/1/29	15	-56	　有効期限切れ
いか	2025/3/30	8	4	　有効
たこ	2025/3/31	40	5	　有効
あら	2025/9/1	60	159	　有効
かつお	2025/4/2	20	7	　有効



      ++++++++++++++++++++
      OS      ⇒Windows 11
      Version⇒Office365
      ++++++++++++++++++++



このトピック内容の全ページ数 / [0]
- Child Forum -
Edit:ゆう-Ｇ