返回列表 上一主題 發帖

[發問] 依日期取資料

[發問] 依日期取資料

本帖最後由 qaqa3296 於 2020-9-12 20:42 編輯

依分頁1的E2日期去判斷分頁目標的生效與失效日期
0912A.jpg
2020-9-12 18:16


條件
按鈕放到分頁1
生效與失效日期為空白時,該行要列出
生效日期與失效日期都相同時,已失效為準,該行不列出

符合條件的資料列到成果,以2020/09/12為例
0912B.jpg
2020-9-12 18:16


日期比對要如何寫沒有頭緒,爬文看CDdate、dateVaule、#()#,看不懂如何運用,希望各位大大幫忙

0912.zip (9.4 KB)

回復 1# qaqa3296
有空幫我 測試一下看看是不是 你要的
生效日期與失效日期都相同時,已失效為準,該行不列出    這我不太明白   你先試試看是不是這樣

javascript:;

0913.rar (29.11 KB)

TOP

回復 2# 軒云熊

感謝軒云熊的程式,功能正確

然後看到熟悉的字串拆開格式,才發現我某一天的日期格式打錯了!

讓你多寫分割文字

詢問一下
U = True: K = 1
For i = 1 To UBound(Arr)
    If U = True Then
        For F = 1 To UBound(Arr, 2)
            Brr(1, F) = Arr(1, F)
        Next F
    U = False
    End If
作用是什麼?

TOP

本帖最後由 軒云熊 於 2020-9-13 12:47 編輯

回復 3# qaqa3296
那只是列出 標題而已沒有甚麼作用  ...XD    謝謝你幫我測試

TOP

回復 3# qaqa3296
這是 加了刪除重複 應該會快一點點 順便把 Select Case 改成 if  感覺不太適用 >"<


javascript:;

0913_1.rar (32 KB)

TOP

回復 3# qaqa3296
抱歉 迴圈沒有刪除到... 再傳一次 >"<


javascript:;

0913_2.rar (31.67 KB)

TOP

本帖最後由 qaqa3296 於 2020-9-13 21:32 編輯

回復 6# 軒云熊

抱歉我前面沒有測試出來,邏輯是有問題的

但我可以自行修改

附上測試結果

有在目標打上備註

0913A.zip (30.57 KB)

TOP

回復 7# qaqa3296
好的 謝謝你幫我測試 我也改了一下有空幫我看一下是不是這樣 想知道哪裡有問題 :)    



    javascript:;

0913A_1.rar (29.49 KB)

TOP

日期格式有多種,
數值/文字格式+mm/dd/yyyy ???
更主要是看不懂比較規則?? 比大比小???

TOP

本帖最後由 qaqa3296 於 2020-9-14 20:30 編輯

回復 9# 准提部林

我取得的資料,全部的格式只有YYYY/MM/DD/,模擬檔打錯了抱歉。

這是一個ERP的功能。
資料呈現是每個表料件都有生效與失效的日期,輸入日期就能知道當時用什麼料

我想把它當作練習並學習寫程式,但腦袋卡住了
不知如何才能讓日期格式去比大小,花了一兩個星期...想不出來試也試不出來

就是單純的比日期大小取得對應料件資訊。
但是要符合時間邏輯,第一次建檔完全沒有時間全部料有用到(全列出)
之後改版取消料件,就會給失效日,新增料會給生效日(開始有日期差異)
生效日到,但無法量產製造則生效與失效是同天,所以實際也沒有用到那個料件(不列出)

7樓的那個檔可以看出我想要的邏輯。




回復軒云熊
這次邏輯對了,感謝你的程式讓我學習

TOP

        靜思自在 : 一個人不怕錯,就怕不改過,改過並不難。
返回列表 上一主題