Board logo

標題: [發問] EXCEL根據條件篩選 [打印本頁]

作者: ffff56666    時間: 2018-10-8 23:59     標題: EXCEL根據條件篩選

各位大大, 有工作的員工能用函數按英文職位名稱排序嗎?
求各位指教,謝謝!
作者: faye59    時間: 2018-10-9 04:09

回復 1# ffff56666


    函數我想不到...
不過可以用簡單的巨集解決你的問題。
  1. Private Sub CommandButton1_Click()
  2. [G2:I1000] = ""
  3. [L2:N1000] = ""
  4. For Each aa In Range([A2], [A2].End(xlDown))
  5. Select Case aa.Offset(, 3)
  6.     Case "Yes"
  7.         nextrow = Sheets("Sheet1").Cells(Rows.Count, 7).End(xlUp).Row + 1
  8.         form = 7
  9.     Case "No"
  10.         nextrow = Sheets("Sheet1").Cells(Rows.Count, 12).End(xlUp).Row + 1
  11.         form = 12
  12. End Select
  13. Cells(nextrow, form) = nextrow - 1
  14. Cells(nextrow, form + 1) = aa.Offset(, 1)
  15. Cells(nextrow, form + 2) = aa.Offset(, 2)
  16. Next
  17. End Sub
複製代碼

作者: hcm19522    時間: 2018-10-9 09:58

(先)H2:I2{=IFERROR(INDEX(B:B,RIGHT(SMALL(IF($D$2:$D$9="Yes",CODE($B$2:$B$9)/1%+ROW(B$2:B$9)),ROW(A1)),2)),"")

G2=IF(H2="","",COUNTIF(H$2:H2,"<>"))
作者: ffff56666    時間: 2018-10-10 21:45

謝謝各位解答, 問題解決了




歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)