помощь новичку
Добавлено: 22 янв 2010, 17:32
Написал макрос в экселе. но для оптимизации его работы необходимо выполнить проверку на нулевое значение ячейки при использовании простейшего цикла. вот кусочек проги
Наверняка это просто, но я совсем новичек. Спасибо.For i = 3 To 40
myStrin1 = Worksheets(2).Cells(2, 1).Value
myStrin2 = Worksheets(2).Cells(2, i).Value
myStrin1 = Trim(myStrin1)
myStrin2 = Trim(myStrin2)
z1 = "ADD CELL2GNC: IDXTYPE=BYNAME, SRCCELLNAME=""CI-"
z2 = """, NBRCELLNAME=""CI-"
z3 = """;"
f = FreeFile
Open "g:\create_int_neib.txt" For Append As #f
Print #f, z1; myStrin1; z2; myStrin2; z3
Close #f
Next