ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

±a¥X¹ïÀ³­È

±a¥X¹ïÀ³­È

Dear,

­¸¤ñ.sheetªº®Æ¸¹¸ò³o­Ó¤u§@ªí¬Û¦P®É
¥B­¸¤ñ.sheetªºEU:EXÄæ,¥X²{711 (·|¦bEU:EXÄ椤ÅÜ°Ê,¤£¬O©T©wªº)
«h±q­¸¤ñ.sheetªºFK:FNÄæ,§ä¨ì¹ïÀ³ªº­È,±a¤J¨ìFÄ椤
­¸¤ñ.sheetªºEY:FJÄæ¬O½LÂI¼Æ¾Ú
­Y711¥X²{¦bCK_1,«h§â¬Û¹ïÀ³ªº¤é´Á1ªº¤é´Á±a¤JCÄ檺¤é¦L
¤]´N¬O711¬O¤@­Ó¨Ì¾Ú,±a¥X
¦p¦P²{¦bCÄæ¤ÎFÄæ±a¥Xªº½d¨Ò­È(·íµM³o¸Ìªº®Æ¸¹¤]·|ÅÜ°Ê)
½Ð°Ý­n¦b³o2Äæ¦p¦ó¤U¤½¦¡?
±a¥X¹ïÀ³­È.rar (22.96 KB)

¥»©«³Ì«á¥Ñ Andy2483 ©ó 2023-1-5 15:09 ½s¿è

¦^´_ 6# PJChen


    ÁÂÁ«e½úµoªí¦¹¥DÃD»P½d¨Ò
¤µ¤Ñ¾Ç²ß http://forum.twbts.com/thread-23571-1-1.html  ¦¹©«ªì¦¸¾Ç¨ìSwitch ¨ç¼Æ,
«á¾ÇÂǦ¹©«½m²ßVBA Switch ¨ç¼Æ,½Ð°Ñ¦Ò
ÁÂÁ ­ã´£³¡ªL«e½ú

°õ¦æ«e:


°õ¦æµ²ªG:


Option Explicit
Sub ±a¥X¹ïÀ³­È_1()
Dim Brr, i&, j&, K%, S$
Brr = Range([¤ñµá¦h!Q4], [¤ñµá¦h!A65536].End(3))
For i = 1 To UBound(Brr)
   ReDim T(1 To 5)
   For j = 1 To 5
      T(j) = Val(Replace(Brr(i, j), "W", 1))
   Next
   K = Switch(T(2) > 0, 6, T(3) > 0, 9, T(4) > 0, 12, T(5) > 0, 15, T(1) > 0, 1)
   Brr(i, 1) = Brr(i, K)
Next
[W:W].ClearContents
[¤ñµá¦h!W4].Resize(UBound(Brr), 1) = Brr
Set Brr = Nothing: Erase T
End Sub
¥Î¦æ°Ê¸Ë¸mÂsÄý½×¾Â¾Ç²ß«Ü¤è«K,ÁÂÁ½׾¸gÀç¹Î¶¤
½Ð¤j®a¤@°_¤W½×¾Â¨Ó¥æ¬y

TOP

¦^´_ 10# PJChen

TEXT(???,"¥¿¼Æ;­t¼Æ;¹s;¤å¦r")

TEXT(IF(B4:E4="",-1,B4:E4),"1;;1;!1")
ªÅ®æ--Âন-1
¥¿¼Æ¥H1ªí¥Ü, ­t¼Æ"", ¹s¥H1ªí¥Ü, ¤å¦r¥H1ªí¥Ü

TOP

¦^´_ 9# ­ã´£³¡ªL

­ã¤j,

°õ¦æ¨S°ÝÃD¤F,¯à§_À°¦£¸Ñ»¡¤U»yªk?
=IFERROR(CHOOSE(MATCH(1,--TEXT(IF(B4:E4="",-1,B4:E4),"1;;1;!1"),),F4,I4,L4,O4),A4)

TOP

¦^´_ 8# PJChen


=IFERROR(CHOOSE(MATCH(1,--TEXT(IF(B4:E4="",-1,B4:E4),"1;;1;!1"),),F4,I4,L4,O4),A4)

TOP

¦^´_ 7# ­ã´£³¡ªL
­ã¤j¦n,
¥H¤U¬õ¦â¬O¤â»~,¤§«e¥´¿ù¤F,¥H¤U¬°¥¿½T¡I
BÄæ¼Æ­È>=0,«h±a¥XFÄ檺­È
·íBÄæ<0,«h¬ÝCÄæ,¨Ì¦¹Ãþ±À

³o¤G­Ó¼gªk,·íBÄ欰0,·|±a¥XIÄ檺­È,¦Ó¤£¬OFÄæ

TOP

¥»©«³Ì«á¥Ñ ­ã´£³¡ªL ©ó 2022-1-6 13:26 ½s¿è

¦^´_ 6# PJChen


=IFERROR(CHOOSE(MATCH(1=1,--TEXT(B4:E4&0,"0;;;!1")>0,),F4,I4,L4,O4),A4)
©Î
=IFERROR(CHOOSE(MATCH(1,--TEXT(B4:E4&0,"1;;;!1"),),F4,I4,L4,O4),A4)

TOP

¦^´_ 5# ­ã´£³¡ªL
­ã¤j¦n,

§Ú­×§ï¤FÀÉ®×,¥Î¥H´ú¸Õ
·íB:E¥X²{Wªº¤å¦r®É,µLªk±a¥X¥¿½Tªº¹ïÀ³­È
¼Æ­È¤j©óµ¥©ó0_«h±a¥X¹ïÀ³¤é´Á_r1.rar (41.54 KB)

TOP

¦^´_ 4# PJChen

°}¦C¤½¦¡
=IFERROR(CHOOSE(MATCH(1=1,--(B4:E4&0)>0,),F4,I4,L4,O4),A4)

TOP

¦^´_ 2# ­ã´£³¡ªL
­ã¤j¦n,
·Q½Ð±Ð¤@­ÓÃþ¦üªº¹ïÀ³°ÝÃD,
¼Æ­È¤j©óµ¥©ó0_«h±a¥X¹ïÀ³¤é´Á.rar (38.4 KB)
1..        B:E¬°§PÂ_ªº¨Ó·½,¤p©ó0 ©ÎªÌB:E¥þªÅ¥Õ,«h±a¥XAÄ檺¤é´Á
2..        ¦C3µÛ¦â¬Û¦Pªº,¬O¹ïÀ³ªºÄæ¦ì
3..        BÄæ¼Æ­È>=0,«h±a¥XFÄ檺­È
        ·íBÄæ­È>0,«h¬ÝCÄæ,¨Ì¦¹Ãþ±À
4..        B:E¦³®É·|¦³¤å¦rW¤Î¯S§Oªº¼Æ¦r711
        ³o2­Ó­Èµø¬°²Å¦X±ø¥ó
        ¨Ò¦p:B26=711,«h±a¥X1/18
        B29=W,«h±a¥X¹ïÀ³­È1/18
5..        ­ì¥»·Q¥Îmatch,¦ýB4ªº¯Á¤Þ­È,­n¦p¦óÅý¥¦¥i¥H
        ¤p©ó0 ©ÎªÌBªÅ¥Õ,«h¸õC4,¨Ì¦¹Ãþ±À....
         S3=CHOOSE(MATCH(B4,B4:E4,),F4,I4,L4,O4)

TOP

        ÀR«ä¦Û¦b : ¦¨¥\¬OÀuÂIªºµo´§¡A¥¢±Ñ¬O¯ÊÂIªº²Ö¿n¡C
ªð¦^¦Cªí ¤W¤@¥DÃD