Supprimer les lignes vides d'une liste

De zBasic
Aller à : navigation, rechercher

Demo001.gif

Sub SupprimeLigneVide

GlobalScope.BasicLibraries.loadLibrary ("zBasic")

	maPlage = "A1:G24"
	oTableKO = zPlage.VersTable(maPlage)
	zPlage.Supprime(maPlage)
	oTableOK = zTable.SansLigneVide(oTableKO)
	zTable.Ecrit("Récap", "A1", oTableOK)

End sub