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

[µo°Ý] vba·s¤âµo°Ý

[µo°Ý] vba·s¤âµo°Ý

½Ð°Ý§Ú¼g¤F¤@­Ó°ò¥»ªºif°j°é¡A­n«ç»òÅý§PÂ_ªºµ²ªG¸òµÛ¸ê®Æ¨Ó·½²¾°Ê

ÁÂÁÂ

¬¡­¶Ã¯1.rar (20.22 KB)

¦^´_ 2# dou10801



ÁÂÁÂdou10801¤j¤j~

TOP

¦^´_  wayne0303

­n«ç»òÅý§PÂ_ªºµ²ªG¸òµÛ¸ê®Æ¨Ó·½²¾°Ê>> §â¤ñ¹ï«áªºµ²ªG¤S¸Ë¦^arr¡AÁÂÁÂ

Sub test( ...
samwang µoªí©ó 2021-9-7 12:21



arr(s, 1) ¡ö­ì¨Ó¬O§ï³o­Ó¡A§Ú·d¦n¤[...

ÁÂÁÂsamwang¤j¤j~

TOP

¦^´_  wayne0303 samwang«e½úªº¤èªk¤~¥¿½T,§Ú¤]­è¾Ç,¨S¬Ý²M·¡.
dou10801 µoªí©ó 2021-9-7 13:15




ÁÙ¬OÁÂÁ¤j¤jÄ@·NÀ°§Ú¸Ñµª~

TOP

¦^´_ 9# ML089


S = S + 1 ¬O¦h¾lªº
«x~¥i¥H吔¡AÁÂÁÂML089¤j¤j«ü¾É

Sub iif2()
    Dim arr, i
    arr = Range([a20], [a65536].End(3))
    For i ...
ML089 µoªí©ó 2021-9-7 14:08

TOP

¦^´_ 11# ML089

ÁÂÁÂML089¤j¤j~
    Select Case¥Î³~¦³¤ñ¸û¼s¶Ü¡H

TOP

¦^´_ 13# samwang


·PÁÂsamwang¤j¤j ¸Ñµª~

TOP

¦^´_ 14# ML089


¤F¸Ñ~
ÁÂÁÂML089¤j¤j~

TOP

¦^´_ 15# ­ã´£³¡ªL


«z~­ã¤j³o­Óswitch§ó²¼ä~ÁÂÁÂ

TOP

        ÀR«ä¦Û¦b : ¨ü¤HÂI¤ô¤§®¦¡A¶··í´é¬u¥H³ø¡C
ªð¦^¦Cªí ¤W¤@¥DÃD