How Cut/Copy text from Excel and past to other software one by one ?

[naru]

Hi All,
I have excel file like this
and i want to cut cell/text from excel to other software.

 

I have to cut the cell of B column one by one and past into other software
If Winexists("No Data Found")
then restore cuted cell and goto next/down side cell
How to do it ?

[water]

Have you tried _Excel_RangeCopyPaste?

[naru]

13 hours ago, water said:

Have you tried _Excel_RangeCopyPaste?

@water
I don't know how to use _Excel_RangeCopyPaste

[water]

That's what the examples in the help file are for. Example 3 explains how to copy to the clipboard.

[naru]

5 minutes ago, water said:

That's what the examples in the help file are for. Example 3 explains how to copy to the clipboard.

@water
where is my excel file path in example 3 ?
 

#include <Excel.au3>
#include <MsgBoxConstants.au3>

; Create application object and open an example workbook
Local $oExcel = _Excel_Open()
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeCopy Example", "Error creating the Excel application object." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
; Open Workbook 1
Local $oWorkbook1 = _Excel_BookOpen($oExcel, @ScriptDir & "\Extras\_Excel1.xls")
If @error Then
    MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeCopy Example", "Error opening workbook '" & @ScriptDir & "\Extras\_Excel1.xls'." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
    _Excel_Close($oExcel)
    Exit
EndIf

; *****************************************************************************
; Copy 2 rows (1 and 2) from worksheet 2 to the clipboard
; *****************************************************************************
_Excel_RangeCopyPaste($oWorkbook1.Worksheets(2), "1:2")
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeCopy Example 3", "Error copying rows." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeCopy Example 3", "Rows 1+2 successfully copied from worksheet 2 to the clipboard.")

; *****************************************************************************
; Paste the range written by Example 3 from the clipboard to the active worksheet.
; Only values without formatting will be pasted.
; *****************************************************************************
_Excel_RangeCopyPaste($oWorkbook1.Activesheet, Default, "1:1", Default, $xlPasteValues)
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeCopy Example 4", "Error copying rows." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeCopy Example 4", "2 Rows successfully pasted from the clipboard to row 1.")

 

Edited July 31, 2017 by Nareshm

[water]

What do you think are the comments for? Where does the workbook get opened in the example?