%Usege: A=xcel2matdde(row,col)
function A=xcel2matdde(row,col)
channel = ddeinit('excel','sheet1');
if channel == 0,
  error('error intiating conversation');
end
Asize(2)=col;
Asize(1)=row;
worksheet=sprintf('r1c1:r%dc%d',Asize);
A = ddereq(channel, worksheet);
ddeterm(channel);
