Question : VBA routien - l'aide simple de code

Bonjour, le

I font routien un VBA qui va nombre du thourgh « x » de colonnes pour le nombre de « X » de rangées. le code du
The est pendant que below.
I veulent le contrôle si toutes les colonnes dans la rangée sont vides indépendamment de la première colonne. si (vrai) qu'éclater du loop
Can que n'importe quel m'indiquent svp le meilleur/nettoient la manière de modifier le code pour pouvoir réaliser cela ? le

I savent que je peux le faire moi-même mais peux ne pas être la manière la plus propre :
de/


Thanks beaucoup class= > " clair " de

> de " codeSnippet " de class= de

class= " lineNumbers " de

class= de

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 " de l'id= " codeSnippet940753 de 0 sColumnTitle = sColumnTitle et « ` » et cellules (I, j) et « `, » j = j + 1 Boucle sColumnTitle = mi (sColumnTitle, 1, Len (sColumnTitle) - 1) iNumColumn = j i = I + 1 j = ColRef2ColNum (sColStart) 'Lignes de pair de lignes de données de DES de récupération S'iLineNum > 0 puis Pour I = I à I + iLineNum - 1 sSQL = "" SQL = "" La 'récupération des données de la ligne versent le colonne de chaque Pour j = ColRef2ColNum (sColStart) à l'iNumColumn - 1 sSQL = sSQL et cellules (I, j) et « « , » «  Prochain j sSQL = mi (sSQL, 1, Len (sSQL) - 3) 'Éclater de la fonction si l'utilisateur a pour ne pas écrire n'importe quelle valeur S'InStr (sSQL, « [spécifier svp] ") puis ExecuteUpdate = rectifient Sortir la fonction Finir si 'Table de La de dans de données de DES d'insertion SQL = « INSERTION DANS [ » et sTableName et « ] (" et sColumnTitle et ") des valeurs (" » et sSQL et « ") ; «  oConnection.Execute SQL Question CORRECTE de traceur « :  » et SQL Après i

class= de

Réponse : VBA routien - l'aide simple de code

>> erreur : Prévu « , »
>> Erreur : L'objet a prévu
y a-t-il une ligne nombres mentionnés dans la console d'erreurs ?
Jeter un coup d'oeil à votre code soigneusement. Quelque chose est absente…
Vous avez probablement quelques variables avec une et le même nommé… ? !
Changement
onChngIntPceAll de fonction () {
pour (i=0 ; ionChngIntPce<20> (i) ;
}
}
à
onChngIntPceAll de fonction () {
  pour (indx=1 ; indx <� 22="">}
Placer également ceci corrigent des msg :
alerter (« onChngIntPce appelé pour :  » + idx) ; juste après cette ligne onChngIntPce de fonction (idx) {
ainsi votre fonction d'onChngIntPce (idx) regardera le goût :

onChngIntPce de fonction (idx) {
alerte (« onChngIntPce appelé pour :  » + idx) ; // enlèvent ce msg plus tard
si (document.getElementById (« intPce " +idx) .value > 1) document.getElementById (« sel " +idx) .selectedIndex = 1 ;
calcVAT () ;
SumExVAT () ;
Totaux () ;
proc () ;
}