2009 May 23 - Automation Beyond

Mapping Excel col names (QTP, VBScript)

Posted by Albert Gareev on May 23, 2009

Original date: 5 Dec 2008, 1:23pm Parent page: Service Functions – Excel (QTP, VBScript) 'Assumptions: 'Excel file exists 'Workbook is open (XLBook) 'Sheet exists Set objUsedRange = XLBook.Worksheets(sSheetIndex).UsedRange() Set objSheetColNameMap = CreateObject("Scripting.Dictionary") For Iter = 1 To objUsedRange.Columns.Count sCellText = objUsedRange.Cells(1,Iter) If sCellText <> "" Then ...

Posts Calendar

May 2009
Mon	Tue	Wed	Thu	Fri	Sat	Sun
« Jan		Jun »
	1	2	3
4	5	6	7	8	9	10
11	12	13	14	15	16	17
18	19	20	21	22	23	24
25	26	27	28	29	30	31

Flag Counter 2011

	14606 (30 %)	24936 (29 %)
	11818 (24 %)	22857 (27 %)
	3454 (7 %)	5710 (7 %)
	2576 (5 %)	6303 (7 %)
	1292 (3 %)	2152 (3 %)
	1282 (3 %)	2190 (3 %)
	901 (2 %)	1429 (2 %)
	842 (2 %)	1554 (2 %)
	832 (2 %)	1151 (1 %)
	826 (2 %)	1260 (1 %)
	474 (1 %)	771 (1 %)
	452 (1 %)	641 (1 %)
	445 (1 %)	655 (1 %)
	415 (1 %)	694 (1 %)
	406 (1 %)	696 (1 %)
	402 (1 %)	654 (1 %)
	362 (1 %)	562 (1 %)
	355 (1 %)	672 (1 %)
	330 (1 %)	494 (1 %)
	315 (1 %)	535 (1 %)
	312 (1 %)	463 (1 %)
	288 (1 %)	476 (1 %)
	273 (1 %)	493 (1 %)
	245 (1 %)	407 (0 %)
	231 (0 %)	336 (0 %)