Documentación para programar AHK en Excel

Post a reply


In an effort to prevent automatic submissions, we require that you complete the following challenge.
Smilies
:D :) ;) :( :o :shock: :? 8-) :lol: :x :P :oops: :cry: :evil: :twisted: :roll: :!: :?: :idea: :| :mrgreen: :geek: :ugeek: :arrow: :angel: :clap: :crazy: :eh: :lolno: :problem: :shh: :shifty: :sick: :silent: :think: :thumbup: :thumbdown: :salute: :wave: :wtf: :yawn: :facepalm: :bravo: :dance: :beard: :morebeard: :xmas: :HeHe: :trollface: :cookie: :rainbow: :monkeysee: :monkeysay: :happybday: :headwall: :offtopic: :superhappy: :terms: :beer:
View more smilies

BBCode is ON
[img] is OFF
[flash] is OFF
[url] is ON
Smilies are ON

Topic review
   

Expand view Topic review: Documentación para programar AHK en Excel

Re: Documentación para programar AHK en Excel

Post by Archa » 16 Jun 2021, 06:47

Ok, al parecer las instrucciones que se usan para Excel con AHK no es sintaxis de AHK sino una variante de Visual Basic de Microsoft y AHK las acepta. No sé el motivo, si alguien sabe porque puede incluirse instrucciones de otro lenguaje, le agradecería mucho la info.
Tenéis la documentación aquí: https://docs.microsoft.com/es-es/office/vba/api/excel.range(object)

Esta función si funciona correctamente:

Code: Select all

Numpad1::
Funcion(10, 3)
return

Funcion(x, y) 
{
numero := 56

Ex := ComObjCreate("Excel.Application")
Ex.Visible := 1
Ex.Workbooks.Open("C:\Users\Desktop\Documento.xlsx")

Ex := ComObjActive("Excel.Application")
Ex.cells(x,y).Value := numero

return
}

Documentación para programar AHK en Excel

Post by Archa » 14 Jun 2021, 08:27

Hola, quería preguntar 2 cosas.
1: Alguien me puede pasar un enlace con documentación para programar AHK en Excel? He estado buscando y sólo he encontrado fragmentos de código sueltos.
2: ¿Por qué no me funciona esta función?

Code: Select all

Numpad1::
Funcion("C10", "D10")
return

Funcion(celda1, celda2) 
{
numero := 56

Ex := ComObjCreate("Excel.Application")
Ex.Visible := 1
Ex.Workbooks.Open("C:\Users\Desktop\Documento.xlsx")

Ex := ComObjActive("Excel.Application")
Ex.Range("%celda1%").Value := numero	;debería escribir 56 en la celda C10
Ex.Range("%celda2%").Value := numero
return
}
[Mod edit: [code][/code] tags added.]

Un saludo.

Top