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

[µo°Ý] Excel VBA ³]©w¦C°ª°ÝÃD

[µo°Ý] Excel VBA ³]©w¦C°ª°ÝÃD

¦U¦ìª©¤j¦n¡A¤p§Ì¤£¤~¡A·Q±N«ü©w­¶­±©Ò¦³¦C°ª³£³]©w¤@¼Ë¡A¹ê¦b®É¤£¤ÓÀ´¬°¤°»ò¤£¯à°õ¦æ¡AÁÂÁ¦U¦ìª©¤j
  1. Sub ºô­¶°lÂÜ_´_­ì¿z¿ï()
  2. With Worksheets("ºô­¶°lÂÜ").Rows("1.50000")
  3.       .RowHeight = 22
  4. End With
  5. End Sub
½Æ»s¥N½X

¦^´_ 2# rouber590324


    ÁÂÁ¤G¦ìª©¤j¡A­ì¨Ó¬O§Ú²¨©¿¤F¡AÁÂÁÂ

TOP

        ÀR«ä¦Û¦b : ­n§åµû§O¤H®É¡A¥ý·Q·Q¦Û¤v¬O§_§¹¬üµL¯Ê¡C
ªð¦^¦Cªí ¤W¤@¥DÃD