I am trying to loop a routine using SENDKEYS that performs a function 2
times, then 4 times, then 6 times (all previous + 2 essentially). The below
code runs through the whole routine 70 times which I want to keep, but I
would like the:
SendKeys "{TAB}", False
command to essentially send TAB twice, then 4x, then 6x, etc, all +2 based
on the previous number. If anyone could help, I would greatly appreciate it.

<------ full code below --------

Public Sub FIXED()

Application.Wait (Now + TimeValue("0:00:05"))
Dim i As Integer

For i = 1 To 70

SendKeys "{TAB}", False
'Application.Wait (Now + TimeValue("0:00:01"))



SendKeys "{ENTER}", False
'Application.Wait (Now + TimeValue("0:00:01"))
SendKeys "^%{a}", False
Application.Wait (Now + TimeValue("0:00:01"))
SendKeys "%{a}", False
Application.Wait (Now + TimeValue("0:00:01"))
SendKeys "%{g}", False
Application.Wait (Now + TimeValue("0:00:01"))
SendKeys "%{INSERT}", False
Application.Wait (Now + TimeValue("0:00:01"))

Next

End Sub