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

½Ð±Ð¤@­Ósheets³æ­Ó¥[±Kªº°ÝÃD, ·Ð½Ð¤j¤j½ç±Ð

¦^´_ 7# joychiangg
¤W¶Ç§AªºÀɮ׬ݬÝ

TOP

¥»©«³Ì«á¥Ñ GBKEE ©ó 2011-12-23 18:30 ½s¿è

¦^´_ 10# joychiangg
¥[¤JThisWorkbook ªº¹w³]¨Æ¥ó
  1. Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
  2.     If Sh.Name <> "Sheet1" Then
  3.         Sh.Cells.Interior.ColorIndex = 2
  4.         Sh.Cells.Font.ColorIndex = 2
  5.     End If
  6. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ¤H¥Í³Ì¤jªº¦¨´N¬O±q¥¢±Ñ¤¤¯¸°_¨Ó¡C
ªð¦^¦Cªí ¤W¤@¥DÃD