Jump to content

Recommended Posts

Спойлер

 





 
#include <Date.au3>
#include <GUIConstants.au3>
#include <ExcelCOM_UDF.au3>


Глобальная $Paused

HotKeySet("{ESC}", "Завершить")

Func Terminate()
Exit 0
EndFunc

$oExcel = ObjGet("C:\Users\tvois\Desktop\Start\Start.xlsx\", "Excel.Application") ; "с захватом" Существующий объект Excel
;$oExcelDoc.Windows(1).Visible = 1 ; Устанавливает первый лист в видимой книге

For $i= 1 To 120 ;пробег по солбцу
$sReadCell = _ExcelReadCell($oExcel, "A" & $i)

если ProcessExists("chrome.exe") > 0, то
    MsgBox(0,"Chrome","esiste")
    Opt("WinTitleMatchMode", -2)
    WinActivate("Google Chrome")
    Opt("WinTitleMatchMode", 1)
Else
    MsgBox (0,"Chrome","не существует")
endif

Opt("MouseCoordMode",0)
MouseClick("влево", 115, 347)
MouseClick("влево", 83, 376)
MouseClick("влево", 242, 148)

Send("{Delete 8}") ;сперва стереть то что было
Send($sReadCell,1) ;вставить прочтенное из эксель
Opt("MouseCoordMode",0)
MouseClick("left" ,1334, 713) ; установка

;Sleep(50)
Do
Sleep(10) ;ждать пока курсор нестанет стрелкой until
MouseGetCursor( ) = 2
_ExcelWriteCell($oExcel, "1", "B"&$i) ;отметить в экселе что ячейка прочтена и обработана


Следующий

 

 

Edited by vetold
Link to post
Share on other sites
  • Developers

It will help when you also explain what it is you want. ... A d use a code bix for your script as define in post code

SciTE4AutoIt3 Full installer Download page   - Beta files       Read before posting     How to post scriptsource   Forum etiquette  Forum Rules 
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Link to post
Share on other sites
2 hours ago, Jos said:

Это поможет, когда вы также объясните, чего вы хотите. ... И використовуйте код bix для вашего скрипта, как указано в почтовом индексе

no connection with excel and google chrome

 

$sReadCell  =  _ ExcelReadCell ( $oExcel ,  "A"  &  $i )  undefined function
Edited by vetold
Link to post
Share on other sites
  • Developers

No idea what this is all about, so please only post English texts! 

Next foreign language post will simply be removed.

SciTE4AutoIt3 Full installer Download page   - Beta files       Read before posting     How to post scriptsource   Forum etiquette  Forum Rules 
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Link to post
Share on other sites

Hi @vetold.

From your last message, at least one of your problems is that you're trying to use _ExcelReadCell?

That function has been renamed.

It is mentioned here, but no direct link is given in the thread.

Here is a page showing script breaking changes for the Excel UDF.

It shows _ExcelReadCell has been replaced with _Excel_RangeRead, for specefic sheet selection.

Link to post
Share on other sites
3 hours ago, genius257 said:

Привет@ветолд.

Судя по вашему последнему сообщению, по крайней мере одна из ваших проблем заключается в том, что вы пытаетесь использовать _ExcelReadCell ?

Эта функция была переименована.

Это упоминается здесь , но прямой ссылки в теме нет.

Вот страница, показывающая критические изменения сценария для пользовательской функции Excel.

Он показывает , что _ExcelReadCell был заменен на _Excel_RangeRead для выбора конкретного листа.

Thank you very much for answering my question, it will move in that direction
Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...