CRM 4.0 Changing Tab Order

A while back i posted a solution for changing vertical tabbing to horizontal tabbing. The code ran a bit slow with lookups and so the code below is a revision of the previous posting with the fix.

function OnCrmPageLoad()
{
     ReArangeTabIndex();
}

function ReArangeTabIndex()
{
    for( var i = 0 ; i < crmForm.all.length ; i++ )
    {
        var element = crmForm.all[ i ];
        if (element.tabIndex)
        {
            if (element.className == "ms-crm-Hidden-NoBehavior" || element.tagName == "A")
            {
                continue;
            }
   
            element.tabIndex = 1000 + (i*10);
        }
    }
}

OnCrmPageLoad();