Witam [syntax=vb] Sub myRGB() For r = 1 To 50 Cells(r, 4).Interior.Color = RGB(Cells(r, 1), Cells(r, 2), Cells(r, 3)) Next End Sub [/syntax]
[syntax=vbnet]Sub test() For Each i In Range("C3:AE60") If i.Value = "R" or i.Value = "C" Then i.Interior.ColorIndex = 4 Next End Sub[/syntax]
Witam, spróbuj tak (w Excel 2007 lub nowszym): Zaznacz komórkę z datą następnego badania, kliknij: formatowanie warunkowe -> reguły wyróżniania komórek -> większe niż... -> w okienku, które się otworzy wskaż komórkę w której masz obecną datę i dopisz "+31" (bez cudzysłowów) lub taką wartość dni ile potrzebujesz. Czyli w tym okienku będziesz miał np....
To w ogóle nie jest możliwe, ani formatowaniem niestandardowym, ani za pomocą VBA. Za pomocą formatowania niestandardowego ( kodem formatu) można nadać kolor tylko całej liczbie, a nie poszczególnym cyfrom, przy czym mogą to być różne kolory czcionki w zależności od wartości liczby (ale cała liczba musi mieć ten sam kolor czcionki). Za pomocą VBA można...
Tak jak kolega powyżej napisał. Menu Format> Formatowanie warunkowe... , a następnie tak należy wypełnić wszystkie pola: http://obrazki.elektroda.net/61_12284089...
Skoro już VBA, to można rozwinąć funkcję "LiczKolor" do "LiczKolorJeżeli", Np [syntax=vbscript]Function LiczKolorIf(zakres As Range, wzor As Range, var As Range) Dim kom As Range Dim suma As Double Dim kolor As Integer suma = 0 kolor = wzor.Interior.ColorIndex For Each kom In zakres If kom.Interior.ColorIndex = kolor And kom.Value = var.Value Then suma...
Należy oprogramować zdarzenie SheetChange skoroszytu. Wykrywa ono równocześnie, w którym arkuszu i w której komórce nastąpiła zmiana. Kod: [syntax=text]Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If Target.Address <> "$F$6" Then Exit Sub If IsNumeric(Target) And Target > 0 Then Sh.Tab.Color = vbRed Else Sh.Tab.Color...
Wystarczy zwykła pętla z wieloma warunkami. Zobacz przykład (funkcja VBA) w [url=http://www.elektroda.pl/rtvforum/to... temacie.
A kopiowanie formatowania nie wystarczy? Pytanie jest bardzo nieprecyzyjne. Kiedy to kopiowanie miałoby nastąpić - na życzenie, po zaznaczeniu komórek do skopiowania, czy automatycznie - gdy zmienia się coś w komórce (to jest trudniejsze)? Poza tym, czy komórka zawiera coś oprócz tego koloru, co ma być pominięte przy kopiowaniu? Czy chodzi tylko o kolor...
I może warto zwrócić uwagę, że kolory czcionki poszczególnych znaków i słów można zmienić tylko w stałej tekstowej. Nie można w ten sposób modyfikować liczb ani wyników formuł. W tym drugim przypadku może być tylko jeden wspólny kolor czcionki dla całej komórki.
A bez makr, skryptów itp itd się nie da? ;) Niestety, nie. Możesz użyć funkcji użytkownika podobnej do tej Function LiczKolory(zakres As Range, kolor As Integer) For Each kom In zakres If kom.Interior.ColorIndex = kolor Then LiczKolory = LiczKolory + 1 End If Next End Function Wklejasz do modułu standardowego i używasz jak funkcji Excela tzn...
Reguła dla koloru zielonego: [syntax=text]=($D4="Komplet")*($F4="Komp... dla koloru czerwonego: [syntax=text]=($D4="Brak")*($F4="Brak")*... pomarańczowy jest dopełnieniem, więc może być reguła [syntax=text]=PRAWDA[/syntax]umieszczona jako ostatnia. Można też zastosować...
To zależy jaki użyjesz jako Kolor1. Prościej będzie przerobić funkcję, gdzie drugim argumentem będzie komórka "wzorcowa". Np [syntax=vb]Function LiczKolory(zakres As Range, kolor As Range) idCol = kolor.Interior.ColorIndex For Each kom In zakres If kom.Interior.ColorIndex = idCol Then LiczKolory = LiczKolory + 1 End If Next End Function[/syntax]Użycie...
Np. takie uzupełnienie: [syntax=vbscript]If Kolor = r.Font.Color And IsNumeric(r.Value) And Len(r.Value) > 0 Then[/syntax]
Sprawdź w załączniku, czy o to chodziło. Dopisałem procedurę Workbook_Open, która tworzy kształt w arkuszu Arkusz1 (nazwa kodowa) przy otwieraniu skoroszytu (jeśli go nie było) lub zmienia kolor na biały (jeśli był). Dopasuj sobie jeśli ma być w innym arkuszu.
Cześć jak najbardziej jest to możliwe na google sheets :) Zakładając, że rozumiem, czego potrzebujesz. Klikasz w komórkę A3 -> menu Formatuj -> Formatowanie warunkowe -> Reguły formatowania -> Niestandardowa formuła to -> =JEŻELI(A3=C3;1) lub =IF(A3=C3;1) Pozostanie zmienić kolor tła i pododawać pozostałe reguły. https://obrazki.elektroda.pl/4684130600_...
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.
1. Zmiana koloru nie jest zdarzeniem, więc musisz uruchamiać makro (w ostateczności można wykorzystać 'SelectionChange', ale ma to w tej sytuacji swoje minusy) Następna sprawa, to skąd Excel "ma wiedzieć" jaki kolor był przed zmianą? Potrzebna byłaby tabelka w dodatkowym arkuszu kolor>zakres obszaru wydruku. 2. Myślę, że wystarczy zwykłe JEŻELI(Arkusz1!suma>160;Arkusz1!suma-160...
Freebsd Ten link mówi o zmianie koloru komórek w której już znajdują się wartość. Mnie interesuje zmiana koloru czcionki w komórkach kolumny AP Która pobiera dane z komórek kolumny AK. Dokładnie tak jak chcesz: używasz "formatowanie warunkowe" i następnie "reguły wyróżniania komórek" z Narzędzi Głównych, a nie formatowanie dostępne z prawego przycisku...
zerknij na to rozwiązanie Funkcja transponuj, a w formatowaniu warunkowym kolorem białym odznacza wartości na kolor biały. Pozdrawiam
W drugą stronę jak najbardziej. Ale jeśli kolor wypełnienia wstawiasz ręcznie z palety (nie w wyniku formatowania warunkowego), to pozostaje makro lub funkcja użytkownika (też w VBA) z wykorzystaniem Interior.ColorIndex zakresu. Excel nie ma wbudowanych funkcji odwołujących się do właściwości formatowania komórek.
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...
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...
Nie piszesz, której wersji Excela używasz, mam nadzieję, że co najmniej 2010. Bo od tej wersji dostępna jest właściwość DisplayFormat, która rozwiąże Twój problem. Tylko przykład dobrałeś niefortunnie, bo Twój kod działał w obu arkuszach: w jednym były dwa formatowania zwykłe, a w drugim dwa warunkowe, a Twój kod porównuje formatowania zwykłe, które...
Zerknij na mój pomysł. Sub sumuj_ilosc_komorek_w_zaznaczeniu(&#... '(c) "fascynat" suma = 0 kolor = Val(InputBox("Wprowadź nr koloru", "Definiowanie szukanego koloru tła komórek")) For Each c In Selection If c.Cells.Interior.ColorIndex = kolor Then suma = suma + 1 Next MsgBox "Ilość znalezionych...
Moja propozycja: odwróć to. Tzn zastosuj formatowanie warunkowe z wypełnieniem kolorem. Wstawiasz (przez przeciągnięcie) powiedzmy jedynki, które łatwo policzyć =LICZ.JEŻELI(A1:A40;"=1") lub zsumować, wynik można podzielić przez dwa, a komórki "same" sczerwienieją lub zzielenieją, jeśli wstawisz liczbę Np 2, którą łatwo policzyć a wynik podzielić przez...
Jaka rola "!" przed 'K:K' ? często mi się to wiesza Jak masz Excel >= 2007 to K:K jest ~1000000 wierszy Nie wystarczy K1:K2000 ?
A byłem pewny że załapałeś zasadę. :( W czym konkretnie masz problem? Stwórz na chwile w bocznej komórce odpowiednio liczącą formułę tak by dawała w wyniku prawdę lub fałsz. Zgodnie z twoją koncepcja po 30 dniach ma być "prawda" więc wykorzystaj jeżeli, dziś() itd. Sprawdz czy działa w tej komórce. Następnie skopiuj całą formułę i wklej do formatowania...
... ale nie o to mi chodziło. Ja chcę aby sumowało (wartości) tylko np. komórki z niebieskim tłem i żółtą czcionką ... Jak piszesz tak cię rozumieją - czy w tym zdaniu powyżej zabrakło "nie", czy może o "tylko" jest za dużo ? ... chcę aby sumowało (wartości) (?...?) np. komórki z niebieskim tłem i żółtą czcionką, i osobno z fioletowym tłem i żółtą...
Temat był wałkowany kilkakrotnie na forum. Wystarczy wcisnąć szukaj. W formatowaniu warunkowym musisz wpisać warunek który jeżeli zostanie spełniony "tak i tak" sformatuję komórkę czyli np zmieni jej barwę tła. Warunek: = (komórka z datą < DZIŚ()+90) Jeżeli spełniony włącz pomarańcz W przykładzie masz dwa warunki - czerwony dla dat minionych.
Rozumiem, że masz świadomość, że na samej liście rozwijanej kolorów nie będzie widać, bo taka już jej uroda. Natomiast można ustawić kolor za pomocą makra zdarzeniowego Worksheet_Change na podstawie wyboru z listy. Zakres komórek wzorcowych ma nazwę "Wzornik". Sprawdzanie poprawności trzeba ustawić ręcznie, pamiętając o wyłączeniu alertów. Komórki ze...
Migać to nawet w 2007 nie będzie ale może się zmieniać kolor komórki lub czcionki lub (nowość w 2007) wykorzystuje się ikonki np w stylu świateł sygnalizacji lub strzałek których kolor /pochylenie strzałki jest zależny od wartości komórki. Jednak żadne ze wskazań nie mruga.
Widzę, że dopracowałeś trochę arkusz. Dopisałem funkcje która zmienia kolor wypełnienia komórki w przypadku "przeterminowania" zadania. Sprawdzane pod kątem niedotrzymania terminu są tylko zadania niewykonane (oznaczone czerwoną czcionką). W arkuszu jest skoroszyt z kodami kolorów, jak otworzysz makro są tam komentarze i jest napisane którą liczbę trzeba...
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...
Tabela 20x2 - 2 kolumny: 1-klasa, 2-ocena -jak jednym formatowaniem warunkowym ustawić kolor dla komórek reprezentujących max. ocenę w poszczególnej klasie?
Witam aby w kolumnie D dodało ilość danego produktu do istniejącej już liczby nawet, jeśli inny kolor i kod2? aby wpisało do kolumny b i c (arkusza 1) wartości z odpowiedniego wiersza z arkusza 2 tak samo?
możliwość modyfikacji userform np zmienić nazwe w pasu okna lub zmienic jego kolor itp? Możesz odwoływać się do prawie wszystkich właściwości widocznych w okienku "Properties" formularza przy dowolnym zdarzeniu (kontrolek włącznie). Np Private Sub UserForm_Initialize() With UserForm1 .BackColor = RGB(255, 255, 0) .Caption = "kehn"...
Mam rozwiązanie. Niech klawisz "0" nazywa się "C0" wtedy: Private Sub C0_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) C0.BackColor = &H80000010 ' Zmieniamy kolor przycisku End Sub Dla klawisza "1", który nazywa się "C1" Private Sub C1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer,...
Korzystam z podobnego rozwiązania ale potrzebne jest też formatowanie warunkowe (aby zaznaczać tylko zakres wiersza). Zaznaczanie aktywnego wiersza za pomocą formatowania warunkowego i VBA 1. Zaznaczanie aktywnego wiersza Definiujemy nazwę: AktywnyWiersz=0 Wpisujemy formułę w VBA w sekcji Worksheet - SelectionChange Private Sub Worksheet_SelectionChange(ByVal...
Cześć Marku! Plik działa wyśmienicie, jest znacznie więcej niż chciałem, o tym aby rejestrować PW i PZ nawet sobie nie pomyślałem a tak będe wiedział kiedy co weszło i wyszło! REWELACJA. Powiedz mi taką rzecz, czy dałoby się w zakładce technologia zamienić kolumny z wierszami tak aby w łatwiej było wklejać z BOMA materiał i ilości. Druga rzecz czy...
Mam problem z dokończeniem makra w vba, mianowicie chce wyszukać wyrazy (znaczniki html) wpisane do komórek w excel-u, w całym arkuszu. Arkusz posiada 5 kolumn i około 6000 wierszy. Po wyszukaniu wyborderować i zmienić kolor ich czcionki na czerwony. Zdaje się, że źle się do tego zabierasz. Na razie pętla mieli A1 i na oko będzie mielić bez końca (pętla...
Scalenia nie pasują do rozwiązania, więc "rozScaliłem". Możesz ew. w wierszu pomocniczym przepisać nagłówek /WARTOŚĆ(.../ Dla ułatwienia zmieniłem format godzin w tabelce (06 zamiast 6, itd) Odczekałem do 11:00 i działa. Reguła musi być formułą, nie kombinuj z wbudowanymi. Jeśli ma kolorować cała "trójkę", to skopiuj do "sąsiadów". Np w T6 i V6- formuła:...
Proponuję zmianę formuły. W H5 wpisz i przeciągnij w dół: =JEŻELI(G5-DZIŚ()<0;"PO TERMINIE";JEŻELI(G5-DZIŚ()<=60;"WYKON... SERWIS";"JESZCZE CZAS")) Formatowanie warunkowe nie jest trudne w przypadku tekstu. Zależy jakiego masz Excela. Zaznacz kolumnę H. W E2007 klikasz tylko w kolejne pola kreatora. W E2003 warunkiem będzie ciąg tekstu ujęty w...
1. #N/D! - da się wyeliminować przez dodanie na zewnątrz formuły JEŻELI.ND albo JEŻELI.BŁĄD. Obie działają podobnie do funkcji JEŻELI, więc nie powinieneś mieć z nimi kłopotów 2. Da radę przeszukać kilka arkuszy jednocześnie - wystarczy w zakresie podać adresy zakresów w poszczególnych arkuszach rozdzielone średnikami, np. Arkusz1!C1:C3;Arkusz2!B1:B3,...
lub =MOD($A1;2)=0 - jak 30, 31, 1, 2
1. Załóż filtr w oryginalnej tabeli (niepuste) -> zaznacz całą tabelę i wtedy dopiero kopiuj dane . Może nawet lepiej wklejać "tylko wartości" niż dane z pełnym formatem każdej kopiowanej komórki. Zrobisz to w jednym ruchu zamiast korzystać z pętli (2000 razy). Po nagraniu makra można edytować zaznaczony zakres tak, żeby najlepiej nam odpowiadał. 2....
gdzie przykladowy plik?
Formatowanie warunkowe - reguły wyróżniania komórek
Brak odzewu może być spowodowany kiepskim uzasadnieniem sensu wykonywania takiej operacji. Zwykle kontrolki AciveX zaznacza się (w trybie projektowania) trzymając Ctrl, kopiuje (ctrl+c) i wkleja (ctrl+v) w wybrany arkusz, lub kopiuje cały arkusz (ppm). Dlaczego chcesz to zautomatyzować? Ile takich operacji wykonujesz? Czy oprócz przycisków w arkuszu...
Cześć! Czy przy pomocy formatowania warunkowego w Excelu można otrzymać następujące warunki? 1. Gdy w komórce B1 znajduje się tekst "Anulowano" to pokaż w komórce A1 tekst "ND". 2. Jeżeli w komórce C1 znajduje się tekst "Korekta" to komórka A1 podświetla się na czerwono - i to zrobiłam i działa. I teraz chciałabym do tego dołożyć taki warunek: Gdy w...
kolor excel excel kolor komórki excel liczenie kolor
kółka metalowy lexia sterowniki interfejsu mostek l293d
wentylatory rx6600 szpiegowanie telefonu
Kod CQC12134071193 w soundbarze Philips TAB8805/10 Yamaha AX-392 – samoczynne wyłączanie wzmacniacza, ochrona, naprawa, typowe usterki
