component = 'CONTACT'
cmsel,,component !select Contact Faces acc. component
esln !select related Elements
ESEL,R,ENAME,,174 !Reselect all Contact Elements in Set
*GET,nelem,ELEM,,COUNT !count number of selected nodes on Faces
en=0 !initialize Elem Number to 0
*dim,elem_data,,nelem,2
*do,i,1,nelem !loop over nodes
en = ELNEXT(en) !next higher node number to nn
elem_data(i,1) = en !save node number to array
*GET, elem_data(i,2), ELEM,en,AREA
*enddo
*status,elem_data