fid = fopen('ergebnisse.txt'); %Datei öffnen
tline = fgetl(fid);
while ischar(tline) %zeilenweise suchen
    
    Ergebnisse_gefunden = strfind(tline, 'STATION');
    
    if ~isempty(Ergebnisse_gefunden)
        Ergebnisse = textscan(fid,'%*n %n %n %n %n' , 10, 'HeaderLines', 3); %10 Zeilen einlesen
    end

    tline = fgetl(fid);
    
end
fclose(fid); %Datein schließen