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

[µo°Ý] ¦p¦ó±N¸ê®Æ«ö«ü©w¦WºÙ¤ÀÃþ½Æ¨î¨ì¦Uªí®æ

¦^´_ 4# gstone
Cells ²¤Æ±¼¤F
  1. Sub EX()
  2. Dim A
  3. Set A = Range("B10")
  4. MsgBox A.Cells(1, 1).Address
  5. MsgBox A.Cells(2, 1).Address
  6. MsgBox A.Cells(1, 2).Address
  7. MsgBox A.Cells(2, 2).Address
  8. End Sub
½Æ»s¥N½X

TOP

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