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

[µo°Ý] ½Ð°Ý¤£¦P¤u§@ªíªºÅܼƦp¦ó³]¡H

... ³oºØ¸ó¤u§@ªíÅܼƪº»yªk­n«ç»ò¼g ...
skyutm µoªí©ó 2012-8-22 22:43


Àx¦s®æªº¤Þ¥Î¥i¥H¥Î¦n´XºØ¤è¦¡,
©³¤UÁ|´X­Ó¤ñ¸û²³æ©ö¥Îªº:
1. Sheet¦WºÙ.[Àx¦s®æ]
¨Ò :  Sheet1.[c2] = 120 '¥[Åv¤ñ¨Ò
     Sheet2.[c3] = 86 '°ê»y¦¨ÁZ¿é¤JÄæ
     Sheet3.[c5] = Sheet2.[c3] '¦¨ÁZ³æ°ê»yÄæ

2. Sheets("¤u§@ªí¦WºÙ").Cells(Àx¦s®æ¦C§Ç, Àx¦s®æÄæ§Ç)
  Sheets("Sheet1").Cells(2, 3) = 120 '¥[Åv¤ñ¨Ò
  Sheets("Sheet2").Cells(3, 3) = 86 '°ê»y¦¨ÁZ¿é¤JÄæ
  Sheets("Sheet3").Cells(5, 3) = Sheets("Sheet2").Cells(3, 3) '¦¨ÁZ³æ°ê»yÄæ

3. ³]©w Sheet «ü¼Ð, µM«á¥H«ü¼Ð¥N´À Sheet ¦WºÙ¨Ó¤Þ¥Î
  Dim sh1 As Sheet1, sh2 As Sheet2, sh3 As Sheet3
  
  Set sh1 = Sheet1
  Set sh2 = Sheet2
  Set sh3 = Sheet3
  
  sh1.Range("c2") = 120  '¥[Åv¤ñ¨Ò
  sh2.Range("C3") = 86  '°ê»y¦¨ÁZ¿é¤JÄæ
  sh3.Range("C5") = sh2.Range("c3")   '¦¨ÁZ³æ°ê»yÄæ

¤W­z¤è¦¡¤¤, Sheet ¤Þ¥Î¤è¦¡»P Àx¦s®æ ¤Þ¥Î¤è¦¡³£¥i¥H¤¬¬Û¥N´«,
¨Ò¦p§A¥i¥H¥Î
Sheet1.Cells(2, 3) = 120 '¥[Åv¤ñ¨Ò

³o¸Ì­n²¤·L´£¤@¤U Office »¡©ú¤¤¤£¤Íµ½ªº¦a¤è, (§Ú¥Îªº¬O 2003 ª©)
­Y§Ú­Ì¥Î ¤u§@ªí ©Î Àx¦s®æ ¨Ó·j´M¬ÛÃöªº¨Ï¥Î¤è¦¡,
·|µo²{§ä¤£¨ì·Q­nªº»¡©ú,
¦Ó­n¥Î Range ©Î Sheets ¤~¯à (­Y¥Î Sheet ¤]¤£¯à) §ä¨ì ¨Ï¥Î Range ª«¥ó°Ñ·ÓÀx¦s®æ ©Î ¨Ï¥Î¦WºÙ°Ñ·Ó¤u§@ªí ¤§Ãþªº»¡©ú,
§Ú­è¾Ç²ß Excel VBA ®É©¹©¹®ö¶O«Ü¦h®É¶¡¦b§ä·Q­n¬Ýªº»¡©ú»P½d¨Ò,
¦³®ÉÁÙ¯uªºº¡®e©öÅý¤H¬ª®ðªº.

TOP

        ÀR«ä¦Û¦b : ¦³®É·í«äµL®É­W¡A¦n¤Ñ­n¿n«B¨Ó³¡C
ªð¦^¦Cªí ¤W¤@¥DÃD