Za\u0142\u00f3\u017cmy na przyk\u0142ad, \u017ce mamy nast\u0119puj\u0105cy zestaw danych i chcemy obliczy\u0107 \u015bredni\u0105 warto\u015b\u0107 kom\u00f3rki na podstawie kolor\u00f3w kom\u00f3rek:<\/span> <\/p>\n Naj\u0142atwiej to zrobi\u0107, pisz\u0105c kod VBA w Excelu.<\/span><\/p>\n Mo\u017ce si\u0119 to wydawa\u0107 onie\u015bmielaj\u0105ce, je\u015bli nie znasz j\u0119zyka VBA, ale proces jest prosty, a poni\u017cszy przyk\u0142ad krok po kroku pokazuje dok\u0142adnie, jak to zrobi\u0107.<\/span><\/p>\n Najpierw wprowad\u017a warto\u015bci danych do Excela:<\/span> <\/p>\n Nast\u0119pnie musimy upewni\u0107 si\u0119, \u017ce zak\u0142adka Deweloper<\/strong> jest widoczna na g\u00f3rnej wst\u0105\u017cce Excela.<\/span><\/p>\n Aby to zrobi\u0107, kliknij zak\u0142adk\u0119 Plik<\/strong> , nast\u0119pnie Opcje<\/strong> i Dostosuj Wst\u0105\u017ck\u0119<\/strong> .<\/span><\/p>\n W sekcji zatytu\u0142owanej Karty g\u0142\u00f3wne<\/strong> zaznacz pole obok Deweloper<\/strong> , a nast\u0119pnie kliknij OK<\/strong> :<\/span> <\/p>\n Nast\u0119pnie kliknij kart\u0119 Deweloper<\/strong> na g\u00f3rnej wst\u0105\u017cce, a nast\u0119pnie kliknij ikon\u0119 Visual Basic<\/strong> :<\/span> <\/p>\n Nast\u0119pnie kliknij zak\u0142adk\u0119 Wstaw<\/strong> , a nast\u0119pnie z rozwijanego menu wybierz opcj\u0119 Modu\u0142<\/strong> :<\/span> <\/p>\n Nast\u0119pnie wklej nast\u0119puj\u0105cy kod do edytora kodu modu\u0142u:<\/span><\/p>\n Poni\u017cszy zrzut ekranu pokazuje, jak to zrobi\u0107:<\/span> <\/p>\n Nast\u0119pnie zamknij edytor VB.<\/span><\/p>\n Na koniec mo\u017cemy u\u017cy\u0107 utworzonego przez nas makra, aby u\u015bredni\u0107 warto\u015bci kom\u00f3rek na podstawie koloru.<\/span><\/p>\n Najpierw wype\u0142nij kom\u00f3rki C2:C4<\/strong> kolorami, dla kt\u00f3rych chcesz obliczy\u0107 \u015bredni\u0105 warto\u015b\u0107.<\/span><\/p>\n Nast\u0119pnie wpisz nast\u0119puj\u0105c\u0105 formu\u0142\u0119 w kom\u00f3rce D2<\/strong> :<\/span><\/p>\n Przeci\u0105gnij i wype\u0142nij t\u0119 formu\u0142\u0119 do ka\u017cdej pozosta\u0142ej kom\u00f3rki w kolumnie D, a formu\u0142a automatycznie obliczy \u015bredni\u0105 warto\u015b\u0107 dla ka\u017cdej kom\u00f3rki z okre\u015blonymi kolorami t\u0142a:<\/span> <\/p>\n Na przyk\u0142ad widzimy, \u017ce \u015brednia warto\u015b\u0107 kom\u00f3rek z jasnozielonym t\u0142em wynosi 17,67<\/strong> .<\/span><\/p>\n Mo\u017cemy to potwierdzi\u0107, r\u0119cznie u\u015bredniaj\u0105c ka\u017cd\u0105 kom\u00f3rk\u0119 na jasnozielonym tle:<\/span><\/p>\n \u015arednia kom\u00f3rek na jasnozielonym tle: (20 + 13 + 20) \/ 3 = 17,67<\/strong> .<\/span><\/p>\n Odpowiada to warto\u015bci obliczonej przez nasz wz\u00f3r.<\/span><\/p>\n Poni\u017csze samouczki wyja\u015bniaj\u0105, jak wykonywa\u0107 inne typowe operacje w programie Excel:<\/span><\/p>\n Jak obliczy\u0107 \u015bredni\u0105 wed\u0142ug grupy w programie Excel<\/a> Cz\u0119sto mo\u017cesz chcie\u0107 u\u015bredni\u0107 warto\u015bci w Excelu na podstawie ich koloru. Za\u0142\u00f3\u017cmy na przyk\u0142ad, \u017ce mamy nast\u0119puj\u0105cy zestaw danych i chcemy obliczy\u0107 \u015bredni\u0105 warto\u015b\u0107 kom\u00f3rki na podstawie kolor\u00f3w kom\u00f3rek: Naj\u0142atwiej to zrobi\u0107, pisz\u0105c kod VBA w Excelu. Mo\u017ce si\u0119 to wydawa\u0107 onie\u015bmielaj\u0105ce, je\u015bli nie znasz j\u0119zyka VBA, ale proces jest prosty, a poni\u017cszy przyk\u0142ad krok […]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[3],"tags":[],"class_list":["post-5087","post","type-post","status-publish","format-standard","hentry","category-przewodnik"],"yoast_head":"\n![\"\"](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/sc2.png\")
<\/p>\n Krok 1: Wprowad\u017a dane<\/strong><\/span><\/h2>\n
<\/p>\n Krok 2: Poka\u017c kart\u0119 Deweloper w Excelu<\/strong><\/span><\/h2>\n
![\"\"](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/sc1.png\")
<\/p>\n Krok 3: Utw\u00f3rz makro za pomoc\u0105 VBA<\/strong><\/span><\/h2>\n
![\"\"](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/sc3.png\")
<\/p>\n![\"\"](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/sc4.png\")
<\/p>\n Function<\/span> AvgCellsByColor(CellRange As Range, CellColor As Range)\n\nDim<\/span> CellColorValue As<\/span> Integer\nDim<\/span> RunningAvg As<\/span> Long\nDim<\/span> RunningSum As<\/span> Long\nDim<\/span> RunningCount As<\/span> Long\n\nCellColorValue = CellColor.Interior.ColorIndex\nSet<\/span> i = CellRange\n\nFor Each<\/span> i In<\/span> CellRange\n If<\/span> i.Interior.ColorIndex = CellColorValue Then<\/span>\n RunningSum = RunningSum + i.Value\n RunningCount = RunningCount + 1\nEnd If<\/span>\nNext<\/span> i\n\nAvgCellsByColor = RunningSum \/ RunningCount\n\nEnd Function\n<\/span><\/strong><\/pre>\n![\"\"](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/une-couleur1.png\")
<\/p>\n Krok 4: U\u017cyj makro, aby u\u015bredni\u0107 wed\u0142ug koloru<\/strong><\/span><\/h2>\n
=AvgCellsByColor( $A$2:$A$11<\/span> , C2<\/span> )<\/strong><\/pre>\n![\"\u015arednia](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/une-couleur2.png\")
<\/p>\n Dodatkowe zasoby<\/strong><\/span><\/h2>\n
Jak obliczy\u0107 \u015bredni\u0105 miesi\u0119czn\u0105 w Excelu<\/a>
Jak obliczy\u0107 \u015bredni\u0105 wed\u0142ug dnia tygodnia w programie Excel<\/a><\/span><\/p>\n","protected":false},"excerpt":{"rendered":"