Citazione Originariamente Scritto da Be_on_edge Visualizza Messaggio
Di solito in questi casi conviene procedere a ritroso e di conseguenza la routine diventa:

Codice:
 If objBendTable.ColumnCount > 6 Then
                ' Elimina le colonne utente
                For I = objBendTable.ColumnCount to 7 step -1
Ho apportato anche questa correzione alla routine che cancella le colonne singolarmente perché, come l'avevo scritta io, eliminando sequenzialmente le colonne, dopo averne eliminate metà, il conto delle colonne "non tornava più"...