No jak? Range jest obiektem z parametrem, po prostu używasz: "Range("...").Iterior.Pattern" na ten przykład. W poprzednim przykładzie wykonałeś metodę zaznaczenia, co spowodowało utworzenie obiektu "Selection". Żeby tego nie robić, to zamiast zaznaczać, po prostu zmieniasz właściwości w ten sam sposób, jak na obiekcie Selection.
Zobacz ten kurs [url=http://dzono4.w.interia.pl/kurs/for... Tabliczka mnożenia w części "Dla dociekliwych" jest tym, o czy tu mówimy. A szachownica ma 8x8 i zaczyna się od białego :)
Dwie poprawki: [syntax=vbscript]Set Zakres = Columns("I:I").Cells[/syntax]kolorujesz pojedyncze komórki [syntax=vbscript]Cell.Interior.ColorInde... = x1None[/syntax]Color = xlNone to byłby czarny No i moim zdaniem kolorować raczej używany fragment kolumny, a nie cały milion wierszy.
Pierwsza sprawa to na pewno wyrzuć funkcję Jeżeli() i pozostaw tylko warunki. Możesz zapisać go w jednej funkcji Oraz(). Druga sprawa to jak zostawisz wszędzie te $ to nie będziesz mógł łatwo kopiować formuły/warunku. Adres bezwzględny pozostaw tylko przy adresie S$4 =ORAZ(B3>5,0;B3<6,0;C3<S$4) Tak zapisany warunek wpisz do formatowania warunkowego...
I dalej nie ma załącznika. Czy to ma być ten sam kolor wszystkich liter we wszystkich kolumnach? Jeżeli tak, to należy zaznaczyć zakres do formatowania (można to też zrobić później, w ramach modyfikacji) i jako formułę wpisać np. [syntax=text]=A11=A$11[/syntax] (warunek zapisujemy dla pierwszego wiersza zakresu). Przykład w załączniku.
Można to zrobić na kilka sposobów, w zdarzeniu Change zeszytu 1 lub w zdarzeniu Activate zeszytu 2. Dla pierwszego przypadku użyłbym takiego makra: [syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$C$5" Then On Error GoTo myErr Set wsform = ThisWorkbook.Worksheets("Zeszyt 2") wsform.Range("C3:M3").Interior.Pattern.....
[quote]Select Case kom.Value Case "." /quote] zamień na [syntax=vbscript]If InStr(1, kom, ".") > 0 then kom.Interior.ColorIndex = 1[/syntax]
W formatowaniu warunkowym zastosuj taki mniej więcej ciąg myślowy: jeżeli dziś >= data_wpisana +80 to koloruj na czerwono Osobno w jakiejś tam kolumnie (przyjmijmy, że jest to komórka G4) wpisujesz normalny warunek: jeżeli dziś >= data wpisana to G4="ŹLE" w przeciwnym razie G4="OK" Wystarczy to podstawić do funkcji, celowo zostawiam Ci odrobinkę pracy...
Musisz się zdecydować - czy ma kolorować po uruchomieniu makra, czy po zmianie zawartości komórki.
Zdaje się, że formuła powinna być "odwrotnie": =LICZ.JEŻELI($C$3:$C$100;A3) https://obrazki.elektroda.pl/5441432600_...
https://obrazki.elektroda.pl/8810856500_... Hej, Jak widzisz: po zrobieniu części nr 20-015-062 czyli poziomu 1.6.1.6 i zawierającej się nie w niej trzech kolejnych pozycji - oznaczone na zielono powtarza się ona na poziomie 1.6.1.9 Znajdujące się w niej pozycje zawsze będą takie same. Dlatego chciałbym aby po oznaczeniu części nr...
Jakos tak [syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("B5:B24")) Is Nothing Then If Application.CountIf(Target.Offset(, 2).Resize(1, 4), Target) = 0 Then Target.Interior.Color = vbRed Else Target.Interior.ColorIndex = xlNone End If End If End Sub [/syntax]
po wpisaniu cyfry 1, komórki kolorowały się w lewo a nie w prawo tak jak jest teraz Kolega Maciej Gonet przygotował Ci specjalną formułę do planowania produkcji, która w zależności od wartości w kolumnie I , koloruje po wstawieniu jakiejkolwiek liczby (nawet "0") do którejś komórki - zarówno tą pierwszą niepustą jak i odpowiednią liczbę następnych...
Przykład na formułach i formatowaniu warunkowym: 1. W komórkę E4 wstaw formułę: [syntax=vbscript]=DATA(D1;MIESIĄC(DATA.W... & " 1"));1)[/syntax] 2. W komórkę F4 wstaw [syntax=vbscript]=E4+1[/syntax] i przeciągnij na prawo do ostatniego dnia. 3. Sformatuj wyświetlanie samego dnia ustawiając format niestandardowy -> d 4. Zaznaczasz dni 1-31, wybierasz...
Cześć, proszę o pomoc. W załączeniu przesyłam plik, chciałbym aby w zakresie "tabela", komórki które są w tym samym wierzy, nawzajem się porównały i przyjęły konkretne style. Większa wartość styl "dobry", mniejsza "zły". Proszę o pomoc bo kod napisany przeze mnie nie działa. Z góry dziękuję Sub kolory() ostatniwiersz = Range("tabela").Rows.C...
No, w ten sposób świata nie zawojujesz ;-) Musisz to zrobić w pętli. Spróbuj tak. [syntax=vbscript] Option Explicit Sub kolory() Dim myRangeA As Range, Kom As Range Set myRangeA = Range("A2:A150") For Each Kom In myRangeA If Not Kom = "zielony" _ And Kom.Offset(0, 1) = "duza" _ Then Kom.Interior.ColorIndex = 31 If Kom = "zielony" _ And Kom.Offset(0,...
Sorry, Chodzi o to aby makro: zaznaczyło zakres C5:F50 https://obrazki.elektroda.pl/6322808800_... https://obrazki.elektroda.pl/2228596900_...
Proszę html [syntax=html] <table id="tabela" style="width:200px;"> <tr> <td>10</td> <td>a</td> <td>b</td> </tr> <tr> <td>20</td> <td>c</td> <td>d</td> </tr> <tr> <td>30</td> <td>e</td> <td>f</td> </tr>...
Chciałbym żeby automatycznie kolorowały się komórki jak w załączonym pliku. Mianowicie jeżeli w wierszu występuje wyraz 'sob' lub 'ndz' automatycznie pokolorował całą kolumnę. Dorobiłem Ci makro. Znajdziesz go przez Alt + F11. Makro możesz edytować, jednak jego nazwa musi pozostać niezmienna.
Proszę o pomoc w przygotowania formuły która koloruje komórki zgodnie z kryterium.
udało mi się zrobić inicjały za pomocą odpowiednich formuł, ale jak zrobić, żeby makro kolorowało komórki?
Witam serdecznie. Jak w temacie. Potrzebuję funkcję, jakiś skrypcik aby kolorowała mi się grupa komórek na np czerwono gdy w odpowiedniej komórce znajdzie się odpowiednia wartość. NP. Zmień tło komórek A13:D13 oraz tło komórki B4 na czerwone jeżeli w komórce B4 zostanie wybrana wartość TAK (ta komórka to lista wyboru). Da się to w jakiś prostu sposób...
Wydłubałem coś takiego: żadna francja-elegancja, ale na załączonym przykładzie Worda działa. Zrobiłem test dla ~500 tabel, im dalej znajduje się pozycja, tym dłużej muli - zamiana pojedynczej pozycji może potrwać do kilkunastu sekund - ale działa i może do czegoś Ci się przyda. Mam też nowszego Offica, więc pewnie w VBA->References będziesz sobie musiał...
Faktycznie. Jednak czy jest sposób żeby np. kolorowanie komórek zrobić w VBA bez zamiany tej funkcji na procedurę czy absolutnie jest to niemożliwe ?
Kolorowanie komórek można wykonać za pomocą warunkowego formatowania. Niewyświetlanie wartości za pomocą funkcji warunkowych.
Ta kolumna z zerami i jedynkami jest potrzebna, żeby Solver wiedział, które liczby ma brać do średniej, a które pominąć. W moim załączniku masz to rozwiązane Solverem, punktem startowym były same jedynki. Jak zmienisz dane, to będzie inne rozwiązanie. Tylko trzeba za każdym razem uruchomić Solvera. Kolorowanie komórek to jest sprawa wtórna. Można sobie...
Można oczywiście użyć 'InStr', ale to zupełnie inna konstrukcja wyrażenia. Natomiast tu prościej zamiast operatora "=" użyć operatora "Like". Operator "=" nie uwzględnia znaków zastępczych, a "Like" - tak. [syntax=vbscript]If Cells(i, 15).Value Like "*otow*" Then[/syntax]Tylko nie rozumiem po co tam był ten trzeci cudzysłów. Ale generalnie formatowanie...
Dzień dobry, Chciałabym tak orientacyjnie się dowiedzieć czy jest możliwość stworzenia makra które na podstawie wartości w jednej komórce (wartość to godziny) będzie kolorować odpowiednie komórki w drugim arkuszu (jedna komórka odpowiada jednej godzinie). Z góry bardzo dziękuję. Pozdrawiam,
Wprowadziłem formuły i formatowania warunkowe do komórek arkusza BAZA i po wpisaniu nowego kodu, istniejącego w BAZA_ETYKIET, wyszukuje ilość z BAZA_ETYKIET i odpowiednio kolorują komórki arkusza BAZA.
Ów zdefiniowany "tekst" wpisujesz w cudzysłowiu jako warunek równości a działanie formatowania warunkowego ustawiasz na komórkę (lub zakres), którą chcesz kolorować. Zobacz załącznik. (at)mickpr Nie do końca o to chodzi w temacie.
Ok. Ale makro może robić nie tylko kolorowanie komórki. Niestety właczając makra, bo od pewnego czasu są przez Microsoft defaultowo wyłączone, zwiększamy szanse infekcji systemu. Choć moda na "wirusy" tego rodzaju chyba minęła...
Witam, Mam w komórce A1 nazwy firm aż do A30, w komórce C1 to samo. Muszę obie te komórki porównać. Gdy np. w A1 jest ta sama napisana firma co w C1 to komórki zostaną oznaczone jakimś kolorem np. zielonym. Gdy w A2 i C2 jest również to samo to również koloruje komórkę ALE już innym kolorem i nie może go powtórzyć. Gdy komórki różnią się np. A5 i C5...
Ale to chyba zależy, jaka odpowiedź będzie dla Ciebie cenniejsza, bo jeżeli zastosujesz formatowanie warunkowe, które zamiast wartości ujemnej (czyli nadmiaru sztuk) podstawi komunikat "wystarczy", to będziesz wiedział tylko, że masz wystarczająco, ale jakby wyciągnąć wartość bezwzględną z tej ujemnej liczby, to wiedziałbyś o ile masz za dużo. Do tego...
Pewnie można, ale to już dłuższa historia... :) Najprościej - jeżeli plik-źródło jest w tej samej lokacji - wstawić kwerendę wybierającą dane (Dane->Importuj dane zewnętrzne->Nowa kwerenda bazy danych, wybrać Excel Files * i OK, wskazać plik-źródło (można zaznaczyć "Tylko do odczytu"), a dalej z kreatora" wybrać zakładkę, rozwinąć ją krzyżykiem, wybrać...
Pkt. 1 wystarczy funkcja Jeżeli. Pkt. 2 tu już trzeba raczej makro, albo formatowanie warunkowe (tylko kolorowanie błędnej komórki)
Dzięki za już, ale jeszcze nie działa. Podany kod koloruje wszystkie komórki w podanym zakresie mimo, że nie spełniają warunku
O faktycznie, nie jestem zbyt dobra w VBA :) Jeszcze jedno pytanie, jak zamienić kolorowanie tekstu na kolorowanie pola komórki?
Możesz tak przygotować arkusz aby wynik Twojej funkcji był skopiowany do innej komórki. Wtedy można użyć prostego kodu: [syntax=vb] With Sheets("Arkusz1").Range("C8") .Characters(1, 10).Font.ThemeColor = xlThemeColorLight2 .Characters(11).Font.ThemeColor = xlThemeColorLight2 End With [/syntax] Kod koloruje pierwsze 10 znaków tekstu w komórce C8 na kolor1...
Arkusz4: Jak chcesz zrobić sumę sprzedaną w kwartale których masz dwa w 1 komórce? Kolorowanie komórek masz w pasku nad arkuszem. Kwartał to 3 miesiące więc podejrzewam że trzeba je zsumować :) Stypendia: w czym problem? musisz pokolorować, excel z tego co mi wiadomo nie ma takich możliwości żeby sformatować komórkę żeby wyświetlała tekst w iluś linijkach...
Szukam kodu VBA do kolorowania unikalnego pierwszego wiersza Jeśli dobrze zrozumiałem Twoją niechęć do formatowania warunkowego :D To efekt taki jak na zrzucie (nie koloruje również puste komórki :!: ) 990210 można uzyskać poprzez kod :spoko: [syntax=vbscript]Sub FormatUnik() Range(Cells(2, 2), Cells(17, 9)).Select With Selection.Interior .Pattern...
Możesz zastosować taką funkcję UDF: [syntax=vbscript]Function Biale(rng As Range, pat As Range) As Long Application.Volatile Dim cel As Range For Each cel In rng If cel <> "" And cel.Interior.Color = pat.Interior.Color Then Biale = Biale + 1 End If Next cel End Function [/syntax]Funkcja powinna być umieszczona w module uniwersalnym. Pierwszym...
Hej wiesz co nie za bardzo zależy mi na gotowcu bo jednak wole się czegoś nauczyć, jednak chętnie zerknę jak ktoś zrobił :). Na razie mam taki pomysł żeby zrobić to na zasadzie oddalenia obrazu i wrysowania całego ustawienia na zasadzi kolorowania komórek. Narysowania bitowo. Oczywiście nie wiem czy to jest rozwiązanie najlepsze pomyślałem że użycie...
Usiadłem (wreszcie) nad tym i tak sobie myślę: Jeśli pierwszy dzień miesiąca wypada w środę, to w systemie 5/1 dzień wolny ma brygada, która pracowała w ostatni czwartek poprzedniego miesiąca. Nie ma tu stałych, więc po czym w takim razie biedny Excel ma się orientować? Systemu 6/2 nawet nie próbuję analizować :) Należałoby mu jakoś (InputBox, wartość...
Chodzi o najnizsze ceny w danym wierszu. Musiałem poradzić sobie jakos pustymi komórkami, ponieważ kolorowały sie na kolor zielony i byly podswietlane jako "najnisza cena". Nie moglem uzupelnic komorki inna cena bo po prostu jej nie bylo. Plik bede mogl przeslac pozniej wieczorem.
Witam. Szukałem w sieci swojego rozwiązania ale nie potrafię tego przekuć w program lecz mogę podać algorytm co może trochę wyglądać śmiesznie ale tak najszybciej potrafię coś zobrazować ;) Excela dopiero co poznaję. Formuły jako tako opanowałem ale w pewnych momentach podczas przeliczania excel zamraża mi się na dłuższy czas. Program zrobiłem też na...
A może spróbuj formatowaniem warunkowym? Jeżeli dotyczy to na przykład kolumny czy wiersza, ustaw warunek aby kolorowało wszystkie puste komórki
Ze względu na to, że jestem przeciwnikiem stosowania makr tam, gdzie nie jest to absolutnie konieczne, to do formatowania wykorzystałbym Conditional Formatting i dodatkowe kolumny wyliczające poszczególne dane. Do tego musisz poprawnie obliczyć różnicę pomiędzy czasem przyjazdu Tp i czasem zakładanym Tz i jeśli Tp-Tz>0 wtedy kolorujesz komórkę na czerwono....
No właśnie podstawa to zrozumienie :-). Chodzi Ci o to że jak jest godzina w danym przedziale to mają być odpowiednio kolorowane dane. Nie że dane zawierają informacje o godzinie :-). Jednak jak byś dał przykładowy plik to już by było dawno rozwiązane. Fakt rozwiązanie jest banalne. To jest rozwiązanie (koloruje tekst, jak chcesz wypełniać komórki kolorem...
Czyli, że komórki są kolorowane ręcznie?
Jeżeli jakieś pojęcie jest niejasne, to przecież w Excelu jest pomoc, można sprawdzić co gdzie i jak. Malarz formatów to jest narzędzie uruchamiane ikonką umieszczoną na karcie Narzędzia główne, po lewej stronie nad strzałką koło napisu "Schowek". Ikonka przypomina szeroki pędzel-szczotkę do malowania ścian. Jak się najedzie kursorem myszki na tę ikonkę,...
Formuła Licz. jeżeli jest najprostsza. Ponieważ liczby z zakresu B2:B58 są w formacie "0,00" dlatego też należy zmienić formułę na: =$F$17-LICZ.JEŻELI($B$2:$B$59;">"&... i będzie wynik 38. Uwaga do autora: żeby ręcznie nie kolorować danych w zależności od wartości komórki...
Mam następujące pytanie: W Excelu mam zrobiony grafik pracy dla kilku osób. W jaki sposób zrobić formułę (lub coś podobnego np makro) która kolorowała by komórkę, lub zmieniała kolor czcionki w sytuacji kiedy przerwa pomiędzy zmianami jest mniejsza niż 10 godz. Zapis w komórkach mam w formie - 6, 12, W, L4, 14, 20, 22 itd...
bo nie zakończyłeś "With" cały blok musi się kończyć "End With". Dzięki. Teraz nie pokazuje mi błędu, ale chyba coś w formule jest źle, bo nie koloruje mi komórek. Generalnie chodzi o to, że makro miałoby sprawdzić w arkuszu "SPR", czy liczba w komórce "C81" podzielona przez 4 daje liczbę całkowitą. Jeżeli nie daje liczby całkowitej to w tym samym...
Witam Poszukuje skryptu VBA który przepisze mi kolor tła z określonego zakresu komórek automatycznie (ja zmieniam w jednym arkuszu on automatycznie zmienia w innym). Pierwszy wariant: Powiedzmy zakres ( =Arkusz1!A1:A12 ) zostanie odwzorowany do następnego arkusza na inny zakres ( =Arkusz2!B1:B12 ). Po prostu odwzorować kolorowanie komórek. Drugi wariant...
Ja bym sięgnął do POWODU dlaczego komórki są kolorowane, i wg tego budował algorytm Niestety, excell zamazuje coś, co jest rdzeniem informatyki: rozdzielenie danych i ich prezentacji Dane się kwalifikują do koloru X, PONIEWAŻ .... a ich malowanie to już prosta "nie-inteligentna" czynność.
Jak C22:C23 będą puste, to kod nic nie pokoloruje na niebiesko. Ja mówię o kodzie prezentowanym na zdjęciu przez autora :D tam wszystkie komórki jeśli są niepuste kolorowane są na colorindex 33 - czyli jasno niebieski :ok:
Witam… Próbuję za pomocą formatowania warunkowego, ustawić oznaczanie kolorami komórki kolumny tabeli, w zależności od wartości w kolumnach sąsiednich. Komórki kolumny A tabeli posiadają wartość zmienną. Bez stałej górnej wartości granicznej. Suma wartości komórek kolumny B+C wynosi dokładnie tyle co wartość w komórkach kolumny A. Początkowo zadanie...
Jeżeli w dokumencie w którym ma to podświetlenie działać układ tabeli jest taki sam, czyli dwie pierwsze kolumny to imiona i target a potem w czterech kolumnach są dane, to wystarczy wejść do edytora VBA, czyli Alt+F11, w oknie w lewym górnym rogu kliknąć nazwę arkusza w którym są dane (w załączonym przykładzie jest to Arkusz1 o nazwie Arkusz 1 i jak...
Witam posiadam taką formułę =ORAZ(JUTRO()-$J$4>=0;LUB(L7<1; L7>15)) Chciałbym aby ktoś ją poprawił. Otóż ma działać ona na zasadzie kolorowania na czerowno komórek pustych a tam gdzie jest 0 lub liczba do 15 ma zostać na biało. Dodatkowo ma to być robione następnego dnia, Czyli jeśli dzisiaj mamy 1.11 to ma się to w arkuszu samo zrobic 2.11....
Mój oryginalny "programik" do liczenia ma zbyt wiele parametrów, zmiennych i formuł, żeby to wrzucić do jednej komórki, bo powstanie z tego niezły, nie do zrozumienia moloch. Nie wiem czy to jest słuszne przekonanie, bo formuła zapisana w jednej komórce jest łatwa do przeanalizowania choćby poprzez fakt kolorowania nawiasów i komórek. A jak już musisz...
Skoro raport ma 300000 wierszy, to zmienna i musi być zadeklarowana jako long. W którym miejscu Twoje makro się zatrzymuje? A tak w ogóle to zamiast mozolnego porównywania każdej komórki z elementami tablicy przy pomocy pętli to poszedłbym w sprawdzenie przy pomocy odpowiednika arkuszowej funkcji PODAJ.POZYCJĘ czy wartość danej komórki jest w tablicy....
Hejka. Temat trochę trudny. Mam gotową formułę, która koloruje mi komórkę z lokalizacją, gdy imię i szukana się zduplikowały. Natomiast docelowo nie będą to imiona i miasta tylko...liczby.Jak będzie dużo duplikatów i z 20 komórek pokolorowanych to wyszukanie która dokładnie szukana w którym pojemniku się znajduje będzie dramatem. Chciałbym osiągnąć...
Możesz wrzucić plik z przykładowymi danymi (kilka wierszy)? Nie jestem pewien o jaki sposób "kolorowania" chodzi.
Rzeczywiście wyszukuje również z literami, ale dlaczego podświetla dwa wiersze niżej. Bo prawdopodobnie nie zaznaczyłeś całej kolumny B:B tylko (od pierwszej lub) pierwszą którą chciałeś kolorować. Zaznacz porządnie klikając w literę B i wywołaj formatowanie warunkowe, inaczej adresy, które masz w przykładzie będą się odnosić do innych komórek.
Intersect(Target, Columns(...)) zwraca zakres komórek typu Range(), będący wspólną częścią - w przypadku zdarzenia Worksheet_Change - obszaru, który uległ zmianie (Target) oraz wybranej kolumny (Columns(...)). Tym obszarem który uległ zmianie (Target) może być tylko jedna komórka (np. kiedy wpisujesz w nią wartość ręcznie), ale też zakres komórek (np....
Tak się zastanawiam... A dlaczego pętla? Target, to target. Po drugie: żebym sobie mógł klikać w tę samą komórkę/zakres, trzeba odejść z focusem na z góry upatrzoną "komórkę neutralną". Po trzecie: pożyteczny byłby też jakiś wyłącznik. Tu z wykorzystaniem komórki neutralnej. Jeśli =1, kolorowanie wyłączone. [syntax=vba]Private Sub Worksheet_SelectionChange(ByVal...
Bardzo wam dziękuję! Podziałało i znacznie ułatwi mi to pracę. Skoro, ktoś już się moim tematem zainteresował, potrzebowałbym jeszcze 3 makr, także starałem się coś wykombinować, ale ciągle mam jakieś błędy.. 1) Jeżeli któraś z komórek w kolumnie E, ma wartość "kontrakt deaktywny", makro koloruje cały wiersz w którym jest ta komórka na czarno. 2) Jeżeli...
Nie działa mi to :/ Widzę, że to zmienia kolor tylko tej komórki a pytanie jak zrobić żeby kolorowało zakres.
Niestety, ten komponent tak trochę dziwnie działa, że jak już określasz parametry, to musisz dla kolejnych komórek je zresetować. Pamiętaj też o OnDrawItem.
A w VBA to będzie coś takiego (tylko z indeksami kolorów i ewentualnie warunkami można trochę pokombinować): [syntax=vb]For Each kom In Range("A1:A23") If IsDate(kom) Then If kom >= Date - 2 And kom < Date Then kom.Interior.ColorIndex = 45 ElseIf kom >= Date - 7 And kom < Date Then kom.Interior.ColorIndex = 3 Else kom.Interior.Color = xlNone...
formuła nie do końca działa po wprowadzeniu. Nie wiem czy dobrze rozumiem, ale czy te formatowanie nie koloruje na zielono komórki, jeśli zaokrąglona wartość O119 jest większa od zaokrąglonej wartości R119 ? Jeśli spojrzysz do mojego pliku, to: (weźmy komórkę O100, która jest wynikiem szukania w kolumnach Q i R - konkretnie pokazuje wartość komórki...
Witam kolegów, Mam prośbę o pomoc w kodzie vba, mam kod który kolorujęmi zawartość komórki jezeli występuję któryś z warunków.Niewiem jak go przerobić aby wraz z tą komórką kolorował mi cały wiersz od A-G [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) Dim komorka As Range For Each komorka In Target.Cells Select Case komorka.Value...
Kolego mariuz muszę cię przeprosić, niechcący usunąłem formułę z komórki Y i dlatego Twoja formuła nie chciała mi zadziałać. Twoja formuła działa jak najbardziej poprawnie. Dzięki wielkie. Kolego adamas_nt twój sposób jest też dobry i z takiego do tej pory korzystałem jednak plik w którym chcę zastosować formulę jest bardzo mocno rozbudowany i posiada...
Można - popatrz jak wygląda reguła... po to dałem kolorowanie by się wyróżniały. Ważne jest ustawienie formatowania komórek z datą na format Data.
Właśnie tak teraz zapisuję że kolejne wartości są oddzielane znakiem tabulacji. Problem w tym że OpenOffice ma z tym problemy a w dodatku nie mozna np. kolorowac komórek. Szukałem bibliotek ale wszystkie były niedopracowane.
jeżeli to co napisałem w arkuszu jest zbyt proste do zrobienia i na bardzo małym poziomie zaawansowania Był taki dowcip: Facet oburza się na mechanika samochodowego - za jedno puknięcie młotkiem 1000 zł ? za co ? Mechanik: za to, że wiedziałem gdzie puknąć :D Co do Twojego skryptu to założony efekt 922999 masz w załączniku 923000 A dodatkowe pomysły...
Spróbuj formatowania warunkowego wg takiego wzoru: Mam jeszcze jedno pytanie - jeżeli formatowany obszar nie znajduje się w pierwszym wierszu, to niestety funkcja zaczyna szwankować. Jeśli obniży się o jeden wiersz, "kolorowanie" rozpoczyna się od komórki nad pustą, a nie pod. Jeżeli zaczniemy formatowanie jeszcze niżej, np od wiersza 10, to wypełniane...
wielkie dzięki, pierwszy wariant jest OK :) Dodano po 3 zna się może ktoś z Was na zaawansowanym formatowaniu warunkowym ? chodzi mi o to, że w kolumnie A mam pewną sumę a w kolumnach od B do G mam rożne wartości i chciałbym żeby w momencie kiedy suma wartości z przedziału B:G przerkowczy wartość z komorki A to żeby od momentu jej przekroczenia komórki...
Witam, 1.Chciałby zrobić formatowanie warunkowe dla komórek HB,AE oraz AD i HC. Jeżeli, któraś z tych komórek będzie mieć wartość <0,5 to wtedy wiersz kolorowany jest na dany kolor w komórce poziom 2.Formatowanie HB i AE HB >=1,5 AE>= 2 HB >=1 AE >= 2 HB >=2 AE >= 2 HB >= 0,5AE >= 2 - wszystko w jednym kolorze Chodzi mi o...
ylo zaznaczone tylko 6 bo tyle jest par Prawdopodobnie chodzi o coś takiego: [syntax=vb]Sub FindUniq() Dim a, b As Byte Dim r As Range Dim re As Range Dim maxIndexA, maxIndexB, aa, bb, bc As Integer a = 2 'kolumna do zakolorowania b = 40 'kolumna śmieciowa Excel.ActiveSheet.Columns(a).Copy Columns(b) Excel.ActiveSheet.Columns(b).RemoveDupli... 1...
Sprawdź takie rozwiązanie. W momencie dowolnej zmiany w arkuszu uruchamiane jest makro updateOne z adresem komórki, która jest do pokolorowania. Jeśli masz czysty arkusz i chcesz wszystkie istniejące komórki pokolorować, uruchamiasz makro updateAll, które przespaceruje się po całym arkuszu. W momencie, gdy usuwasz zawartość komórki albo wprowadzisz...
W każdym przypadku przed tym powinny być znane maksymalnej wartości klatki do ukończenia zadania automatycznego Tak, wiem że najpierw musiałbym wyznaczyć komórkę o największej wartości, a potem wyznaczać mniejsze i potem je kolorować. Nie wiem jednak jak to wszystko "przenieść" na VBA.
Niech gdzieś na obrzeżach planszy w jednej komórce będzie ustawiona losowa liczba, a powiedzmy w kwadracie 100x100 komórek w lewym górnym rogu ta sama liczba. Teraz zaznacz sobie kilka komórek w tym kwadracie 100x100 (za trzymając ctrl) i potem weź format >> formatowanie warunkowe i ustaw zeby kolorowało na jakiś wybrany kolor te komórki jak wartość...
Jeśli system zero-jedynkowy, to zsumuj i jeśli >3, koloruj. Bez VBA zrealizujesz przez formatowanie warunkowe...
Witam ponownie, chciałbym prosić o pomoc przy wyszukiwaniu tagów html o zmiennych parametrach. Aktualnie posiadam taki kod: [syntax=vb] Sub Makro1() Dim kom As Range, i As Integer, j As Integer For Each kom In UsedRange i = 1 If kom.Value <> "" Then Do i = InStr(i, LCase(kom.Value), "<") If i = 0 Then Exit Do 'tu warunek opuszczenia /konieczny/...
Prot naprawdę wielkie wielkie dzięki :) nie widzę niestety pliku który załączyłeś (mam za mało punktów :P) ale masz racje z tymi 2 :) niepotrzebnie scaliłam komórki w tabele jako zmienną bo nie mogłam wykorzystać wtedy funkcji CountIf gdyż jest tylko do obiektów teraz mam 3 tablice w pierwszych 2 CountIf w trzeciej suma na końcu petla z if kolorująca...
Ale ja tu nie widzę pustych wierszy. W każdej komórce jest co najmniej kreska. Gdyby jeszcze wartości w kolumnie D były liczbami... Rozwiązaniem jest formatowanie warunkowe, gdzie kolorujesz parzysty wiersz zakresu. Żeby określić zakres potrzeba znaleźć ostatnią, zapisaną komórkę w kolumnie. Można spróbować z kolumną pomocniczą sprawdzającą długość...
Dzień dobry Wszystkim. Taki oto problem. Mam arkusz z tabelą (w załączniku). Chciałbym aby po wpisaniu w wierszu kolumny B, wartości większej niż zero w komórki zakresu D:O tego wiersza została wpisana liczba 9, pomijając ukryte kolumny (w tym przypadku kolumny L, M, N) oraz wypełnienie tych komórek zmieniło się na kolor zielony. I tak dla każdego wiersza....
https://obrazki.elektroda.pl/2598050500_... Witajcie, chciałabym napisać makro, które będzie łączyć komórki tak jak zrobiłam to ręcznie w przypadku E01 i E02. Z pomocą formuł wypełniają mi się pewne komórki, a następnie komórki zawierające jakiś tekst kolorują się na wybrane kolory. Ostatnim etapem jest złączenie ich w jedną całość...
Nie jest to sortowanie, ale może wystarczy ci dodać kolumnę z rankingiem. (w przypadku dwóch takich samych wyników będzie np dwóch z nr 3 ale nie będzie 4 tylko od razu 5) Można dodać jeszcze formatowanie warunkowe i "kolorować" złotem pierwsze miejsce sredbrem drugie i brązem trzecie. (tego nie ma w załączniku ale myśle że to nie problem) W innym przypadku...
p.s. Dzień dobry Panie Macieju, miło Pana widzieć, 01 lutego mi pan pomógł, to jest dalsza część sprawy. Tak, zgadza się, nazwa arkusza to liczba, niestety nie mogę tego zmienić bo nazwa arkusza czyli liczba zaczyna się od ,np. 104,105,120,147,148 itd. Ta liczba oznacza nr kontraktu. Wiem, że może to w przyszłości generować problemy. Sprawa wygląda...
Witam Czyli mam rozumieć że przy tak skonstruowanych danych ciężko zrobić cokolwiek sensownego ? Kolorowanie odpada ponieważ tylko te produkty powinny być zaznaczone w danej komórce które znajdują się w Arkusz1. To trudno ... przynajmniej się dowiedziałem że nie da się tego zrobić. Pozdrawiam
kurcze w pracy mam wersję 2007 i nie mogę żadnej frazy wpisać :/ Mało prawdopodobne :D , zaznacz dotychczasowy wpis i wtedy zacznij wpisywać swoją frazę :!: pole edycji Comboboxa i jego lista automatycznie się przestawi po pierwszej literze :D co należy zrobić , aby kolor danej komórki wyświetlił się w arkuszu "wyszukiwarka" w oknie "szt" Po prostu...
dzięki za podpowiedzi, zrobiłem od początku i zacząłem, właśnie od tej funkcji i dziwne ale zadziało. Nie ogarniam tego, ten nowy excell czasem ma jakies zacinki, niby robię to samo, a czasem nie wychodzi. A może mógłbyś mi podpowiedzieć, jakiej funkcji użyć, gdy chcę. aby wers po spełnieniu warunku, został przeniesiony do arkusza 2, zrobiłem że wers...
Przekroczenie miejsca na dysku nie powinno mieć wpływu na wewnętrzną strukturę arkusza. Ale wracając do oddania ludziom pliku do pracy na nim. Zauważ że niektórych formuł już nie masz bo ludzie zamiast skreślić datę po prostu ją wykasowali. Poniżej przykładzik z blokadą arkusza (blokada bez hasła) Można zmieniać tylko komórki z głównymi datami i określać...
Witam, potrzebuję makro do scalania wielu plików z danymi w jeden. Wszystkie skoroszyty do scalenia znajdują się w jednym folderze, dane do scalenia są zawsze w pierwszym arkuszu i mają jednakowe obszary. Jako, że nie bardzo radzę sobie z VBA, skorzystałem z dostępnego makra, które później lekko zmodyfikowałem do własnych celów. Jednakże pozostało mi...
Dziękuję za pomoc. Mam tylko pytanie Z tego co widzę kod porównuje wszystkie pola z arkusza OUTPUT do kolumny D z pliku 1 671 913 2.xlsx Czy można zrobić, żeby porównywał tylko pierwszy wiersz z kolumną? Na przykład jak D2=EW2, D3=EX2, D4=EY2 i tak stopniowo powinno przechodzić komórka po komórce aż do końca wiersza i kolorować na zielono lub gdy coś...
Masz tutaj chyba to o co Ci chodziło.Możesz wybrać kolorowanie całego wiersza lub jego części. [syntax=vbscript]Sub kolor() Dim i As Integer 'Komórki od A1 do np.A10 For i = 1 To 10 If Cells(i, 1) = "" Then 'Kolorowanie całego wiersza Range(Cells(i, 1), Cells(i, 1)).EntireRow.Interior.Color = RGB(255, 255, 0) 'Kolorowanie wiersza przez określoną liczbę...
Mam taką formułę =JEŻELI(LUB(LICZ.WARUNKI(A... Szybka odpowiedź Zastąp frazę „NOK” konstrukcją, która zwraca „1” lub „2” zależnie od tego, który z dwóch liczników jest różny, a „OK” gdy oba się zgadzają:...
I jeszcze jedno – dlaczego w makro – kolory nie zaznacza wszystkich takich samych komórek tylko niektóre Dlaczego uważasz że nie zaznacza takich samych? Podaj przykład na twoich danych. Tylko że miej na uwadze że dla funkcji CountIf() każdy znak ma znaczenie. Nie tylko wielkość litery ale i ... a nawet zwłaszcza spacja. Jest różnica między...
kolorowanie komórek excel kolorowanie wierszy kolorowanie makro
wyłączniki bezpieczeństwa podłączenie wtyczka angielska blaupunkt pobór prądu
skrzynka bezpieczników corsa briggs stratton
Zepsuta elektroda jonizacyjna w kotle gazowym: objawy i rozwiązania Brak sygnału dźwiękowego w Tefal Dual Easy Fry i Grill