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

[µo°Ý] ½Ð°Ý¸ê®Æ¤ñ¹ï°ÝÃD,¦p¦ó±N¦hµ§¸ê®Æ¹ïÀ³¨ì¤@­ÓÀx¦s®æ¤¤¨Ã¥Î"¡B"¤À¹j

¦^´_ 1# happycoccolin

¨Ï¥Î¨ç¼ÆÃø¥H¤@¨B¨ì¦ì¡A«á­±¼W¥[¤@¨Ç»²§UÄæ¦ì¥ý±N¦U­È¨D¥X¡ACÄæ¦A±ND¡BE¡BF¡B....¦UÄæ¦r¦ê¦X¨Ö°_¨Ó
±Ä¥Î¦Û©w¨ç¼Æ¬O¤ñ¸û²³æ®e©ö
{...} ªí¥Ü»Ý­n¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡

TOP

¦^´_ 4# c_c_lai


    «z!!§Ú·|ªá®É¶¡¬Ý¤@¤U~~~ÁÂÁ±zªº¦^Âгá!!!!!

TOP

¥»©«³Ì«á¥Ñ c_c_lai ©ó 2012-8-3 10:54 ½s¿è

¦^´_ 3# happycoccolin
' §Ú´À zz5151353  ¤j¤j¦^µª©pªº°ÝÃD¡G
  1. Function zz(rng As Range, Page As Range, FVal) As String
  2.     Dim SN()
  3.     For i = 1 To rng.Count
  4.         If rng(i) = FVal Then
  5.             ReDim Preserve SN(s)
  6.             SN(s) = Page(i): s = s + 1
  7.         End If
  8.     Next
  9.     zz = Join(SN, "¡B")
  10. End Function
½Æ»s¥N½X

TOP

¦^´_ 2# zz5151353


    «¢Åo~~~~~§Ú¤£¯à¤U¸üÀÉ®×­C~~¤]ÁÂÁ¦^ÂÐ~~§Ú·|¤F¸Ñ¤@¤U¤º®e¸Õ¸Õ¬Ý~ÁÂÁ³á!!!

TOP

¥»©«³Ì«á¥Ñ zz5151353 ©ó 2012-7-27 12:17 ½s¿è

¨ç¼Æ¦³Ãø«×,½Ð°Ñ¦Ò¦Û©w¸q¨ç¼Æ§a

¨ç¼Æ¬O¥i¥H°µ¨ì  ¦ý¬O¦³¤@°ÝÃD ¨S¿ìªk²£¥Í,¾·¸¹,¨§¸¹µ¥µ¥.....
{=PHONETIC(OFFSET(Sheet2!B$1,MATCH(A1,Sheet2!A:A,)-1,,COUNTIF(Sheet2!A:A,A1)))}

123.rar (8.29 KB)

300 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X

TOP

        ÀR«ä¦Û¦b : §Ú­Ì­n°µ¦nªÀ·|ªºÀô«O¡A¤]­n°µ¦n¤º¤ßªºÀô«O¡C
ªð¦^¦Cªí ¤W¤@¥DÃD