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

[µo°Ý] ÃöÁä¦rÅý¦C¤å¦rÅܦâ

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


    ­ã¤j¤£¦n·N«ä~§ÚªºÃöÁä¦r¬O­n¦bPÄæ¡AÅܦâ¤~¬O¨ìVÄæ¬O­n«ç»ò§ï©O¡H

TOP

¦^´_ 21# wayne0303
¹Á¸Õ·L­×¤F¤@¤U­ã¤j´£¨Ñªºµ{¦¡½X...ÁÂÁ¡C

Private Sub Worksheet_Change(ByVal Target As Range)
Dim xA As Range, xR As Range
Set xA = Intersect(Target, Range("P:P"))
If xA Is Nothing Then Exit Sub
Application.ScreenUpdating = False
For Each xR In xA
    Range(Cells(xR.Row, 1), Cells(xR.Row, 22)).Font.ColorIndex = 15 ^ -(xR = "¤w¥X¹Ï")
Next
End Sub

TOP

¥»©«³Ì«á¥Ñ wayne0303 ©ó 2023-10-21 20:50 ½s¿è

¦^´_ 22# shuo1125


    ¥ýÁÂÁÂshuo¤jªºÀ°¦£~
    ¦ý¤£ª¾¬O¤£¬O§ÚPÄ榳¤½¦¡¼vÅTªºÃö«Y¡A¥Î¤u§@ªíªºµ{¦¡½X°õ¦æ³£¨S¤ÏÀ³¡A¥Î¥´¦rkey¤J­Ë¬O¥i¥H...
    ©Ò¥Hµ²ªG¥u¯à¨«±z 15#´£¨Ñªº¼Ò²Õµ{¦¡½X°õ¦æ¡A¦ý¬O³o¼ËÀ³¸Ó´N¨S¦³¿ìªk°µ¹³­ã¤j¨ººØ¦^´_³o­Ó°Ê§@¤F§a
   
    ¥H¤W¡AÁÂÁ¤j¤j­ÌªºÀ°¦£~

TOP

¦^´_ 23# wayne0303


PÄæ¬O¤½¦¡, ¥u¯à 1)®æ¦¡±ø¥ó  2)«ö¶s°õ¦æ

TOP

¦^´_ 23# wayne0303


    ÅýPÄæ®æ¤½¦¡Åܦ¨ ¤w¥X¹Ï ªº·½ÀYÄæ¦ì°µÄ²µo
¨Ò¦p¥HOÄæ¿é¤J ¤é´Á¡]¥X¹Ï¤é¡^¡APÄ椽¦¡´N·|Åܦ¨ ¤w¥X¹Ï
¦pªG¬O³oºØ±¡¹Ò ´NIJµoOÄæ
ÁÙ¬O«Øij¤W¶Ç­Ó½d¨Ò
¥Î¦æ°Ê¸Ë¸mÂsÄý½×¾Â¾Ç²ß«Ü¤è«K,ÁÂÁ½׾¸gÀç¹Î¶¤
½Ð¤j®a¤@°_¤W½×¾Â¨Ó¥æ¬y

TOP

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


    ­ì¨Ó¦p¦¹~
    ·PÁ­ã¤jªº»¡©ú~

TOP

¦^´_ 25# Andy2483


    ·PÁÂAndy¤jªº´£ÂI±o¥HÀ³¥Î¤u§@ªíªºµ{¦¡½X°õ¦æ¤F~ÁÂÁÂ

TOP

¥»©«³Ì«á¥Ñ wayne0303 ©ó 2023-10-23 10:10 ½s¿è
Private Sub Worksheet_Change(ByVal Target As Range)
Dim xA As Range, xR As Range
Set xA = Intersect(Target, Range("P:P"))
If xA Is Nothing Then Exit Sub
Application.ScreenUpdating = False
For Each xR In xA
    Range(Cells(xR.Row, 1), Cells(xR.Row, 22)).Font.ColorIndex = 15 ^ -(xR = "¤w¥X¹Ï")
Next
End Sub


    ¤£¦n·N«ä¡A·Q½Ð°Ý¥i¥H¥Î³o­Óµ{¦¡½X±NÃöÁä¦r§ï¦¨ÃöÁä¦r¤º¥u­n¦³"°²"(¨Ò¦p¨Æ°²¡B¯f°²...¤§Ãþ¡A¸U¥Î¦r¤¸ªº¥N½X)©Î"¥X®t"´N¦³¤ÏÀ³¡A³o¼Ë¶Ü¡H

    ÁÂÁÂ~

TOP

¦^´_ 28# wayne0303


15 ^ -(xR = "¤w¥X¹Ï")   §ï¦¨
15 ^ -((xR Like "*°²") + (xR = "¥X®t") <> 0)
¥Î¦æ°Ê¸Ë¸mÂsÄý½×¾Â¾Ç²ß«Ü¤è«K,ÁÂÁ½׾¸gÀç¹Î¶¤
½Ð¤j®a¤@°_¤W½×¾Â¨Ó¥æ¬y

TOP

¦^´_ 29# Andy2483


    ³á³á³á~¸U¥Î¦r¤¸¬O¥Î Like "*"
    ÁÂÁÂAndy¤j¤j~

TOP

        ÀR«ä¦Û¦b : ¦³¤ß´N¦³ºÖ¡A¦³Ä@´N¦³¤O¡A¦Û³yºÖ¥Ð¡A¦Û±oºÖ½t¡C
ªð¦^¦Cªí ¤W¤@¥DÃD