Clear["Global`*"];
MapaH5="c:\\Users\\gal\\Documents\\DRUGI PROGRAMI\\Wolfram Mathematica\\saška ura\\data iz posnetkov\\";
ImeABβνji="c:\\Users\\gal\\Documents\\DRUGI PROGRAMI\\Wolfram Mathematica\\saška ura\\data iz posnetkov\\ABβνji.h5";
ImeOut=MapaH5<>"Podatki Za 1D Simulacijo  Nl  Rl  mp  β  T"<>".h5";
fps=240;

ImenaTNjimH5=FileNames[{"*TNjim.h5"},MapaH5,{2}];
TableForm@Transpose[{Range@Length@ImenaTNjimH5,StringTake[#, {87, -10}]&/@ImenaTNjimH5}]

NlDlmpji=(({{1, "0g", 2, 2.35, 28}, {2, "12g", 2, 2.35, 40}, {3, "12l", 12, 2.35, 32}, {4, "16g", 2, 2.35, 44}, {5, "1l", 1, 2.35, 32}, {6, "2.35mm   1", 1, 2.35, 32}, {7, "2.35mm   2", 1, 2.35, 32}, {8, "2.35mm   3", 1, 2.35, 32}, {9, "2.35mm   4", 1, 2.35, 32}, {10, "3.3mm", 1, 3.3, 32}, {11, "3l", 3, 2.35, 32}, {12, "4.1mm", 1, 4.1, 32}, {13, "4.9mm   1", 1, 4.9, 32}, {14, "4.9mm   2", 1, 4.9, 32}, {15, "4.9mm   3", 1, 4.9, 32}, {16, "4.9mm   4", 1, 4.9, 32}, {17, "4g", 2, 2.35, 32}, {18, "4l", 4, 2.35, 32}, {19, "5.5mm", 1, 5.5, 32}, {20, "6l", 6, 2.35, 32}, {21, "8g", 2, 2.35, 36}, {22, "8l   1", 8, 2.35, 32}, {23, "8l   2", 8, 2.35, 32}, {24, "8l   3", 8, 2.35, 32}, {25, "8l   4", 8, 2.35, 32}, {26, "8l", 8, 2.35, 32}, {27, "Č", 1, 2.35, 42}}));(* {Nl,Dl,mp} *)
Nlji=NlDlmpji[[;;,3]];
Rlji=NlDlmpji[[;;,4]]/2/1000;
mpji=NlDlmpji[[;;,5]]/1000.0;
βji=Import[ImeABβνji,{"Data",1}][[;;,3]];
Tji=N@((Length[Import[#,{"Data",1}]]&/@ImenaTNjimH5)/fps);
NlRlmpβTji=Transpose@{Nlji,Rlji,mpji,βji,Tji};
Export[ImeOut,NlRlmpβTji];
TableForm@NlRlmpβTji