Czesc mam pytanie, czy ponizszy kod mozna jakos uproscic? Zeby wszystkie zakresy skopiowalo na raz?
.Range("O3:O" & LastRow).Value = .Range("O3:O" & LastRow).Value
.Range("Q3:Q" & LastRow).Value = .Range("Q3:Q" & LastRow).Value
.Range("R3:R" & LastRow).Value = .Range("R3:R" & LastRow).Value
.Range("T3:T" & LastRow).Value = .Range("T3:T" & LastRow).Value
.Range("O3:O" & LastRow).Value = .Range("O3:O" & LastRow).Value
.Range("Q3:Q" & LastRow).Value = .Range("Q3:Q" & LastRow).Value
.Range("R3:R" & LastRow).Value = .Range("R3:R" & LastRow).Value
.Range("T3:T" & LastRow).Value = .Range("T3:T" & LastRow).Value





















Mam liczby, powiedzmy zakres 1-10. Dla liczb 1-5 chce ustalić skalę 3-kolorową ("stopniowaną") np. czerwony-biały-zielony, a dla liczb 6-10 skalę 2-kolorową (lub 3), która zacznie się od zielonego z poprzedniego przedziału, aż do 10 gdzie ma czekać kolor np. żółty. Próbowałem podzielić to na dwie reguły, lecz excel widząc liczbę spoza podanego zakresu "zaokrągla" ją do najbliższej liczby z przedziału i jest lipa.