NIOSH(1).xls

VBA - Excel - makro przenoszące zaznaczoną wartość z tabelki do danej komórki

Zapewne można by to było zrobić funkcjami ale trzeba by było mieć większą wiedzę co i jak wybierasz a tak zrobiłem dosłownie tak jak chcesz: Makrem poprzez SelectionChange


,, " Współczynnik poziomy [HM] " , " 22 " , " 1 "
,, " Współczynnik pionowy [VM] " , " 175 " , " 0.7 "
,, " Współczynnik odległości [DM] " , " 162 " , " 0.847777777777778 "
,, " Wspołczynnik asymetrii [AM] " , " 120 " , " 0.616 "
,, " Współczynnik częstotliwości [FM] " , " 0.450000305175781 "
,, " Współczynnik uchwytów [CM] "
,, " RWL " , " 0.365561777777778 "
" Częstość (F) * " , " Czas pracy (T) " ,,,,,
" [liczba/min] " , " & lt; 1 godz. " ,, " 1 godz. & lt; T & lt; 2 godz. " ,, " 2 godz. & lt; T & lt; 8 godz. " ,
, " V & lt; 75 cm " , " V & gt; 75 cm " , " V & lt; 75 cm " , " V >=75 cm " , " V & lt; 75 cm " , " V >=75 cm "
" & lt; 0,2 " , " 1 " , " 1 " , " 0.950000610351562 " , " 0.950000610351562 " , " 0.850000610351562 " , " 0.850000610351562 "
" 0.5 " , " 0.970000610351562 " , " 0.970000610351562 " , " 0.920000610351563 " , " 0.920000610351563 " , " 0.810000610351563 " , " 0.810000610351563 "
" 1 " , " 0.940000610351563 " , " 0.940000610351563 " , " 0.880000610351563 " , " 0.880000610351563 " , " 0.75 " , " 0.75 "
" 2 " , " 0.910000610351563 " , " 0.910000610351563 " , " 0.840000610351562 " , " 0.840000610351562 " , " 0.650000610351563 " , " 0.650000610351563 "
" 3 " , " 0.880000610351563 " , " 0.880000610351563 " , " 0.790000610351563 " , " 0.790000610351563 " , " 0.55 " , " 0.55 "
" 4 " , " 0.840000610351562 " , " 0.840000610351562 " , " 0.720000610351562 " , " 0.720000610351562 " , " 0.450000305175781 " , " 0.450000305175781 "
" 5 " , " 0.800000610351563 " , " 0.800000610351563 " , " 0.600000305175781 " , " 0.600000305175781 " , " 0.350000305175781 " , " 0.350000305175781 "
" 6 " , " 0.75 " , " 0.75 " , " 0.5 " , " 0.5 " , " 0.270000152587891 " , " 0.270000152587891 "
" 7 " , " 0.700000610351562 " , " 0.700000610351562 " , " 0.420000305175781 " , " 0.420000305175781 " , " 0.220000152587891 " , " 0.220000152587891 "
" 8 " , " 0.600000305175781 " , " 0.600000305175781 " , " 0.350000305175781 " , " 0.350000305175781 " , " 0.180000152587891 " , " 0.180000152587891 "
" 9 " , " 0.520000305175781 " , " 0.520000305175781 " , " 0.300000152587891 " , " 0.300000152587891 " , " 0 " , " 0.150000076293945 "
" 10 " , " 0.450000305175781 " , " 0.450000305175781 " , " 0.260000152587891 " , " 0.260000152587891 " , " 0 " , " 0.130000076293945 "
" 11 " , " 0.410000305175781 " , " 0.410000305175781 " , " 0 " , " 0.230000152587891 " , " 0 " , " 0 "
" 12 " , " 0.370000305175781 " , " 0.370000305175781 " , " 0 " , " 0.210000152587891 " , " 0 " , " 0 "
" 13 " , " 0 " , " 0.340000305175781 " , " 0 " , " 0 " , " 0 " , " 0 "
" 14 " , " 0 " , " 0.310000152587891 " , " 0 " , " 0 " , " 0 " , " 0 "
" 15 " , " 0 " , " 0.28 " , " 0 " , " 0 " , " 0 " , " 0 "
" & gt; 15 " , " 0 " , " 0 " , " 0 " , " 0 " , " 0 " , " 0 "


Download file - link to post