µù¥U
µn¿ý
º¶
½×¾Âª©³W
¸T¤î¦Cªí
»¡©ú
¦a¹Ï
¼Æ¦ì®Ñ»
¨p¤H®ø®§ (0)
¤½¦@®ø®§ (0)
½×¾Â¥ô°È (0)
¨t²Î®ø®§ (0)
¦n¤Í®ø®§ (0)
©«¤l®ø®§ (0)
³Â»¶®a±Ú°Q½×ª©ª©
»
Excelµ{¦¡°Ï
» ½Ð±Ð if §PÂ_¦¡¤Óªø ¡A«ç»ò´«¦æ¡H
ªð¦^¦Cªí
¤U¤@¥DÃD
¤W¤@¥DÃD
µo©«
[µo°Ý]
½Ð±Ð if §PÂ_¦¡¤Óªø ¡A«ç»ò´«¦æ¡H
ji12345678
µoµu®ø®§
¥[¬°¦n¤Í
ji12345678
·í«eÂ÷½u
UID
9211
©«¤l
28
¥DÃD
17
ºëµØ
0
¿n¤À
79
ª÷¿ú
79
ÂI¦W
0
§@·~¨t²Î
XP
³nÅ骩¥»
SP2
¾\ŪÅv
20
©Ê§O
¤k
¦b½u®É¶¡
37 ¤p®É
µù¥U®É¶¡
2012-5-4
³Ì«áµn¿ý
2016-9-29
¤¤¾Ç¥Í
©«¤l
28
¥DÃD
17
ºëµØ
0
¿n¤À
79
ÂI¦W
0
§@·~¨t²Î
XP
³nÅ骩¥»
SP2
¾\ŪÅv
20
©Ê§O
¤k
µù¥U®É¶¡
2012-5-4
³Ì«áµn¿ý
2016-9-29
1
#
¸õÂà¨ì
»
˧Ǭݩ«
¥´¦L
¦rÅé¤j¤p:
t
T
µoªí©ó 2014-5-13 01:40
|
¥u¬Ý¸Ó§@ªÌ
[µo°Ý]
½Ð±Ð if §PÂ_¦¡¤Óªø ¡A«ç»ò´«¦æ¡H
½Ð±Ð if §PÂ_¦¡¤Óªø ¡A«ç»ò´«¦æ¡H
if Cells(x_step, 15) = 20 or Cells(x_step, 15) = 235 or Cells(x_step, 15) = 25 or Cells(x_step, 15) = 207 then
Else
End if
Cells(x_step, 15) = 20 or Cells(x_step, 15) = 235 or _ ===========>¼g¦¨¨â¦æ¡An«ç»ò¼g¤X¡C
Cells(x_step, 15) = 25 or Cells(x_step, 15) = 207 then
·P®¦~~~¡CÁÂÁ¡C
¼Ó¥D¼ö©«
½Ð±ÐVBA ¨â¦æÀx¦s®æªº¦r¦ê¦X¨Ö°ÝÃD~~~~~~~
½Ð±Ð¤@Ó"¨ú±oAÄ檺³Ì«á¤@¦C ¦ì¸m"ªº°ÝÃD
½Ð±Ð¦p¦ó ¨Ï¥Îrange ©M Replace ¨ú¥N¯S©w¦r
½Ð±Ð¦p¦ó¥ÎVBA§ä¥X³Ì¤jÈ¡B²Ä¤G¤jÈ¡K¡K ¸U
¨D§U~~¥ÎVBA»s§@¤@Ó¸ê®Æ´M§ä~¸ê®Æ·h²¾ªº¤è
¦p¦ó¥Îvbaªº¨ç¼Æ·j´MexcelÄ椺ªº¸ê®Æ¡H
±Ð²¾°Ê¤u§@ªí¥X²{ Class worksheetªºMove¤è
¶}±ÒexcelÀÉ®×«á ¡A˼Ƥ@¬q®É¶¡(©Î¨ì¤F³]©w
¦p¦ó¿é¤J¼Æ¦r¡AÅã¥Ü¹ïÀ³Äæ¦ìªº^¤å¦r¥À¡H
¦p¦ó¦bEXCEL¤u§@ªí¨ú±oºô¸ô¤Wªº¸ê®Æ¡H
¦¬ÂÃ
¤À¨É
smart3135
µoµu®ø®§
¥[¬°¦n¤Í
smart3135
·í«eÂ÷½u
UID
16988
©«¤l
96
¥DÃD
18
ºëµØ
0
¿n¤À
125
ª÷¿ú
125
ÂI¦W
0
§@·~¨t²Î
Windows 7
³nÅ骩¥»
Office 2007
¾\ŪÅv
20
©Ê§O
¨k
¦b½u®É¶¡
190 ¤p®É
µù¥U®É¶¡
2014-3-23
³Ì«áµn¿ý
2022-8-2
¤¤¾Ç¥Í
©«¤l
96
¥DÃD
18
ºëµØ
0
¿n¤À
125
ÂI¦W
0
§@·~¨t²Î
Windows 7
³nÅ骩¥»
Office 2007
¾\ŪÅv
20
©Ê§O
¨k
µù¥U®É¶¡
2014-3-23
³Ì«áµn¿ý
2022-8-2
2
#
µoªí©ó 2014-5-13 05:14
|
¥u¬Ý¸Ó§@ªÌ
¦^´_
1#
ji12345678
°Ñ¦Ò¬Ý¬Ý
Sub test()
If Cells(x_step, 15) = 20 Or Cells(x_step, 15) = 235 Or _
Cells(x_step, 15) = 25 Or Cells(x_step, 15) = 207 Then
End If
End Sub
½Æ»s¥N½X
TOP
sunnyso
µoµu®ø®§
¥[¬°¦n¤Í
sunnyso
·í«eÂ÷½u
UID
13329
©«¤l
605
¥DÃD
92
ºëµØ
0
¿n¤À
648
ª÷¿ú
648
ÂI¦W
0
§@·~¨t²Î
windows
³nÅ骩¥»
7
¾\ŪÅv
50
©Ê§O
¨k
¨Ó¦Û
macau
¦b½u®É¶¡
409 ¤p®É
µù¥U®É¶¡
2013-4-5
³Ì«áµn¿ý
2019-2-10
°ª¤¤¥Í
©«¤l
605
¥DÃD
92
ºëµØ
0
¿n¤À
648
ÂI¦W
0
§@·~¨t²Î
windows
³nÅ骩¥»
7
¾\ŪÅv
50
©Ê§O
¨k
¨Ó¦Û
macau
µù¥U®É¶¡
2013-4-5
³Ì«áµn¿ý
2019-2-10
3
#
µoªí©ó 2014-5-15 10:39
|
¥u¬Ý¸Ó§@ªÌ
¦^´_
1#
ji12345678
num2lookup = ",20,235,25,207,"
if UBound(Split(num2lookup, "," & Cells(x_step, 15) & ",")) >0 then
......
end if
½Æ»s¥N½X
ss
TOP
jewayy
µoµu®ø®§
¥[¬°¦n¤Í
jewayy
·í«eÂ÷½u
UID
6927
©«¤l
36
¥DÃD
9
ºëµØ
0
¿n¤À
51
ª÷¿ú
51
ÂI¦W
0
§@·~¨t²Î
Win7
³nÅ骩¥»
Office2003
¾\ŪÅv
20
©Ê§O
¨k
¦b½u®É¶¡
24 ¤p®É
µù¥U®É¶¡
2011-10-30
³Ì«áµn¿ý
2015-1-31
¤¤¾Ç¥Í
©«¤l
36
¥DÃD
9
ºëµØ
0
¿n¤À
51
ÂI¦W
0
§@·~¨t²Î
Win7
³nÅ骩¥»
Office2003
¾\ŪÅv
20
©Ê§O
¨k
µù¥U®É¶¡
2011-10-30
³Ì«áµn¿ý
2015-1-31
4
#
µoªí©ó 2014-5-15 21:56
|
¥u¬Ý¸Ó§@ªÌ
¦h¥[Ó _ ²Å¸¹´N¥i¥H±µ¤U¦æ¤F¡I
Hi~
TOP
ÀR«ä¦Û¦b :
¦n¨Æn´£±o°_¡A¬O«Dn©ñ±o¤U¡A¦¨´N§O¤H§Y¬O¦¨´N¦Û¤v¡C
ªð¦^¦Cªí
¤U¤@¥DÃD
¤W¤@¥DÃD
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¯»µ·