Reflection Desktop VBA Guide
Attachmate.Reflection.Objects.Emulation.IbmHosts Library / Attachmate.Reflection.Objects.Emulation.IbmHosts Library / IbmScreen Object / CopyAppend Method
Example
In This Topic
    CopyAppend Method (IbmScreen)
    In This Topic
    Appends selected text to the end of the Clipboard.
    Syntax
    expression.CopyAppend()
    where expression is a variable that represents a IbmScreen Object
    Example
    This sample selects an area on the screen and copies it to the clipboard. Then it selects another area and appends it to the copied area. You can test this sample by pasting the contents into a text editor. 
    Sub CopyAndAppendScreenTextToClipboard()
 
    'Select the area to copy
    ThisIbmScreen.SetSelectionStartPos 8, 9
    
    ThisIbmScreen.ExtendSelectionRect 9, 71
    
    ThisIbmScreen.Copy
    
    'Select another area to append to the copied area
    
    ThisIbmScreen.SetSelectionStartPos 13, 9
    
    ThisIbmScreen.ExtendSelectionRect 14, 71
    
    ThisIbmScreen.CopyAppend
            
 
End Sub
    See Also

    Reference

    IbmScreen Object
    IbmScreen Members

    Send Feedback