Вопрос : VBA routien - просто помощь Кодего

Hi,

I имеет VBA routien которое идет номер thourgh «x» колонок для номера «x» рядков. Кодий
The по мере того как below.
I хотят проверку если все колонки в рядке пусты отдельно от первой колонки. если (поистине) чем пролом из loop
Can любое одно пожалуйста говорит мне самое лучшее/, то очищает дорогу откорректировать Кодего для того чтобы мочь достигнуть того?

I знает я себя может сделать его но не может быть самой чистой дорогой:
/


Thanks много class= " ясное " >

> " codeSnippet " class=

class= " lineNumbers "

class=

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: 32: 33:

>i = sLineStart " class= " id= " codeSnippet940753 0 sColumnTitle = sColumnTitle & «`» & клетки (I, j) & «`,» j = j + 1 Петля sColumnTitle = средний (sColumnTitle, 1, Len (sColumnTitle) - 1) iNumColumn = j iий = I + 1 j = ColRef2ColNum (sColStart) 'Lignes равенства lignes données des рекуперирования Если iLineNum > 0 после этого Для I = I к I + iLineNum - 1 sSQL = "" sql = "" 'Рекуперирование des données de la ligne льет colonne chaque Для j = ColRef2ColNum (sColStart) к iNumColumn - 1 sSQL = sSQL & клетки (I, j) & ««,» « Следующий j sSQL = средний (sSQL, 1, Len (sSQL) - 3) 'Сломайте из функции если потребитель имеет не вписать никакое значение Если InStr (sSQL, «[пожалуйста определите] ") после этого ExecuteUpdate = True Выходите функция Закончитесь если 'Таблица la dans données des ввода sql = «ВСТАВКА В [» & sTableName & «] (" & sColumnTitle & ") значения ("» & sSQL & «"); « oConnection.Execute sql Вопрос трейсера «ОДОБРЕННЫЙ: » & sql Затем iий

class=

Ответ : VBA routien - просто помощь Кодего

>> ошибка: Предположено «,»
>> Ошибка: Предпологаемый предмет
любая линия номера упомянутые в пульте ошибки?
Взгляните на вашем Кодем тщательно. Что-то пропавше…
Вероятно вы имеете некоторые перемеююые с одним и такое же названное…?!
Изменение
onChngIntPceAll функции () {
для (i=0; ionChngIntPce<20> (I);
}
}
к
onChngIntPceAll функции () {
  для (indx=1; indx <� 22="">}
Также установьте это отлаживайте msg:
предупредите («onChngIntPce призванное для: » + idx); сразу после этой линии onChngIntPce функции (idx) {
так ваша функция onChngIntPce (idx) посмотрит подобие:

onChngIntPce функции (idx) {
сигнал тревога («onChngIntPce призванное для: » + idx); // извлекает этот msg более поздно
если (document.getElementById («intPce " +idx) .value > 1) document.getElementById («sel " +idx) .selectedIndex = 1;
calcVAT ();
SumExVAT ();
Итоги ();
proc ();
}