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

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

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

¥»©«³Ì«á¥Ñ happycoccolin ©ó 2012-7-20 17:43 ½s¿è

«¢Åo~~~

½Ð±Ð¤@¤U,¥Ø«e¦³¸ê®Æ¹ïÀ³ªº°ÝÃD¦p¤U~~­Y³æ¯Â¨Ï¥ÎVLOOKUP°µ,¥u·|Åã¬O¤@µ§¸ê®Æ...¤£ª¾ÁÙ¯à«ç»ò¼g@@

ÁÂÁÂ~~~~

SHEET1
A                                   B                   C
1234-5678        11111        aa¡Bbb¡Bcc¡Bdd        <-¦p¦ó¦bCÄæ¦ìÅã¥ÜSHEET2¸Ì­±,AÄæ¦ì¹ïÀ³ªº¸ê®Æ,¥Î"¡B"¤À¹j,¹ïÀ³Äæ¦ì¤£¤@©w,¦³¥i¯à¨ì10­Ó
1234-5678        11111        aa¡Bbb¡Bcc¡Bdd       
1234-5678        11111        aa¡Bbb¡Bcc¡Bdd       
1234-5678        11111        aa¡Bbb¡Bcc¡Bdd       
2345-6789        22222        ee¡Bff¡Bgg       
2345-6789        22222        ee¡Bff¡Bgg       
2345-6789        22222        ee¡Bff¡Bgg       
3456-7890        33333                                     <-­Y¨S¦³¸ê®Æ«hÅã¥ÜªÅ¥Õ
3456-7890        33333               
3456-7890        33333               
3456-7890        33333               
3456-7890        33333               
3456-7890        33333       

SHEET2
A                                  B
1234-5678        aa
1234-5678        bb
1234-5678        cc
1234-5678        dd
2345-6789        ee
2345-6789        ff
2345-6789        gg
3456-7890
3456-7890
3456-7890
3456-7890
123.zip (7.02 KB)

¦^´_ 13# c_c_lai


    HI~~~¤£¦n·N«ä~§Ú´y­zªº¤£¬O«Ü²M·¡,§Ú·|¦A¾ã²z¤@¤U,¤]ÁÂÁ§Aªº¦^Âгá!!

TOP

¦^´_ 12# Hsieh


    ÁÂÁÂÁÂÁÂ!!§Ú·|¦n¦n¥J²Ó¬Ý¤@¤U!!

TOP

¦^´_ 10# happycoccolin
¦]®a¤¤¤C¤ë¦³¨Æ¡A
¤£¦n·N«ä¡A³o»ò¤[¤~ÂsÄý°T®§¡C
¬Ý¤F©p´y­zªº¡A
»¡¯u¦aÁÙ¤£²M·¡©p¯u¥¿­nªº¬O¤°»ò¡A
¯à§_²M·¡¦a»¡©ú«e¦]«áªG¡H

TOP

¦^´_ 11# happycoccolin

¦Û©w¸q¨ç¼Æ»²§U·|²³æ¨Ç
¦pªþ¥ó¤Ï±À¤u§@ªí¡A¤½¦¡¦³©w¸q¦WºÙ¡Aª`·N©w¸q¦WºÙ

    123-0507.zip (20.45 KB)
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

½Ð°Ý¦³­þ¦ì¤j¤j¥i¥H¸Ñ´b©O~~~~~~

TOP

¦^´_ 8# c_c_lai


    ªO¤j§A¦n,
·Q½Ð±Ð¤@¤U,­Y¬O¤Ï±À,­ì¥»CÄæ¦ì¤º¸ê®Æ(¥Ñ³rÂI¤À¶})¦³¼Æ­Ó,AÄæBÄæ¸ê®Æ¬Û¦P,­n¦p¦ó§âBÄæ¸ê®Æ­Ó§O¨ú¥X©O?

¦p¤U

A                                  B                 C
1234-5678        11111        aa,bb,cc,dd
2345-6789        22222        ee,ff,gg
3456-7890        33333        hh,ii
-----------------------------------
©î¦¨¦p¤U
A                                  B                 C
1234-5678        11111        aa
1234-5678        11111        bb
1234-5678        11111        cc
1234-5678        11111        dd
1234-5678        11111        aa
1234-5678        11111        aa
1234-5678        11111        aa
2345-6789        22222        ee
2345-6789        22222        ff
2345-6789        22222        gg
3456-7890        33333        hh
3456-7890        33333        ii
123-0808.rar (15.94 KB) §¨ÀÉ

TOP

¦^´_ 8# c_c_lai


    ¬Oªº!!!!!¤w¸g´ú¸Õ¦¨¥\!!ÁÂÁ¤j¤j!!!!!!

TOP

¦^´_ 7# happycoccolin
¬O§_¦p¦¹¡H
  1. Function zz(rng As Range, Page As Range, FVal) As String
  2.     Dim SN(), flag As Boolean
  3.    
  4.     For i = 1 To rng.Count               '  rng.Count = 14
  5.         If rng(i) = FVal Then            '  rng(1) = "1234-5678"¡B
  6.             If s > 0 Then
  7.                 flag = True
  8.                 For j = 0 To s - 1
  9.                     If (SN(j) = Page(i)) Then
  10.                         flag = False
  11.                         Exit For
  12.                     End If
  13.                 Next j
  14.             Else
  15.                 flag = True
  16.             End If
  17.             
  18.             If flag Then
  19.                 ReDim Preserve SN(s)
  20.                 SN(s) = Page(i): s = s + 1   '  Page(1) = "aa"
  21.             End If
  22.         End If
  23.     Next
  24.     zz = Join(SN, "¡B")
  25. End Function

  26. Sub Test()
  27.     With Sheets(2)
  28.         str1 = zz(.Range("A1:A14"), .Range("B1:B14"), "1234-5678")
  29.     End With
  30.     MsgBox str1
  31. End Sub
½Æ»s¥N½X
123-0507.rar (15.94 KB)

TOP

¦^´_ 4# c_c_lai


¤j¤j§A¦n~~

¬ðµM·Q¨ì~­YSheet2 BÄ椧¤¤¦³­«½Æªº~¬O§_¥i¥H¥u¨ú¤@¦¸´N¦n,¤£­n­«½Æ¥X²{©O~

¨Ò¦p

§Ú¨Ï¥Î¦¹¤èªk«á CÄæ·|¥X²{

aa¡Bbb¡Bcc¡Bdd¡Baa¡Baa¡Baa

¬O§_¥i¥H¥u¥X²{
aa¡Bbb¡Bcc¡Bdd

123-0507.zip (13.08 KB)

TOP

        ÀR«ä¦Û¦b : ¸Ü¦h¤£¦p¸Ü¤Ö¡A¸Ü¤Ö¤£¦p¸Ü¦n¡C
ªð¦^¦Cªí ¤W¤@¥DÃD