Matlab - USO DE DATOS DE EXCEL

[~,d]=xlsread('esempio.xlsx');

d(1,:)=[];

palabra='jkl';

b=d(strcmp(d(:,1),palabra),2);

if isempty(b)

%la palabra no está , aquí colocar la opción de 

%agregarla

else

    disp(b)

end

%Al inicio leer el archivo donde están guardadas las palabras

[~,texto]=xlsread('palabras_clave.xlsx');

texto(1,:)=[];

%Ingreso de la palabra para la búsqueda de su descripción

palabra=input('Ingrese la palabra a buscar: ','s');

descrip=texto(strcmp(texto(:,1),palabra),2);

%Si la celda donde debería estar su descripción está vacía dar opción a

%agregarla a la lista

if isempty(descrip)

    disp('El término buscado no se encuentra en la lista');

    disp('desea agregarla escribir (si) de otra forma (no)');

    opcion=input('Respuesta si/no: ','s');

    switch opcion

        case 'si'

            %Se pide como dato la palabra, descripción y ubicación de la

            %celda a guardar en la lista

            palabri=input('Nueva palabra para agregar a la lista: ','s');

            celdai=input('Ingrese la celda en donde guardarla: ','s');

            descripi=input('Colocar la traducción o descripción: ','s');

            celdaf=input('Ingrese la celda en donde guardarla: ','s');

            %Se modifica el archivo excel según lo que se agrega

            [estado1]=xlswrite('palabras_clave.xlsx',{palabri},'Hoja1',celdai);

            [estado2]=xlswrite('palabras_clave.xlsx',{descripi},'Hoja1',celdaf);

            %Bloque de error por si hubiera falla en la escritura o

            %modificación del archivo excel

            if estado1==0

                disp('El ingreso de la palabra ha fallado.')

            end

            if estado2==0

                disp('El ingreso de la palabra ha fallado.')

            end

        case 'no'

            disp('Gracias por usar el programa');

        otherwise

            disp('Respuesta no válida');

    end

%Si encontró llena la celda de descripción, mostrará la misma

else

    fprintf('El comando o función %s tiene la siguiente descripción:\n',palabra);

    disp(descrip);

end