Медленный перебор клеток - как ускорить?

sels[0].rows[i].cells.everyItem().appliedCellStyle = odd ?  styleOdd : styleEven;

{
        var row = sels[0].rows[i];
        if (!odd){
        row.cells.everyItem().appliedCellStyle =  styleEven;
        row.cells.everyItem().clearCellStyleOverrides (true);}
        odd = 1 - odd;
    }

var timeStart = new Date().getTime();


var sels = app.selection;
var styleOdd = "Белый";            // стиль нечетного ряда - 1, 3, 5, ...
var styleEven = "Серый";           // стиль четного ряда - 2, 4, 6, ...

// выделено ли то, что надо?
if (!sels.length || sels[0].constructor.name != "Cell") {
    alert ("Необходимо выделить ячейки таблицы");
    exit();
}
// выключим перерисовку окна во время выполнения скрипта 
var enableRedraw = app.scriptPreferences.enableRedraw;
app.scriptPreferences.enableRedraw = false;
var rows = sels[0].rows;

// назначим ячйкам стиль
for (var i = rows.length; i--;) {
    rows[i].cells.everyItem().appliedCellStyle = 
    	i % 2 ? styleEven : styleOdd;
}
// сбросим переопределения ячеечного стиля
sels[0].cells.everyItem().clearCellStyleOverrides(true);
app.scriptPreferences.enableRedraw = enableRedraw;


alert((new Date().getTime() - timeStart) / 1000 + 'c');

styleEven = app.activeDocument.cellStyles.itemByName(styleEven);
styleOdd = app.activeDocument.cellStyles.itemByName(styleOdd);

var 
	timer1 = 0,
	timer2 = 0,
	startTime;

// вызов по цепочке
startTime = new Date();

for (var i = 9999; i--;) {
	var label = app.activeDocument.paragraphStyles.item(0).fillColor.label;
}
timer1 += new Date().getTime() - startTime.getTime();

// вызов по ссылке
var link = app.activeDocument.paragraphStyles.item(0).fillColor;
startTime = new Date();

for (var i = 9999; i--;) {
	var label = link.label;
}
timer2 += new Date().getTime() - startTime.getTime();

alert('Вызов по ссылке быстрее в ' + Math.round(timer1/timer2) + ' раз');

IDocument *theDoc = ac->GetContextDocument();
	
	long long start1 = rdtsc();
	
	for(int i = 999999; --i;)
	{
		InterfacePtr<IStyleGroupManager> pIStyleGroupManager(theDoc->GetDocWorkSpace(), IID_IPARASTYLEGROUPMANAGER);
		IStyleGroupHierarchy *rootHierarchy = pIStyleGroupManager->GetRootHierarchy();
		InterfacePtr<IStyleGroupHierarchy> firstChild(rootHierarchy->QueryChild(0));
		InterfacePtr<IStyleInfo> styleInfo(firstChild, UseDefaultIID());
		styleInfo->GetName();
	}
	long long end1 = rdtsc();
	

	InterfacePtr<IStyleGroupManager> pIStyleGroupManager(theDoc->GetDocWorkSpace(), IID_IPARASTYLEGROUPMANAGER);
	IStyleGroupHierarchy *rootHierarchy = pIStyleGroupManager->GetRootHierarchy();
	InterfacePtr<IStyleGroupHierarchy> firstChild(rootHierarchy->QueryChild(0));
	InterfacePtr<IStyleInfo> styleInfo(firstChild, UseDefaultIID());

	long long start2 = rdtsc();
	
	for(int i = 999999; --i;)
	{
		styleInfo->GetName();
	}
	long long end2 = rdtsc();
	
	
	long long time1 = end1 - start1;
	long long time2 = end2 - start2;
	
	PMString number;
	number.AsNumber(time1/time2);

	CAlert::InformationAlert(number);