Renvoyer la liste des images d'une feuille

Sub Main
	GlobalScope.BasicLibraries.loadLibrary ("zBasic")
	aListe = zImage.VersListe("Feuille1")
	if isArray(aListe) then
		zTable.Ecrit("Feuille1", "A1", aListe)
	else
		msgbox "Aucune image présente sur la feuille"
	endif
End Sub