помощь новичку

Весь MS Office, программирование на Visual Basic for Applications и MS VB

Модератор: Naeel Maqsudov

Ответить
ny3blpb
Сообщения: 2
Зарегистрирован: 22 янв 2010, 17:21

Написал макрос в экселе. но для оптимизации его работы необходимо выполнить проверку на нулевое значение ячейки при использовании простейшего цикла. вот кусочек проги
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
Наверняка это просто, но я совсем новичек. Спасибо.
ny3blpb
Сообщения: 2
Зарегистрирован: 22 янв 2010, 17:21

спасибо за оперативность... :) разобрался.
Ответить