µù¥U
µn¿ý
º¶
½×¾Âª©³W
¸T¤î¦Cªí
»¡©ú
¦a¹Ï
¼Æ¦ì®Ñ»
¨p¤H®ø®§ (0)
¤½¦@®ø®§ (0)
½×¾Â¥ô°È (0)
¨t²Î®ø®§ (0)
¦n¤Í®ø®§ (0)
©«¤l®ø®§ (0)
³Â»¶®a±Ú°Q½×ª©ª©
»
Excelµ{¦¡°Ï
» 数¦r¨ç数
ªð¦^¦Cªí
¤U¤@¥DÃD
¤W¤@¥DÃD
µo©«
[¤À¨É]
数¦r¨ç数
wqfzqgk
µoµu®ø®§
¥[¬°¦n¤Í
wqfzqgk
·í«eÂ÷½u
UID
262
©«¤l
75
¥DÃD
19
ºëµØ
0
¿n¤À
135
ª÷¿ú
135
ÂI¦W
0
§@·~¨t²Î
win7
³nÅ骩¥»
2007 010
¾\ŪÅv
20
¦b½u®É¶¡
32 ¤p®É
µù¥U®É¶¡
2010-5-18
³Ì«áµn¿ý
2013-10-26
¤¤¾Ç¥Í
©«¤l
75
¥DÃD
19
ºëµØ
0
¿n¤À
135
ÂI¦W
0
§@·~¨t²Î
win7
³nÅ骩¥»
2007 010
¾\ŪÅv
20
µù¥U®É¶¡
2010-5-18
³Ì«áµn¿ý
2013-10-26
1
#
¸õÂà¨ì
»
˧Ǭݩ«
¥´¦L
¦rÅé¤j¤p:
t
T
µoªí©ó 2010-6-6 19:26
|
¥u¬Ý¸Ó§@ªÌ
[¤À¨É]
数¦r¨ç数
Function 数¦r(ByVal rang As String)
Dim i As Integer, str As Integer
For i = 1 To Len(rang) '¹M历单¤¸®æ¤¤¨C个¦r²Å
If VBA.IsNumeric(Mid(rang, i, 1)) Then
str = str & Mid(rang, i, 1)
End If
Next i
数¦r = str
End Function
¼Ó¥D¼ö©«
excel2010³¡¤À·s¥\¯à
¤@VSTO¥[载项
usedrange
删°£©Ò¦³¥N码
¦Û©w义¨ç数帮§U说
转¥Ñ¡GVB.NET调¥ÎCHM帮§U
§Úªº¥[载项ºI图
¦X¦}单¤¸®æ°¾²¾¨D©M
单¤¸®æ内¤£«Î`¦r²Å
2010·sª¾
¦¬ÂÃ
¤À¨É
学习
oobird
µoµu®ø®§
¥[¬°¦n¤Í
oobird
·í«eÂ÷½u
µó¤Í¤@±Ú
UID
17
©«¤l
1572
¥DÃD
16
ºëµØ
2
¿n¤À
1521
ª÷¿ú
1521
ÂI¦W
0
§@·~¨t²Î
xp
³nÅ骩¥»
office 2003
¾\ŪÅv
150
©Ê§O
¨k
¦b½u®É¶¡
832 ¤p®É
µù¥U®É¶¡
2010-5-1
³Ì«áµn¿ý
2016-1-13
¡@ÀY»Î:
µó¤Í¤@±Ú
¶W¯Åª©¥D
©«¤l
1572
¥DÃD
16
ºëµØ
2
¿n¤À
1521
ÂI¦W
0
§@·~¨t²Î
xp
³nÅ骩¥»
office 2003
¾\ŪÅv
150
©Ê§O
¨k
µù¥U®É¶¡
2010-5-1
³Ì«áµn¿ý
2016-1-13
2
#
µoªí©ó 2010-9-12 21:40
|
¥u¬Ý¸Ó§@ªÌ
str = str Mid(rang, i, 1)
¦n¹³À³¬°
str = str & Mid(rang, i, 1)
TOP
oobird
µoµu®ø®§
¥[¬°¦n¤Í
oobird
·í«eÂ÷½u
µó¤Í¤@±Ú
UID
17
©«¤l
1572
¥DÃD
16
ºëµØ
2
¿n¤À
1521
ª÷¿ú
1521
ÂI¦W
0
§@·~¨t²Î
xp
³nÅ骩¥»
office 2003
¾\ŪÅv
150
©Ê§O
¨k
¦b½u®É¶¡
832 ¤p®É
µù¥U®É¶¡
2010-5-1
³Ì«áµn¿ý
2016-1-13
¡@ÀY»Î:
µó¤Í¤@±Ú
¶W¯Åª©¥D
©«¤l
1572
¥DÃD
16
ºëµØ
2
¿n¤À
1521
ÂI¦W
0
§@·~¨t²Î
xp
³nÅ骩¥»
office 2003
¾\ŪÅv
150
©Ê§O
¨k
µù¥U®É¶¡
2010-5-1
³Ì«áµn¿ý
2016-1-13
3
#
µoªí©ó 2010-9-13 23:20
|
¥u¬Ý¸Ó§@ªÌ
¶K¥N½X½Ð¥Î¥N½X®Ø¬[¡A´N¬O¤W±ªº"<>''²Å¸¹
§K±o±¼¦r±¼²Å¸¹¡C
TOP
ÀR«ä¦Û¦b :
¨Ã«D¦³¿ú¾{¬O§Ö¼Ö¡A°Ý¤ßµL·\¤ß³Ì¦w¡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¯»µ·