ERR code : 0x800A03EC 발생

다음 사용 중 오류가 발생함: Interface.000208D8_0000_0000_C000_000000000046/Range 오류: 객체에서 오류 코드가 반환됨: 0x800A03EC

오류 발생: Out_Sumry (line 142) esh.Range(strcat(Rows,Celcolor{celcnt})).Interior.Color = clr;

     -  Out_Sumry Program 내용 -

121 Jdgdsnx = [Jdgdsn60;Jdgdsn50;Jdgdsn15]; 122 JdgdsnX = num2str(sort(Jdgdsnx)); 123 JdgDsn = cellstr(JdgdsnX);

126 Celcolor = JdgDsn; % ●(9670)가 아닌 열 번호 행렬 확보 127 Rows ={'F'}; % ▼/▲(9660/9650), ×(215) 만

      %  cell color 변경  Coding
130  cellend = numel(JdgDsn);

133 rgb = [255 0 0]; % Red Color 134 clr = rgb * [1 256 256^2]'; %# convert to long number Excel understands

136 e = actxserver ('Excel.Application'); %# open Activex server 137 filename = fullfile(pathNamx,FileName); %# full path required 138 ewb = e.Workbooks.Open(filename); %# open the file 139 esh = ewb.ActiveSheet;

141 for celcnt = 1:cellend 142 esh.Range(strcat(Rows,Celcolor{celcnt})).Interior.Color = clr; 143 end 144 ewb.Save 145 ewb.Close(false) 146 e.Quit