%##########################################################################
%###########################    Tabellen 1    #############################
%##########################################################################

[filename_xlsx_1, pathname_xlsx_1] = uigetfile({'*.xls'},'1. Tabelle laden');
file = strcat(pathname_xlsx_1, filename_xlsx_1);

% Einlesen der Excel-Tabellen
[num_1,txt_1,raw_1] = xlsread(file);
DF_table_1 = readtable(file);

% Verbindung zu Excel erstellen
excel_1 = actxserver('Excel.Application'); 

%open excel file
workbook_1 = excel_1.Workbooks.Open(file);

%get worksheet reference
worksheet_1 = workbook_1.Worksheets.Item(1);



%##########################################################################
%###########################    Tabellen 2    #############################
%##########################################################################

[filename_xlsx_2, pathname_xlsx_2] = uigetfile({'*.xls'},'2. Tabelle laden');
file = strcat(pathname_xlsx_2, filename_xlsx_2);

% Einlesen der Excel-Tabellen
[num_2,txt_2,raw_2] = xlsread(file);
DF_table_2 = readtable(file);

% Verbindung zu Excel erstellen
excel_2 = actxserver('Excel.Application'); 

%open excel file
workbook_2 = excel_2.Workbooks.Open(file);

%get worksheet reference
worksheet_2 = workbook_2.Worksheets.Item(1);


%##########################################################################
%#####################   Vergleich der Tabellen    ########################
%##########################################################################

ID_1 = raw_1(2:end,12);
ID_2 = raw_2(2:end,12);

N = length(raw_1);
all_i = 2:N;
find_ID = zeros(size(all_i));
for k = 1:numel(all_i)    
 i = all_i(k);
 ID_find(k) = find(ismember(ID_1,ID_2(i,1)));

end