Transposer une plage

Sub SupprimeLigneVide
GlobalScope.BasicLibraries.loadLibrary ("zBasic")

	maPlage = "A1:C3"
	oTableRecup = zPlage.VersTable(maPlage)	
	oTableTrans = zTable.Transpose(oTableRecup)
	zTable.Ecrit("Test", "A8", oTableTrans)

End sub