入黎免費幫你砌excel/教你formula (10)

唔得, 因為喺Data Validation個list入面就假設左係Allow
除非玩VBA
或者用Conditional Formatting將成格變紅色

放入OneDrive, 開AutoSave
Review --> Show Changes

唔放OneDrive做唔到 (好似係)

如果有data想gen個chart出來係可以即時跟住data數字變的話
想問是咪只能用offset

好似張圖咁下面d數字改上面個chart跟住變咁樣

本來D數字變張圖就會變

同埋想問下如果想做到下面兩張圖效果要點做
我有唔同年份raw data分別save係唔同spreadsheet
右上角有個dropdown list可以揀年份
點樣可以做到一揀年份下面個表格就跟住唔同年份data跳？
2020年

2021年

講真我唔建議你整果2張圖
因為D伏點太多
有成32個
你真係睇得清?
眼都花

建議再整一個表將D DATA整成
月份 缺點類型 數量
1月 1 1
1月 2 0
...

再用樞紐分析圖
佢附帶一個效果係可以篩選缺點

然後你2張圖果種叫堆疊直條圖
有分係唔係用百分比

低能問題求答
假設如圖有X Y兩軸
X既data會重覆 可以點搵Top 5最大既Y值總和?
PS 土法煉鋼逐個sort X再sum Y唔可行因為X有過萬數據

樞紐分析表
可以計哂哩D ABCDEFG各個總和

你係想搵每個X嘅top 5總和？
定係唔洗分ABCD，總之係所有Y嘅top 5總和？

首先sort唔可行嘅原因係你有過萬種唔同嘅X? 如果係咁，即係你個output都有過萬行。
如果X嘅種類唔多，只係有好多行data，咁sort唔會唔可行㗎喎，雖然我prefer用filter多過sort

即係完全唔需要理Column X? 咁用large()就搞掂

=sum(LARGE(B:B,1),LARGE(B:B,2),LARGE(B:B,3),LARGE(B:B,4),LARGE(B:B,5))

請問一格這樣內容
[20230411-12, 20240215-17]

可以拆成7格嗎
20230411
20230412
20240215
20240216
20240217

拆得開就可以用重複值對資料了

人手拆緊大量

你用不推文回覆, 唔幫你

習慣左唔推文

幫下手

用VBA, RANGE範圍同輸出範圍要自己改
你D中括號要自己手動取代左先(我懶得寫)

Sub GenerateDates()
    Dim sourceRange() As Variant
    Dim sourcerangetemp As String
    Dim dateRanges() As String
    Dim singleRange() As String
    Dim startDate As Long
    Dim endDate As Long
    Dim currentDate As Long
    Dim outputRow As Integer
    ' 讀取A1單元格的值
    outputRow = 1  ' 假設從第1行開始輸出
    ReDim sourceRange(1 To Range("A1:A2").Count)

    ' 將儲存格資料存儲到ARRAY中
    For i = 1 To Range("A1:A2").Count
        sourceRange(i) = Range("A" & i).Value
    Next i
    For j = LBound(sourceRange) To UBound(sourceRange)
        
        dateRanges = Split(sourceRange(j), ", ")
        
        ' 輸出開始的行號

        ' 遍歷所有的日期範圍
        
        
        For i = LBound(dateRanges) To UBound(dateRanges)
            ' 使用短劃線分隔起始日期和結束日期
            singleRange = Split(dateRanges(i), "-")
            yearmonth = Left(singleRange(0), 6)
            startDate = CLng(singleRange(0))
            endDate = CLng(yearmonth & singleRange(1))
            ' 生成起始日期和結束日期之間的所有日期
            For currentDate = startDate To endDate
                ' 輸出當前日期到單元格中
                Cells(outputRow, 3).Value = currentDate  '在COLUMN C輸出
                ' 移動到下一行
                outputRow = outputRow + 1
            Next currentDate
        Next i
    Next
End Sub

thx
一陣去試

記住用VBA前複製份文件先
VBA行完係唔可以CTRL+Z
唔OK唔好SAVE

唔會有橫跨兩個月嘅情況？例如0331-0402

同埋日數係個位數點樣表達？20230409定係2023049？

改藍色hilight果格做你要拆果格，最好好似我咁，同一行啦，之後向下拉Formula
如果會跨月就麻煩D，要再搞

=LET(
Data,A1,
Comma,SEARCH(",",Data),
SplitA,LEFT(Data,Comma-1),
hyphenA,SEARCH("-",SplitA)-1,
SplitA1,LEFT(SplitA,hyphenA),
LenA,((LEFT(SplitA,6)&RIGHT(SplitA,2))-LEFT(SplitA,hyphenA))+1,
OutputA,SEQUENCE(LenA,1,SplitA1),
SplitB,MID(Data,Comma+2,11),
hyphenB,SEARCH("-",SplitB)-1,
SplitB1,LEFT(SplitB,hyphenB),
LenB,((LEFT(SplitB,6)&RIGHT(SplitB,2))-LEFT(SplitB,hyphenB))+1,
OutputB,SEQUENCE(LenB,1,SplitB1),
TRANSPOSE(VSTACK(OutputA,OutputB)))

原來唔洗vba都做到

基本上夠用了 thx

下次記得唔好不推文

一唔講就好習慣性咁按左不推文個制

請使用【回覆】令更多人都可以受惠

想請教下點用「filter」呢條formula

例如

Column1
AB
AC
ABC
AD
AEC

點用filter張以上同時含有A同C嘅cell顯示出黎？

=LET(DataRange,A1:A5,FILTER(DataRange,ISNUMBER(SEARCH("A",DataRange))*ISNUMBER(SEARCH("C",DataRange))))

自己改範圍