Set Statement

āĻāĻ•āĻŸāĻŋ āĻ­ā§‡āĻ°āĻŋā§Ÿā§‡āĻŦāĻ˛ āĻ…āĻĨāĻŦāĻž āĻŦā§ˆāĻļāĻŋāĻˇā§āĻŸā§āĻ¯ā§‡ āĻŦāĻ¸ā§āĻ¤ā§āĻ° āĻ°ā§‡āĻĢāĻžāĻ°ā§‡āĻ¨ā§āĻ¸ āĻ¨āĻŋāĻ°ā§āĻ§āĻžāĻ°āĻŖ āĻ•āĻ°āĻž āĻšā§ŸāĨ¤

āĻ¸āĻŋāĻ¨āĻŸā§āĻ¯āĻžāĻ•ā§āĻ¸:


Set ObjectVar = Object

āĻĒā§āĻ¯āĻžāĻ°āĻžāĻŽāĻŋāĻŸāĻžāĻ°:

ObjectVar: āĻ­ā§‡āĻ°āĻŋā§Ÿā§‡āĻŦāĻ˛ āĻ…āĻĨāĻŦāĻž āĻŦā§ˆāĻļāĻŋāĻˇā§āĻŸā§āĻ¯ āĻ¯āĻžāĻ° āĻŦāĻ¸ā§āĻ¤ā§āĻ° āĻ°ā§‡āĻĢāĻžāĻ°ā§‡āĻ¨ā§āĻ¸ āĻĒā§āĻ°ā§Ÿā§‹āĻœāĻ¨āĨ¤

āĻ…āĻŦāĻœā§‡āĻ•ā§āĻŸ: āĻ­ā§‡āĻ°āĻŋā§Ÿā§‡āĻŦāĻ˛ āĻ…āĻĨāĻŦāĻž āĻŦā§ˆāĻļāĻŋāĻˇā§āĻŸā§āĻ¯ āĻĻā§āĻŦāĻžāĻ°āĻž āĻ¨āĻŋāĻ°ā§āĻĻā§‡āĻļāĻŋāĻ¤ āĻŦāĻ¸ā§āĻ¤ā§āĨ¤

āĻ•āĻŋāĻ›ā§āĻ‡ āĻ¨āĻž - āĻĒā§‚āĻ°ā§āĻŦā§‡ āĻ§āĻžāĻ°ā§āĻ¯āĻ•ā§ƒāĻ¤ āĻ•āĻžāĻœ āĻ…āĻĒāĻ¸āĻžāĻ°āĻŖ āĻ•āĻ°āĻžāĻ° āĻœāĻ¨ā§āĻ¯ āĻ­ā§‡āĻ°āĻŋā§Ÿā§‡āĻŦāĻ˛ā§‡ āĻ•āĻŋāĻ›ā§āĻ‡ āĻ¨āĻž āĻŦāĻ¸ā§āĻ¤ā§āĻŸāĻŋ āĻĒā§āĻ°ā§Ÿā§‹āĻ— āĻ•āĻ°āĻž āĻšāĻŦā§‡āĨ¤

āĻ‰āĻĻāĻžāĻšāĻ°āĻŖ:


Sub ExampleSet
Dim oDoc As Object
    Set oDoc = ActiveWindow
    Print oDoc.Name
End Sub

Please support us!