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

[µo°Ý] ¦p¦ó¦b­ì¥»¤u§@¶}±Ò·sªº½d¥»

¦^´_ 1# a31075ha
°µ¦n¤@­Ó³Ì·s½d¥»ªºªÅ¥ÕÀÉ,¤£¥ÎVBA


·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¦^´_ 4# a31075ha
§Aªº¤£¬O2003ª©

·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¦^´_ 6# a31075ha
¦pªG±N­ì¥»­n¶}ªº¨º­Ósheet§R±¼¦b­«¶} ¨ä¥L5­Ósheet ¦³¤½¦¡³sµ²¨ì¸Ósheetªº¤½¦¡³£·|Åܦ¨REF
  1. Option Explicit
  2. Sub EX()
  3.     Dim Sh As Worksheet
  4.     For Each Sh In Sheets
  5.         With Sh.UsedRange
  6.             .Value = .Value  '¤½¦¡Âন¤½¦¡ªº­È
  7.         End With
  8.     Next
  9. End Sub
½Æ»s¥N½X
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

        ÀR«ä¦Û¦b : ¡i®É¤é²öªÅ¹L¡j¤@­Ó¤H¦b¥@¶¡°µ¤F¦h¤Ö¨Æ¡A´Nµ¥©ó¹Ø©R¦³¦hªø¡C¦]¦¹¥²¶·»P®É¶¡Ävª§¡A¤Á²ö¨Ï®É¤éªÅ¹L¡C
ªð¦^¦Cªí ¤W¤@¥DÃD