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

[µo°Ý] ¥u¶K¤W¥i¨£Àx¦s®æ??

­n¥[»²§U¦C,³Ì¦n¥ÎVBA¨Ó¸Ñ,¥i¥H¤W¶ÇÀÉ®×¶Ü ? ¬ÝÀÉ®×­n¥Î¬Æ»ò¤èªk¥i¥H¸Ñ
ª½±µ¶K³£¨S¿ìªkªº.
300 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X

TOP

½Ð´ú¸Õ
Sub zZ5151353()
Dim c As Range
  For Each c In Range("G5:G22").SpecialCells(12)
    c.Value = "888"
  Next
End Sub
300 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X

TOP

        ÀR«ä¦Û¦b : ¤H¥Í¤£¤@©w²y²y¬O¦n²y¡A¦ý¬O¦³¾ú½mªº±j¥´ªÌ¡AÀH®É³£¥i¥H´§´Î¡C
ªð¦^¦Cªí ¤W¤@¥DÃD