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

[µo°Ý] ¥u¿é¤J²µu¤å¦r©Î¼Æ¦r,¥H¦WºÙ©Î±b¸¹¬d¸ß

[µo°Ý] ¥u¿é¤J²µu¤å¦r©Î¼Æ¦r,¥H¦WºÙ©Î±b¸¹¬d¸ß

¥u¿é¤J²µu¤å¦r©Î¼Æ¦r,¥H¦WºÙ©Î±b¸¹¬d¸ß

°ÝÃD¦p¤U:
¤µ¦]±b¸¹¤j³¡¤À«e10½X¬°¬Û¦P¼Æ¦r
¥H¼Ò½k¬d¸ß¤è¦¡¨Ò¦p¦b  Q8Àx¦s®æ¥H¼Æ¦r¤è¦¡¿é¤J±b¸¹   1020
Q9-Q51Àx¦s®æ½d³òÅã¥Ü§t¦³  1020 ¤§¼Æ¾Ú¥þ³¡Åã¥Ü(­Y¬Oµ§¼Æ¦h¸û¦³°ÝÃD...)
¸Ó¦p¦ó­×¥¿¤½¦¡¤~¯à¥H¿é¤J±b¸¹¥½ 4 ½X¤§­ì«h·j´M±a¥X¬ÛÃö§t¦³ 1020¤§¿ï¶µ

§Æ±æµ²ªG¬O¥H¼Ò½k¬d¸ß¤è¦¡
¨Ò¦p¦b  Q8Àx¦s®æ¥H¼Æ¦r¤è¦¡(¥½4½X)©Î¥H¤á¦W¤è¦¡¬d¸ß
1.jpg
2023-1-17 17:38

2.jpg
2023-1-17 17:38


0117.rar (122.7 KB)

ÀY/¨­/§À ¤À¬d
Xl0000363.rar (57.59 KB)

TOP

ÁÂÁ´£°Ýªº..
¤]ÁÂÁ¦^µªªº­ã´£³¡ªL¥ý¶i..
¾Ç¨ì¤F..
¶³®p

TOP

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

«D±`·PÁª©¥D ­ã´£³¡ªL  @¦^ÂÐ
°w¹ï©Ò­z°ÝÃD¸Ñµª¦³¤@ºÃ°Ý??
­Y¬O¥u¦b­ìÀx¦s®æ¡KQ8  ¤£¥t³]¸m¡KS8  ªºª¬ºA¤U
¬O§_¦b­ìÀx¦s®æ¡KQ8¯à¹F¦¨¿é¤J²µu¤å¦r©Î¼Æ¦r,¥H¦WºÙ©Î±b¸¹¬d¸ß ??

TOP

¥»©«³Ì«á¥Ñ Andy2483 ©ó 2023-1-19 08:30 ½s¿è

¦^´_ 4# cypd


    'ÁÂÁ«e½úµoªí¦¹¥DÃD»P½d¨Ò,ÁÂÁ ­ã´£³¡ªL«e½ú«ü¾É
'¥H¤U¬O«á¾Ç«ØÄ³¤£Åܧó ­ã´£³¡ªL«e½ú½d¨Ò­ì¥»¤½¦¡ªº§é°J¤è®×:¤À©î¦r¦ê,½Ð«e½ú¸Õ¸Õ¬Ý

'±N¤U¦Cµ{¦¡½X©ñ¤J "³æ" ¤u§@ªí¼Ò²Õ¸Ì

Private Sub Worksheet_Change(ByVal Target As Range)
With Target
   If .Address = "$Q$8" Then
   '¡ô¦pªG½s¿è¤º®eªºÀx¦s®æ¦ì§}¬O "$Q$8"
      If InStr(.Value, "*") Then
      '¡ô¦pªG½s¿èªºµ²ªG¤º®e¸Ì¥]§t"*"¦r¤¸
         [S8] = Split(.Value, "*")(1): [Q8] = Split(.Value, "*")(0)
         '¡ôif±ø¥ó¦¨¥ß´N¥O[S8]Àx¦s®æ¬O ¥H"*"¦r¤¸¤À³Î[Q8]Àx¦s®æ«á¥kÃ䪺¦r¦ê,
         '¥O[Q8]Àx¦s®æ¬O ¥H"*"¦r¤¸¤À³Î[Q8]Àx¦s®æ«á¥ªÃ䪺¦r¦ê
         '©Ò¥H¥H[Q8]Àx¦s®æ¿é¤J "¥ÃÂ×*28" ¬°¨Ò:[S8]="28",[Q8]="¥ÃÂ×",
         '¥t¥~¥H "¥ÃÂ×*" ¬°¨Ò:[S8] = "" , [Q8]="¥ÃÂ×"

      End If
   End If
End With
End Sub

¿é¤J "¥ÃÂ×*28" :
1.jpg
2023-1-19 08:18

µ²ªG:
2.jpg
2023-1-19 08:20


----------------------------------------------------
¿é¤J "¥ÃÂ×*" :
3.jpg
2023-1-19 08:22

µ²ªG:
4.jpg
2023-1-19 08:22
¬Ý±oÀ´¬OÀ³¸Óªº,À´±oÀ³¥Î¤~¹³¾Ç¥Í,Áy¥Ö«pÂI¾Ç·|§óÂÔ·V¿n·¥

TOP

¦^´_ 4# cypd

¸Õ¸Õ//
Xl0000363-1.rar (57.34 KB)

TOP

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

¤Ó·PÁª©¥D ­ã´£³¡ªL  @¦^ÂÐ

¹ê´úµ²ªG«D±`§¹¬ü
²³æ¥Ñ¹ê´f  ^^

TOP

        ÀR«ä¦Û¦b : ¡i¬°µ½Ävª§¡j¤H¥Í­n¬°µ½Ävª§¡A¤À¬í¥²ª§¡C
ªð¦^¦Cªí ¤W¤@¥DÃD