Sub Makro4()
SendKeys "%{TAB}" wechselt in die Anwendung "Lizenzierung"
For i = 103000000 To 999999999
SendKeys i & "-ABC4" gibt in das Linzenzfeld (vorher mit Maus aktiviert) die Lizenznummer ein
SendKeys "{TAB}" sprigt über die Felder NAME
SendKeys "{TAB}" und FIRMA
SendKeys "{TAB}" auf FREISCHALTEN
SendKeys " ", True sendet ein SPACE (Return geht nicht)
SendKeys " ", True Fehlermeldung "Lizenz stimmt nicht" wird bestätigt
Next i und wieder von vorne....
End Sub
So, das ganze klappt super! es ist nur zu langsam, da "nur" ca. 100 Nummer in einer Sekunde geschafft werden. Die Lösung liegt zwischen 103000000-ABC4 und 399999999-ABC4. Man hat 30 Tage zeit.....??? Jemand ne Lösung/Idee ???