µù¥U
µn¿ý
º¶
½×¾Âª©³W
¸T¤î¦Cªí
»¡©ú
¦a¹Ï
¼Æ¦ì®Ñ»
¨p¤H®ø®§ (0)
¤½¦@®ø®§ (0)
½×¾Â¥ô°È (0)
¨t²Î®ø®§ (0)
¦n¤Í®ø®§ (0)
©«¤l®ø®§ (0)
³Â»¶®a±Ú°Q½×ª©ª©
»
Excelµ{¦¡°Ï
» ·j´M ExcelÀɮסB¬¡·~ï¦hµ§ÃöÁä¦r¡A¦A¦hµ§"§¹¾ã"¦C¥X
ªð¦^¦Cªí
¤U¤@¥DÃD
¤W¤@¥DÃD
µo©«
·j´M ExcelÀɮסB¬¡·~ï¦hµ§ÃöÁä¦r¡A¦A¦hµ§"§¹¾ã"¦C¥X
Hsieh
µoµu®ø®§
¥[¬°¦n¤Í
Hsieh
·í«eÂ÷½u
UID
3
©«¤l
4901
¥DÃD
44
ºëµØ
24
¿n¤À
4916
ª÷¿ú
4916
ÂI¦W
114
§@·~¨t²Î
Windows 7
³nÅ骩¥»
Office 20xx
¾\ŪÅv
150
©Ê§O
¨k
¨Ó¦Û
¥x¥_
¦b½u®É¶¡
4071 ¤p®É
µù¥U®É¶¡
2010-4-30
³Ì«áµn¿ý
2024-5-17
¶W¯Åª©¥D
©«¤l
4901
¥DÃD
44
ºëµØ
24
¿n¤À
4916
ÂI¦W
114
§@·~¨t²Î
Windows 7
³nÅ骩¥»
Office 20xx
¾\ŪÅv
150
©Ê§O
¨k
¨Ó¦Û
¥x¥_
µù¥U®É¶¡
2010-4-30
³Ì«áµn¿ý
2024-5-17
1
#
¸õÂà¨ì
»
µoªí©ó 2011-1-29 20:12
|
Åã¥Ü¥þ³¡©«¤l
¥»©«³Ì«á¥Ñ Hsieh ©ó 2011-1-29 20:52 ½s¿è
¦^´_
5#
webbliu
¥H¦P¤@¬¡¶§@½d¨Ò
¦b¤u§@ªí2ªºAÄæ¿é¤JÃöÁä¦r¸Õ¸Õ
find_keyword.rar
(13.84 KB)
¤U¸ü¦¸¼Æ: 69
2011-1-29 20:30
¥t¥~¶i¶¥¿z¿ï¤]¬O¤£¿ùªº¿ï¾Ü
¤U¸ü
(44.43 KB)
2011-1-29 20:52
¾Ç®üµL²P_¤£®¢¤U°Ý
TOP
Hsieh
µoµu®ø®§
¥[¬°¦n¤Í
Hsieh
·í«eÂ÷½u
UID
3
©«¤l
4901
¥DÃD
44
ºëµØ
24
¿n¤À
4916
ª÷¿ú
4916
ÂI¦W
114
§@·~¨t²Î
Windows 7
³nÅ骩¥»
Office 20xx
¾\ŪÅv
150
©Ê§O
¨k
¨Ó¦Û
¥x¥_
¦b½u®É¶¡
4071 ¤p®É
µù¥U®É¶¡
2010-4-30
³Ì«áµn¿ý
2024-5-17
¶W¯Åª©¥D
©«¤l
4901
¥DÃD
44
ºëµØ
24
¿n¤À
4916
ÂI¦W
114
§@·~¨t²Î
Windows 7
³nÅ骩¥»
Office 20xx
¾\ŪÅv
150
©Ê§O
¨k
¨Ó¦Û
¥x¥_
µù¥U®É¶¡
2010-4-30
³Ì«áµn¿ý
2024-5-17
2
#
µoªí©ó 2012-4-24 17:47
|
Åã¥Ü¥þ³¡©«¤l
Private Sub Worksheet_Change(ByVal Target As Range)
Dim A As Range, Rng As Range
If Target.Column = 1 Then
With Sheets("ºî¦X¸ê®Æ®w")
For i = 1 To .UsedRange.Rows.Count
Set A = .UsedRange.Rows(i).Find(Target)
If Not A Is Nothing Then
If Rng Is Nothing Then
Set Rng = .UsedRange.Rows(i)
Else
Set Rng = Union(Rng, .UsedRange.Rows(i))
End If
End If
Next
End With
End If
Application.EnableEvents = False
If Not Rng Is Nothing Then Rng.Copy Target.Offset(, 1) Else Target.Offset(, 1).Resize(, 50) = ""
Application.EnableEvents = True
End Sub
½Æ»s¥N½X
¦^´_
12#
jackson7015
¾Ç®üµL²P_¤£®¢¤U°Ý
TOP
ÀR«ä¦Û¦b :
¯u¥¿ªº·R¤ß¡A¬O·ÓÅU¦n¦Û¤vªº³oÁû¤ß¡C
ªð¦^¦Cªí
¤U¤@¥DÃD
¤W¤@¥DÃD
¹q¸£¦UºØµwÅé°Q½×
Excel£¸¯ë°Ï
Access
Office¤£¤À°Ï
EXCEL±MÄÝ°Q½×°Ï
Excel£¸¯ë°Ï
Excelµ{¦¡°Ï
¶i¶¥À³¥Î±M°Ï
OFFICE ¨t¦C
Word
PowerPoint
Access
Office¤£¤À°Ï
µ{¦¡»y¨¥
VB »P VB.Net
C »P C#
Java »P J#
µ{¦¡³]p¤£¤À°Ï
¸ê®Æ®w
ORACLE
My SQL
MS SQL
ºô¶³]p
ASP »P ASP.NET
PHP
PHP+MySQL ¤Jªù¹ê§@
JavaScript
FLASH / ActionScript
HTM/ HTML/ CSS
ºô¶³]p¤£¤À°Ï
¹q¸£»P§@·~¨t²Î
¹q¸£¦UºØµwÅé°Q½×
¤@¯ë¹q¸£³nÅé°Q½×
½×¾Â¨Æ°È
ºÞ²z¤½§i
§ë¶D¤Ï¬M
·s¤â´ú¸Õ
·R ¡E ¥Í¬¡
¤½¯q§G§iÄæ
¥Í¬¡»P·P°Ê
[¦¬Âæ¹¥DÃD]
[Ãöª`¦¹¥DÃDªº·s¦^´_]
[³q¹L QQ¡BMSN ¤À¨Éµ¹ªB¤Í]
¥Ó½Ð¤Í±¡Ãì±µ
Facebook¯»µ·