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

¦p¦ó§R°£©Ò¦³³sµ²

¦p¦ó§R°£©Ò¦³³sµ²

¦bEXCEL »¡©ú¤¤§ä¨ì§R°£Àɮפ¤²Ä¤@­Ó³sµ²
¦ý¦p¦ó¥i¥H¤@¦¸§R°£©Ò¦³³sµ²,
¦Ó·íÀɮפ¤¨S¦³³sµ²®É¦Ó¤£·|¥X²{¿ù»~°T®§
   
Sub UseBreakLink()

    Dim astrLinks As Variant

    ' Define variable as an Excel link type.
    astrLinks = ActiveWorkbook.LinkSources(Type:=xlLinkTypeExcelLinks)

    ' Break the first link in the active workbook.
    ActiveWorkbook.BreakLink _
        Name:=astrLinks(1), _
        Type:=xlLinkTypeExcelLinks

End Sub

        ÀR«ä¦Û¦b : «H¤ß¡B¼Ý¤O¡B«i®ð¤TªÌ¨ã³Æ¡A«h¤Ñ¤U¨S¦³°µ¤£¦¨ªº¨Æ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD