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

[µo°Ý] ¨Ì¤é´Á»Ý¨D½Æ»s½d³ò¤½¦¡°ÝÃD

¤£ª¾¹D³o¼Ë¼g¦³¨S¦³²Å¦X§Aªº»Ý¨D
  1. Sub ¶K¤½¦¡()
  2. Range("FA4:FH72").Formula = Range("ES4:EZ72").Formula
  3. End Sub

  4. Sub ¶K¤W­È()

  5. With Range("ES4:EZ72")
  6.     .Select
  7.     .Copy
  8.     Selection.PasteSpecial Paste:=xlPasteValues
  9. End With
  10. Application.CutCopyMode = False
  11. End Sub
½Æ»s¥N½X
§Æ±æ¦³À°§U¨ì§A
Excel VBAºô­¶¸ê®Æ¦¬¶°±Ð¾Ç:
http://forum.twbts.com/thread-20848-1-1.html

TOP

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