µù¥U
µn¿ý
º¶
½×¾Âª©³W
¸T¤î¦Cªí
»¡©ú
¦a¹Ï
¼Æ¦ì®Ñ»
¨p¤H®ø®§ (0)
¤½¦@®ø®§ (0)
½×¾Â¥ô°È (0)
¨t²Î®ø®§ (0)
¦n¤Í®ø®§ (0)
©«¤l®ø®§ (0)
³Â»¶®a±Ú°Q½×ª©ª©
»
Excelµ{¦¡°Ï
» ¦³ÃöExcel VBA°}¦C¨Ï¥Î¤è¦¡...
1
2
¤U¤@¶
ªð¦^¦Cªí
¤U¤@¥DÃD
¤W¤@¥DÃD
µo©«
[µo°Ý]
¦³ÃöExcel VBA°}¦C¨Ï¥Î¤è¦¡...
VBALearner
µoµu®ø®§
¥[¬°¦n¤Í
VBALearner
·í«eÂ÷½u
UID
25455
©«¤l
102
¥DÃD
14
ºëµØ
0
¿n¤À
142
ª÷¿ú
142
ÂI¦W
0
§@·~¨t²Î
Win10
³nÅ骩¥»
Office2016
¾\ŪÅv
20
©Ê§O
¨k
¦b½u®É¶¡
54 ¤p®É
µù¥U®É¶¡
2016-7-31
³Ì«áµn¿ý
2020-3-21
¤¤¾Ç¥Í
©«¤l
102
¥DÃD
14
ºëµØ
0
¿n¤À
142
ÂI¦W
0
§@·~¨t²Î
Win10
³nÅ骩¥»
Office2016
¾\ŪÅv
20
©Ê§O
¨k
µù¥U®É¶¡
2016-7-31
³Ì«áµn¿ý
2020-3-21
1
#
¸õÂà¨ì
»
¥¿§Ç¬Ý©«
¥´¦L
¦rÅé¤j¤p:
t
T
µoªí©ó 2016-7-31 23:52
|
¥u¬Ý¸Ó§@ªÌ
[µo°Ý]
¦³ÃöExcel VBA°}¦C¨Ï¥Î¤è¦¡...
¥»©«³Ì«á¥Ñ VBALearner ©ó 2016-7-31 23:53 ½s¿è
Excel VBAªº°ÝÃD
½Ð°Ý¦pªG§Ú¦³Ó¤@ºû°}¦C
¸Ì±¦³10ӼƦr¤À§O¹ïÀ³°}¦C(1~10)
°²³]§Ú¤µ¤Ñn±Æ§Ç°}¦C¤¤¼ÆȤj¨ì¤p
¨º§Ún¦p¦óª¾¹D±Æ¦W«e5¤j¼ÆȪºì©l¼ÐÅÒ(´N¬O쥻ªº1~10±Æ§Ç³Q¥´¶Ã«á ¦p¦ó©I¥s)?
·PÁ¦^µª
option explicit
dim total(50) as variant
for i = 1 to 50
total(i) = application.worksheetfunction.sum(range(cells(i,1),cells(i,10)))
next
sorting....%#$?!
index of top 20?!
½Æ»s¥N½X
©Î¬O¦³¨ä¥L§ó¦nªº¤è¦¡?!
¼Ó¥D¼ö©«
¤W¥«Âd¤T¤jªk¤H¶R½æ¶W¤é³ø¸ê®Æ·J¾ã³B²z
VBA¤£µ¹¥Î¤u§@ªí¨ç¼ÆABSµ´¹ïÈ¥\¯à¶Ü?
Åý©Ò¦³ComboBoxªºCaption¦rÅé¤j¤p³£¬O12
¦b½Õ¾ãWordªºªí®æ®É...
Ãö©ó¤p¾Ç¥Íªº¦^´_¥\¯à...
¤£¦n·N«ä®e§Ú°ÝÓÄø°ÝÃD
ºÞ²zªÌ¤j¤j Pythonª©¦³¨S¦³¾÷·|³Ð«Ø©O?
§âExcel¸ê®Æ˸m
¦r¦ê...ª«¥ó¤Æ?! ¥Øªº:Call ¦r¦ê
½ÐÀ°¤p§Ì°£¿ù...¬O¤£¯à³sÄò¥Îfind¨ç¼Æ¶Ü?!
¦¬ÂÃ
¤À¨É
VBALearner
µoµu®ø®§
¥[¬°¦n¤Í
VBALearner
·í«eÂ÷½u
UID
25455
©«¤l
102
¥DÃD
14
ºëµØ
0
¿n¤À
142
ª÷¿ú
142
ÂI¦W
0
§@·~¨t²Î
Win10
³nÅ骩¥»
Office2016
¾\ŪÅv
20
©Ê§O
¨k
¦b½u®É¶¡
54 ¤p®É
µù¥U®É¶¡
2016-7-31
³Ì«áµn¿ý
2020-3-21
¤¤¾Ç¥Í
©«¤l
102
¥DÃD
14
ºëµØ
0
¿n¤À
142
ÂI¦W
0
§@·~¨t²Î
Win10
³nÅ骩¥»
Office2016
¾\ŪÅv
20
©Ê§O
¨k
µù¥U®É¶¡
2016-7-31
³Ì«áµn¿ý
2020-3-21
13
#
µoªí©ó 2016-8-8 15:20
|
¥u¬Ý¸Ó§@ªÌ
¦^´_
12#
ã´£³¡ªL
¬O¬O! §ÚºCºC²Ö¿nµZ¿i«á¦A¨Ó¦V±z½Ð±Ð¡A·PÁ±zOvO
TOP
ã´£³¡ªL
µoµu®ø®§
¥[¬°¦n¤Í
ã´£³¡ªL
·í«eÂ÷½u
UID
13768
©«¤l
2833
¥DÃD
10
ºëµØ
0
¿n¤À
2889
ª÷¿ú
2889
ÂI¦W
0
§@·~¨t²Î
¡e²¤¡f
³nÅ骩¥»
¡e²¤¡f
¾\ŪÅv
100
©Ê§O
¨k
¨Ó¦Û
¡e²¤¡f
¦b½u®É¶¡
2106 ¤p®É
µù¥U®É¶¡
2013-5-13
³Ì«áµn¿ý
2024-11-12
ª©¥D
©«¤l
2833
¥DÃD
10
ºëµØ
0
¿n¤À
2889
ÂI¦W
0
§@·~¨t²Î
¡e²¤¡f
³nÅ骩¥»
¡e²¤¡f
¾\ŪÅv
100
©Ê§O
¨k
¨Ó¦Û
¡e²¤¡f
µù¥U®É¶¡
2013-5-13
³Ì«áµn¿ý
2024-11-12
12
#
µoªí©ó 2016-8-8 11:17
|
¥u¬Ý¸Ó§@ªÌ
¦^´_
11#
VBALearner
µ{¦¡¤èªk¤Ö¤H¥Î, ¤@©w¦³¥¦ªº¹D²z,
·L³n·|´£¨Ñ¤£¦P¤èªk¥h³B²zÃþ¦ü»Ý¨D, ¤]¦³¥¦ªº¹D²z,
©Ò¥H, ¨S¦³¦n¤£¦n¥Î°ÝÃD, ¥u¦³¾A¤£¾A¥Î?
VBA¾a¸gÅç, ºCºCºN, ºCºC¿i, ªáªº®É¶¡°÷¦h, ¹ï¤_¸ê®Æªº³B²z, ¨ä¹ê´N¨º´XÓ¤èªk§a!
TOP
VBALearner
µoµu®ø®§
¥[¬°¦n¤Í
VBALearner
·í«eÂ÷½u
UID
25455
©«¤l
102
¥DÃD
14
ºëµØ
0
¿n¤À
142
ª÷¿ú
142
ÂI¦W
0
§@·~¨t²Î
Win10
³nÅ骩¥»
Office2016
¾\ŪÅv
20
©Ê§O
¨k
¦b½u®É¶¡
54 ¤p®É
µù¥U®É¶¡
2016-7-31
³Ì«áµn¿ý
2020-3-21
¤¤¾Ç¥Í
©«¤l
102
¥DÃD
14
ºëµØ
0
¿n¤À
142
ÂI¦W
0
§@·~¨t²Î
Win10
³nÅ骩¥»
Office2016
¾\ŪÅv
20
©Ê§O
¨k
µù¥U®É¶¡
2016-7-31
³Ì«áµn¿ý
2020-3-21
11
#
µoªí©ó 2016-8-7 22:47
|
¥u¬Ý¸Ó§@ªÌ
¦^´_
9#
ã´£³¡ªL
«x...³o»ò¬Ý¨Ó...Evaluate¨ä¹ê«Ü¦n¥ÎÕÙ?!!
application.worksheetfunction³£§K¥s¤F
¥±`¥Î²ßºDªº¤u§@ªí¨ç¼Æ³£ª½±µ¥ÎEvaluate©I¥s¤]¦æ¡A¬O§a?!(¤£¬ì¾ÇªüxD~~~)
¥i¬O¦n¹³¨S¦³«Ü¦h¤H¦b¥ÎEvaluate¡A¥«±¤Wªº®Ñ³£¨S¤¶²Ð¥¦...
¨º·Q½Ð°Ý¤j¤j¡A°£¤F¤Wz¥\¯à¥~¡A¦³¬Æ»òEvaluate±`¥Îªº¥Îªk¶ÜOwO?
ÁÂÁ«ü±Ð!
TOP
VBALearner
µoµu®ø®§
¥[¬°¦n¤Í
VBALearner
·í«eÂ÷½u
UID
25455
©«¤l
102
¥DÃD
14
ºëµØ
0
¿n¤À
142
ª÷¿ú
142
ÂI¦W
0
§@·~¨t²Î
Win10
³nÅ骩¥»
Office2016
¾\ŪÅv
20
©Ê§O
¨k
¦b½u®É¶¡
54 ¤p®É
µù¥U®É¶¡
2016-7-31
³Ì«áµn¿ý
2020-3-21
¤¤¾Ç¥Í
©«¤l
102
¥DÃD
14
ºëµØ
0
¿n¤À
142
ÂI¦W
0
§@·~¨t²Î
Win10
³nÅ骩¥»
Office2016
¾\ŪÅv
20
©Ê§O
¨k
µù¥U®É¶¡
2016-7-31
³Ì«áµn¿ý
2020-3-21
10
#
µoªí©ó 2016-8-3 11:15
|
¥u¬Ý¸Ó§@ªÌ
¦^´_
9#
ã´£³¡ªL
³á³á§¹¥þÀ´¤F! ·PÁ±z¥J²Ó¦a¦^µª!!!
ì¨ÓarrayÁÙ¦³¾î¦¡¸òª½¦¡ªº°Ï§O...§Ú¥H¬°´N¥u¬O¦s¦b°O¾ÐÅé¸Ì±ªº¸ê®Æ¦Ó¤w¡A§Ú·R¥Î¬Æ»ò§Îª¬¶K¤W´N¥Î¤°»ò§Îª¬¶K¤W......®¦~Á`¤§·PÁÂ!
TOP
ã´£³¡ªL
µoµu®ø®§
¥[¬°¦n¤Í
ã´£³¡ªL
·í«eÂ÷½u
UID
13768
©«¤l
2833
¥DÃD
10
ºëµØ
0
¿n¤À
2889
ª÷¿ú
2889
ÂI¦W
0
§@·~¨t²Î
¡e²¤¡f
³nÅ骩¥»
¡e²¤¡f
¾\ŪÅv
100
©Ê§O
¨k
¨Ó¦Û
¡e²¤¡f
¦b½u®É¶¡
2106 ¤p®É
µù¥U®É¶¡
2013-5-13
³Ì«áµn¿ý
2024-11-12
ª©¥D
©«¤l
2833
¥DÃD
10
ºëµØ
0
¿n¤À
2889
ÂI¦W
0
§@·~¨t²Î
¡e²¤¡f
³nÅ骩¥»
¡e²¤¡f
¾\ŪÅv
100
©Ê§O
¨k
¨Ó¦Û
¡e²¤¡f
µù¥U®É¶¡
2013-5-13
³Ì«áµn¿ý
2024-11-12
9
#
µoªí©ó 2016-8-3 10:12
|
¥u¬Ý¸Ó§@ªÌ
application.transpose
¬°¡eÂà¸m¡f¤§¥Î¡Aì³]array°}¦C¬°¡e¾î¦¡¡f¡A¶·Âà¸m¤@¦¸¤~¯à¥H¡eª½¦¡-¥Ñ¤W¦Ó¤U¡f¶K¤JÄæ¦ì
application.evaluate
¥Î¨Ó±N¡e¤å¦r¦r¦ê¡fªº¡epºâ¦¡¡f¡A¥H¤u§@ªí¨ç¼Æ¤è¦¡ª½±µpºâ¥X¨äµ²ªG¡A
¨Ò¦p¡GMsgBox Application.Evaluate(
"=A1>A2"
)
¦]½d¨ÒÃD¤¤§t¡e¤å¦r¡fªº¤ñ¸û¤j¤p¡AVBA»P¤½¦¡ªº¤ñ¸ûµ²ªG¬O¤£¤@¼Ëªº¡A
¬°¤F¹F¨ìVBA±Æ§Çªºµ²ªG¯à»P¤u§@ªí±Æ§Çµ²ªG¤@P¡A©Ò¥H§Q¥Î¤FEvaluate¡A
Y¬O¡e¯Â¼ÆÈ¡fªº¤ñ¸û¡Aª½±µ¨Ï¥Î a>B §Y¥i¡C
TOP
VBALearner
µoµu®ø®§
¥[¬°¦n¤Í
VBALearner
·í«eÂ÷½u
UID
25455
©«¤l
102
¥DÃD
14
ºëµØ
0
¿n¤À
142
ª÷¿ú
142
ÂI¦W
0
§@·~¨t²Î
Win10
³nÅ骩¥»
Office2016
¾\ŪÅv
20
©Ê§O
¨k
¦b½u®É¶¡
54 ¤p®É
µù¥U®É¶¡
2016-7-31
³Ì«áµn¿ý
2020-3-21
¤¤¾Ç¥Í
©«¤l
102
¥DÃD
14
ºëµØ
0
¿n¤À
142
ÂI¦W
0
§@·~¨t²Î
Win10
³nÅ骩¥»
Office2016
¾\ŪÅv
20
©Ê§O
¨k
µù¥U®É¶¡
2016-7-31
³Ì«áµn¿ý
2020-3-21
8
#
µoªí©ó 2016-8-3 00:10
|
¥u¬Ý¸Ó§@ªÌ
¥»©«³Ì«á¥Ñ VBALearner ©ó 2016-8-3 00:19 ½s¿è
¦^´_
6#
ã´£³¡ªL
§Ú·|¥Îsorting¥\¯à ¦ý¬O§Úªº¸ê®Æ¦³¼ÐÅÒ¸¹½X §Ún±Æ§Ç§¹«áÁÙ¯àŪ¨ú¬Û¹ïÀ³ªº¼ÐÅÒ¸¹½X
¦Ó¥B§Ú¦P®É³B²z¦hºØ¸ê®Æ
©Ò¥H¤£·Q¶K¨ìworksheet¤W±³B²z
µM«áè¼Ó¤W´£¨ìªº¤èªk§Ú¤§«e¤]¨S·Q¹LxD
¥Øªº¬On§ä¦hºØ¸ê®Æ±Æ¦W«e100¤jªº¸ê®Æ¥æ¶°ªº¼ÐÅÒ¸¹½X
¥t¥~¡A§Ú¥i¥H°Ý±zapplication.transposeªº°ÝÃD¶Ü? ¥L¦n¹³¥u¬O³æ¯Â¶K¤Wªº¥\¯à?!!
ÁÙ¦³application.evaluate¡A³o¦n¹³¦³«Ü¦h¥\¯à....? ¨ä¤¤¤@ºØ¦n¹³¬O¥i¥H§â¦r¦êÅܼÆÈ? ÁÙ¦³¨ä¥L...? ¤£¤ÓÀ´
Áٽнç±Ð!
TOP
VBALearner
µoµu®ø®§
¥[¬°¦n¤Í
VBALearner
·í«eÂ÷½u
UID
25455
©«¤l
102
¥DÃD
14
ºëµØ
0
¿n¤À
142
ª÷¿ú
142
ÂI¦W
0
§@·~¨t²Î
Win10
³nÅ骩¥»
Office2016
¾\ŪÅv
20
©Ê§O
¨k
¦b½u®É¶¡
54 ¤p®É
µù¥U®É¶¡
2016-7-31
³Ì«áµn¿ý
2020-3-21
¤¤¾Ç¥Í
©«¤l
102
¥DÃD
14
ºëµØ
0
¿n¤À
142
ÂI¦W
0
§@·~¨t²Î
Win10
³nÅ骩¥»
Office2016
¾\ŪÅv
20
©Ê§O
¨k
µù¥U®É¶¡
2016-7-31
³Ì«áµn¿ý
2020-3-21
7
#
µoªí©ó 2016-8-3 00:07
|
¥u¬Ý¸Ó§@ªÌ
¥»©«³Ì«á¥Ñ VBALearner ©ó 2016-8-3 00:18 ½s¿è
¦^´_
5#
ML089
³á³á·PÁ±z!!
§â½s½X¥[¦b«á±ªº¤èªk¯u¬O¤ÓÁo©ú¤F!!!
TOP
ã´£³¡ªL
µoµu®ø®§
¥[¬°¦n¤Í
ã´£³¡ªL
·í«eÂ÷½u
UID
13768
©«¤l
2833
¥DÃD
10
ºëµØ
0
¿n¤À
2889
ª÷¿ú
2889
ÂI¦W
0
§@·~¨t²Î
¡e²¤¡f
³nÅ骩¥»
¡e²¤¡f
¾\ŪÅv
100
©Ê§O
¨k
¨Ó¦Û
¡e²¤¡f
¦b½u®É¶¡
2106 ¤p®É
µù¥U®É¶¡
2013-5-13
³Ì«áµn¿ý
2024-11-12
ª©¥D
©«¤l
2833
¥DÃD
10
ºëµØ
0
¿n¤À
2889
ÂI¦W
0
§@·~¨t²Î
¡e²¤¡f
³nÅ骩¥»
¡e²¤¡f
¾\ŪÅv
100
©Ê§O
¨k
¨Ó¦Û
¡e²¤¡f
µù¥U®É¶¡
2013-5-13
³Ì«áµn¿ý
2024-11-12
6
#
µoªí©ó 2016-8-2 20:45
|
¥u¬Ý¸Ó§@ªÌ
EXCEL¥»¨ªº±Æ§Ç¥\¯à³Ì¦n¥Î, ¤]¾A¦X¤j³¡¥÷ªº¸ê®Æ«¬ºA(¤×¨ä¬O¦hÄæ¦ìªº¸ê®Æ),
¬°¦ó¤£¥Î¥¦???
TOP
ML089
µoµu®ø®§
¥[¬°¦n¤Í
ML089
·í«eÂ÷½u
UID
3671
©«¤l
2025
¥DÃD
13
ºëµØ
0
¿n¤À
2053
ª÷¿ú
2053
ÂI¦W
0
§@·~¨t²Î
WIN7
³nÅ骩¥»
Office2007
¾\ŪÅv
100
©Ê§O
¨k
¨Ó¦Û
¥x¥_¥«
¦b½u®É¶¡
2405 ¤p®É
µù¥U®É¶¡
2011-3-2
³Ì«áµn¿ý
2024-3-14
ª©¥D
©«¤l
2025
¥DÃD
13
ºëµØ
0
¿n¤À
2053
ÂI¦W
0
§@·~¨t²Î
WIN7
³nÅ骩¥»
Office2007
¾\ŪÅv
100
©Ê§O
¨k
¨Ó¦Û
¥x¥_¥«
µù¥U®É¶¡
2011-3-2
³Ì«áµn¿ý
2024-3-14
5
#
µoªí©ó 2016-8-2 19:48
|
¥u¬Ý¸Ó§@ªÌ
¦^´_
3#
VBALearner
¦p¦óª¾¹D±Æ¦W«e5¤j¼ÆȪºì©l¼ÐÅÒ(´N¬O쥻ªº1~10±Æ§Ç³Q¥´¶Ã«á ¦p¦ó©I¥s)?
¥i¥H
1. ¨Ï¥Î2Ó¤@ºû°}¦C¡A¤@Ó¬ö¿ýì©l¼ÐÅÒ(©Î¶¶¦ì)¡A¤@Ó¬ö¿ý¸ê®Æ°}¦C
2. ¨Ï¥Î2ºû°}¦C¡A¤@ºû¬ö¿ýì©l¼ÐÅÒ(©Î¶¶¦ì)¡A¥t¤@ºû¬ö¿ý¸ê®Æ°}¦C
3. ©Îì©l¸ê®Æ»Pì©l¼ÐÅÒ¦X¨Ö¡A
¨Ò¦p
1 33 ¦X¨Ö¬° 33001
2 11 ¦X¨Ö¬° 11002
3 44 ¦X¨Ö¬° 44003
±Æ§Ç«á¨ú¸ê®Æ«á3½X´N¬Oì©l¼ÐÅÒ(©Î¶¶¦ì)
{...} ªí¥Ü»Ýn¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡
TOP
ÀR«ä¦Û¦b :
ª¾ÃÑn¥Î¤ßÅé·|¡A¤~¯àÅܦ¨¦Û¤vªº´¼¼z¡C
1
2
¤U¤@¶
ªð¦^¦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¯»µ·