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

[µo°Ý] ¦C¦L¦Û°Ê½s¬y¤ô¸¹°ÝÃD

¦^´_ 10# joviwang


    ÁÂÁ , ¥i¥H¦A°Ý¤@¤U¶Ü?
    ¦pªG§Ú·Q§â³]©wªº­¶¼Æ¼g¦bB1Äæ¤Wªº¸Ü­n«ç»ò³]©w
Simon

TOP

cells(1,2)´N¬OB1
cells(2,3)§A²q¬O­þ¤@®æ¡H«¢¡AÀH°ó¦Ò¸Õ¡C

Âà¶K­Ó½d¨Ò¡G¨Ó¦Û©óVBAªº»¡©ú

¦¹½d¨Ò¦b Sheet1 ¤WªºÀx¦s®æ A1:J4 ¤¤¶i¦æ°j°é¡C¦pªG¨ä¤¤¦³¤@­ÓÀx¦s®æªº­È¤p©ó 0.001¡A¥»½d¨Ò´N±N¸Ó­È¨ú¥N¬° 0 (¹s)¡C


For rwIndex = 1 to 4
    For colIndex = 1 to 10
        With Worksheets("Sheet1").Cells(rwIndex, colIndex)
            If .Value < .001 Then .Value = 0
        End With
    Next colIndex
Next rwIndex

ps. cells(4,10)´N¬OJ4Àx¦s®æ¡C
joviwang

TOP

cells(2,3)´N¬OC2Äæ¦ì
¾Ç¨ì¤F,¤]¸Ñ¨M¤F§Úªº°ÝÃD
ÁÂÁÂjoviwang¤j¤j
Simon

TOP

        ÀR«ä¦Û¦b : ¹D¼w¬O´£ª@¦Û§Úªº©ú¿O¡A¤£¸Ó¬O¨þ¥¸§O¤HªºÃ@¤l¡C
ªð¦^¦Cªí ¤W¤@¥DÃD