lst={{"","","EE","EE","EE","EE","EE"},{"","","Agriculture","Forestry","Fishing","Mining ","Extraction "},{"EE","Agriculture","0,131346361","0,01587348","0,003638642","8,36E-004","1,67E-004"},{"EE","Forestry","5,52E-004","0,155865778","4,38E-005","6,00E-004","4,00E-005"},{"EE","Fishing","2,33E-004","4,04E-005","0,024580636","4,60E-006","3,76E-006"},{"EE","Mining ","5,71E-004","2,78E-004","5,12E-005","0,034537603","3,69E-005"},{"EE","Extraction ","3,67E-004","2,51E-004","7,46E-004","0,001576707","0,043538054"}};
lst[[3;;,3;;]]=Map[ToExpression[StringReplace[#,{","->".","E"->"*^"}]]&,lst[[3;;,3;;]],{2}];
extractColumn[label_]:=Extract[lst,{All,First@First@Position[lst[[All,2]],label]}];
Print[Position[lst[[All,2]]]];
Print[Position[lst[[All,2]],"Agriculture"]]