Simple variables question

[Duff360]

Hello,

I would like to create a small script

I want something like this:

Local $a = "USA"
Local $b = "Canada"
Local $c  = "Japan"

WinActivate ("Microsoft Excel - Blablaxlsx")
MouseClick ("left", 525, 400, 2)
SEND($a)

WinActivate ("Microsoft Excel - Blablaxlsx")
MouseClick ("left", 525, 420, 2)
SEND($b)

WinActivate ("Microsoft Excel - Blablaxlsx")
MouseClick ("left", 525, 440, 2)
SEND($c)

I already created something for the MouseClick but I'm not able with the text to insert.

Thank you!

[Danyfirex]

Use Excel UDF. 

Saludos

[aa2zz6]

Water wrote a sample piece of script that might help you out. It's 3/4 of the way down.

 

 

 

[TheSaint]

To do it your way, without the UDF, would have required a double click I think, which you are doing, but clearly something is not right.

Is an insert cursor showing up at that point?

If so, then you may also need to follow up with sending an ENTER.

Using the UDF though, is a much better way to do it all.

 

[kylomas]

Duff360,

Directly from the Help file using your values...

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

; Create application object and create a new workbook
Local $oExcel = _Excel_Open()
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeWrite Example", "Error creating the Excel application object." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
Local $oWorkbook = _Excel_BookNew($oExcel)
If @error Then
    MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeWrite Example", "Error creating the new workbook." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
    _Excel_Close($oExcel)
    Exit
EndIf

; *****************************************************************************
; Write a 1D array to the active sheet in the active workbook
; *****************************************************************************
Local $aArray1D[3] = ["USA", "Canada", "Japan"]
_Excel_RangeWrite($oWorkbook, $oWorkbook.Activesheet, $aArray1D, "D3")
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeWrite Example 2", "Error writing to worksheet." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeWrite Example 2", "1D array successfully written.")

kylomas

edit:  If you want to change an existing workbook then change the _Excel_BookNew UDF to _Excel_BookOpen.  You can also navigate between sheets.  It's all in the Help file...

Edited January 19, 2016 by kylomas
additional info