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

[µo°Ý] ¦p¦óÁôÂäu§@ªíData¥H¥~ªº©Ò¦³¤u§@ªí?¦p¦óÅã¥Ü©Ò¦³¤u§@ªí?

¦^´_ 1# av8d
  1. Sub xx()
  2.   For Each Sh In Sheets                     'ÁôÂéҦ³Sheet(°£Data¥~)
  3.     If Sh.Name <> "Data" Then Sh.Visible = False Else Sh.Visible=True
  4.   Next
  5. End Sub
½Æ»s¥N½X
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

        ÀR«ä¦Û¦b : ¯u¥¿ªº·R¤ß¡A¬O·ÓÅU¦n¦Û¤vªº³oÁû¤ß¡C
ªð¦^¦Cªí ¤W¤@¥DÃD