consegui este codigo en la web, pero no logro que reemplace las palabras, gracias por su ayuda!
Code: Select all
SendMode, Input
; -- Win + p -> Select all text + replace whole word only
#p::
Search := "Z-0.000500"
Replace := "100"
Gosub, CheckKeysPressed
Send, ^a
Gosub, SelectToClip
Clipboard := RegExReplace(Clipboard, "i)\b" Search "\b", Replace)
Send, ^v
Return
SelectToClip:
Clipboard := ""
Send, ^c
ClipWait, 0
If ErrorLevel
Exit
Sleep, 50
Return
CheckKeysPressed:
While GetKeyState("Ctrl","P") || GetKeyState("LWin","P") || GetKeyState("RWin","P") || GetKeyState("Shift","P") || GetKeyState("Alt","P")
Sleep, 25
Return