filename = 'D:\02_Matlab\NBSDirected1.0\Example_Data\Neuer Ordner\Test.mat';
Data = readUI(filename);
[filepath,name,ext] = fileparts(filename);

for d=1:size(Data,3)
    slices = Data(:,:,d);
    save(fullfile(filepath,[name '_' num2str(d) '.txt']),'slices','-ascii');
end