返回列表 上一主題 發帖

[發問] 讓按鈕維持固定位置+儲存格格式設定

回復 10# emma
  1. 'If E.TopLeftCell.Offset(, 5).Value > 10 Then '不好意思,小於出貨日期十日我不知道該怎麼設
  2. If E.TopLeftCell.Offset(, 5).Value - 10 < Date Then ' 這樣對嗎?
複製代碼

TOP

回復 11# GBKEE


    謝謝GBKEE版大,這樣沒錯,只要把10 < Date 改為 10 > Date就是我要的了,
    →但是像10月份有31天,例如出貨日如果為101/11/05,超過101/10/25就為【無法預購】,
    →不是101/10/26才【無法預購】
    →這個有辦法可以解決嗎?謝謝^^



VBAtest5.rar (14.06 KB)

TOP

回復 12# emma

10月有31日所以11/5往前推10日得到10/26要變成10/25
那麼2月有28或29日要得到甚麼日期呢?
規則要能夠釐清才能用成是跑出來
學海無涯_不恥下問

TOP

本帖最後由 emma 於 2012-11-1 12:19 編輯

回復 13# Hsieh


    Hsieh版主,您好,是的,謝謝您提醒我,如果是2月的話會影響到的是3月份,出貨日如果是102/03/02的話,
    那麼無法預購的日期是102/02/02,這是為了便利門市人員人工記憶的推算法...
    像101/10/31跟101/11/01的無法預購日皆為101/10/21
     
    另外前面有問過的在【查詢】的工作表中,可以讓分店的清單一變動就讓下方的【儲位】欄位跟著一併更新嗎?
   
    還有按確定的按鈕後可以直接跳到查詢工作表的工作視窗檢視查詢的結果嗎?
    然後可以在查詢的工作表再製作重新查詢回到資料的工作表中嗎?

    謝謝^^

TOP

        靜思自在 : 有智慧才能分辨善惡邪正;有謙虛才能建立美滿人生。
返回列表 上一主題