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...
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...
A zrób tak: zaznacz WSZYSTKIE komórki (CTRL+A), prawym, Formatuj, Ochrona ODZNACZ "Zablokuj". Teraz zaznacz chronione komórki, zaznacz "Zablokuj" - i ew. "Ukryj", to tylko ukrywa formuły... Narzędzia->Ochrona->Chroń arkusz, zahacz co chcesz lub pozostaw domyślne dwa pierwsze, restrykcyjne ograniczenia.
a ja by to zrobił tak [syntax=vb]Sub Makro1() Set my = Sheets(1).Shapes("Prostokąt 1") Set my2 = Sheets(1).Shapes("Prostokąt 2") Set my3 = Sheets(1).Shapes("Prostokąt 3") With my.Fill .Visible = msoTrue .ForeColor.RGB = RGB(0, 0, 0) End With With my2.Fill .Visible = msoTrue .ForeColor.RGB = RGB(255, 255, 255) End With With my3.Fill .Visible = msoTrue...
Źle Ci podałem, bo stała 'wd' nie jest znana z poziomu Excela, lecz Worda. To i tak nie ma znaczenia w tym przypadku, bo czarny i tak ma wartość 0. Natomiast zmień linię : Nie wiem czy to coś zmienia ale dane są w tabelce w excelu To gdzie w końcu chcesz zmienić kolor?
https://obrazki.elektroda.pl/6208181000_...
Wystarczy zwykła pętla z wieloma warunkami. Zobacz przykład (funkcja VBA) w [url=http://www.elektroda.pl/rtvforum/to... temacie.
Masz tam dwa rodzaje makr - jedna grupa tylko zmienia kolor tła, druga grupa zmienia kolor tła i dodaje tekst. Nie wiem, czy chcesz ograniczyć działanie wszystkich makr do kolumn C i L, czy tylko tych, które wpisują tekst. W każdym razie do każdego z makr, które mają mieć ograniczony zakres dopisz na początku (pod nagłówkiem) takie 3 wiersze: [syntax=vbnet]...
potrzebuję makro ktore pobiera kolor przypisany do danej wartości już w innym arkuszu z danymi.
Moje makro wyszukuje i koloruje tylko samą kropkę :?: :not: Jeśli chcesz zmienić kolor czcionki w całej komórce zawierającej "." to zastosuj kod :spoko: [syntax=vbscript]Sub Koloruj() Dim zakres As Range Dim kom As Range Set zakres = Selection For Each kom In zakres.Cells If InStr(1, kom.Value, ".", 1) > 0 Then kom.Font.ColorIndex = 1 End If Next End...
Zrobiłem bez makr. Może ktoś Ci przerobi na makro. Łącze do formantu w komórce bieżącej, formatowanie niestandardowe ukrywające wpis ;;; formatowanie warunkowe określające kolor. Niestety łącza nie dają się kopiować, bo są zawsze adresami absolutnymi, nawet jeśli się je zapisze bez dolarów.
Można to prosto zrobić na funkcjach + formatowanie warunkowe, jak zaproponował adamas_nt . Gdybyś jednak upierał się przy VBA - też można: [syntax=vb]Private Sub CommandButton1_Click() Application.ScreenUpdating = False ost_data = Cells(Rows.Count, 2).End(xlUp).Row 'wyczyszczenie starych danych With Range(Cells(1, 3), Cells(Rows.Count, Columns.Count))...
zakomentuj w całem programu podobne [syntax=vb] Application.Run "'Stale i stopy - obliczenia.xls'!ATEST.ATEST" Application.Run "'Stale i stopy - obliczenia.xls'!STAL.STAL" Application.Run "'Stale i stopy - obliczenia.xls'!ZAPIS.ZAPIS" [/syntax] Sprawdź czy Excel się zawiesza . rozkomentuj, jeden przez jeden i Sprawdź. Ponadto przyciski na pierwszym...
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...
Jeśli jest to potrzebne dla jednego lub niektórych skoroszytow, może makro
Bo jesli dodasz dwie kolumny do każdego działu, to w makrze Kopiuj() musisz poprawić krok wyszukiwania z 4 na 6: [syntax=vb]For kol = 1 To 255 Step 6[/syntax] i, ewentualnie, tam gdzie teraz kopiujesz komórki od C do E zwiększyć od C do G i kol+5: [syntax=vb]Worksheets("Arkusz1").Range("... & Selection.Row & ":G" & Selection.Row).Copy .Range(.Cells(wiersz,...
[syntax=VBA] Private Sub Worksheet_Change(ByVal Target As Range) If Cells(3, 2).Value = Cells(1, 1).Value Or Cells(3, 2).Value = Cells(2, 1).Value Or Cells(3, 2).Value = Cells(3, 1).Value Or Cells(3, 2).Value = Cells(4, 1).Value Then Cells(3, 2).Interior.ColorIndex = xlNone Else Cells(3, 2).Interior.ColorIndex = 3 End If End Sub [/syntax]
Cześć, staram się zrobić makro które po skopiowaniu wartości z jednego arkusza do drugiego poza skopiowaniem treści zmieni również kolor czcionki. Makro, które mam: [syntax=vbscript]Sub aaa() Dim Ark As Worksheet Set Ark = ThisWorkbook.Worksheets("1") With Ark If .[A1] = "" Then Sheets("1").Range("B1").Copy Destination:=Sheets("2").Range("C1") Sheets("1").Range("B2").Copy...
Zrobiłem dla takiego przykładowego "blabla". O to chodzi?
Od czego zależy kolor kwoty?
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.
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.
Prosiłem o plik Excela, a nie o obrazek. Pytałem, jak to ma działać? Czy to makro ma reagować każdorazowo jak zmieni się kolor (rozumiem, że sprawdzana ma być kolumna C), czy ma być wywoływane okresowo (np. przyciskiem) i ma sprawdzać całą kolumnę pod kątem pokolorowanych duplikatów? Czy może wystąpić taka sytuacja, że jakiś wpis ma już kolor i ten...
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...
Nie pochodzi z formatowania warunkowego. Wcześniej mam napisane makro, które zaznacza mi na kolor czerwony duplikaty oraz na kolor żółty puste pola w całym arkuszu danych. Teraz zadanko polega na tym, aby sprawdziło zaznaczone obszary kolorem wypisało w postaci tekstu w kolumnie wyznaczonej np: K tylko musi być po wierszach :) To makro które wstawiłem...
Witam, szukam kodu ktory pozwoli mi na znalezienie pustych wierszy w arkuszu i zaznaczenie ich na szary kolor z gory dziekuje za pomoc
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...
Sprawdź dobrze, bo pisane w przerwach między obieraniem ziemniorów i marchewy, i mogą być błędy. 919204 Stałe, zmienne i kod na tyle czytelne, że od razu zrozumiesz intencje. Kody z ich wartościami na oddzielnej zakładce, makro uruchamiane zmianą zawartości komórek w określonym zakresie (stałe dla zakresu początkowego i końcowego), zdefiniowanym w module...
Dziękuję za Wasz czas. Podpinam plik (dzięki za sugestię). Wynikową ma być: dla przykładu idąc od AD3+AD4, AE3+AE4 (AD jest puste, więc powinien pominąć te wartości). W zapisie powinien dodać dwukropek po AD3 i przecinek po AD4. Kolor: biały,
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?
"Podświetlam" tzn zmieniam kolor czcionki? Nie ma tu nic typu "Selection", natomiast warunkiem jest kolor wypełnienia =Range("L4"). Rozumiem, że makro ma sprawdzać co już jest skopiowane, kopiować tylko wybrane (jak? kolor tła, zaznaczenie) rekordy i zmieniać kolor czcionki na jakiś inny niż poprzednio. Można warunkować kolor na podstawie ostatniego...
W arkuszu mam tabele z kilkoma kolumnami z wartościami komórek =1 bądź pustymi. Jak stworzyć makro, które zmieni kolor wypełnienia komórek, jeśli w zakresie kolumny wystąpią kolejno min 4 powtórzenia komórek o wartości =1. (pomiędzy ciagiem "1" nie może być pustych komórek)
Witam Rejestratorem nagrałem poniższe makro wstawiające formatowanie warunkowe. Chciałbym jednak, żeby to makro sprawdziło warunek i ewentualnie zmieniło kolor komórek a nie wstawiało formatowanie warunkowe, ponieważ formatowanie warunkowe zastosowane nadmiernie, zamula. Chodzi o to, że makro miałoby sprawdzić czy wartość w komórce "C81" podzielona...
Oto projekt. Początkowo Pan otworzyć i odczytać z makrami.(na otwarcie i zamknięcie książki) i poprawi stałych (bo nie mogę odgadnąć nazwy plików). Następnie skopiuj makra do prawdziwych plików Interesuje mnie jak długo potrwa pracy makro, ponieważ kopiowanie w komórki z formatowaniem (kolor, czcionki) zajmuje znacznie więcej czasu niż w komórki niesformatowany....
że makro odnalazło brakujące liczby, dodało wiersz lub wiersze i dodany wiersz lub wiersze zrobiło na kolor zielony I gdzie to makro?
Posiadam makro zmieniające kolory losowo a potrzebuje tylko dwa kolory w my Buton np; biały i czarny. i dobrze by było aby po zamknięciu Excela kolor wracał do początkowego np białego. PROSZE O POMOC W ZNALEZIENIU ROZWIAZANIA Znalazłem takie makra- PIERWSZE TWORZY MyButton1 [syntax=vbscript]Sub Creator() Dim shp As Shape Set shp = ActiveSheet.Shapes.AddShape(1,...
Dobry wieczór, Robię w Excelu grafik, który ma być tak ograniczony, aby możliwe było wpisanie jedynie liczb od 1 do 12 oraz litery S, R i W. To byłam w stanie zrobić funkcjami wpisanymi w poprawność danych. Dodatkowo komórki mają być ograniczone pod względem koloru, tzn. mogą być jedynie określonego koloru zielonego, żółtego, białego oraz 2 odcieni...
Uzależnić wartość komórki Cx od warunku dla jakiego komórka Ax zmienia kolor. Z tym że jeżeli komórka Ax ma kolor wstawiany ręcznie (zaznaczam że NIE WARUNKOWO) potrzebne będzie makro zliczające kolory (czy jakoś tak) które było prezentowane kilkakrotnie na forum.
czuwające stale, tzn. dopóki nie wyłączę próbuję w tym momencie zrobić to w programie AutoHotKey, ale jeszcze tego nie rozgryzłem - chociaż na pewno się da w prosty sposób (prosty dla kogoś kto zna ten program albo zna się na programowaniu - jest tam np. funkcja If PixelExist, gdzie można określić położenie X,Y pixela i jego kolor, a później wykonać...
Zliczanie komórek o innym kolorze tła jest możliwe wyłącznie makrem. Jednak nawet makro nie obliczy kolorów jeżeli są one zmienione formatowaniem warunkowym. W makro, w twoim przypadku, trzeba by było zliczać tak samo jak w warunku formatów. Proponuje ci, w przypadku rozwiązania zastosowanego przez kolegę adamas_nt , w jakiejkolwiek komórce wpisać =LICZ.JEŻELI(G1:I3;"<="&C5)...
Witam, byłbym wdzieczny za pomoc w zrobieniu makra do pliku, a mianowicie w arkuszu w kolumnie B sa liczby. Jeśli któraś z tych liczb spełnia określony warunek jest przez pracownika zmieniana na kolor czerwony. Teraz potrzebowałbym makra w osobnym pliku, który weryfikował by tą kolumnę i jeśli byłyby w niej liczby oznaczone kolorem czerwonym, to kopiował...
Witam, mam następujący problem. Z VBA jestem że tak powiem początkującym. Mam w arkuszu w którym zależałoby mi żeby zrobić formatowanie warunkowe. Jak już wiadomo excel 2003 ogranicza to do 3 warunków. A potrzeba ich zrobić dużo więcej. Mianowicie chciałbym żeby po sprawdzeniu komórki i sprawdzeniu jej wartości i powiedzmy jeżeli w danej komórce będzie...
Hejka Mam następujący problem do rozwiązania : Potrzebuję pomocy w stworzeniu makra które będzie zaznaczało 10% występujących wierszy z arkusza, który został już wcześniej pofiltrowany i następnie te pozycje zakoloruje na jakiś kolor. Makro więc po kolei musi : określić ile wierszy występuje w arkuszu, obliczyć z tej liczby 10%, zaznaczyć te 10% wierszy...
Witam serdecznie! Mam zakres komórek w wierszu, np. A1:A10, które domyślnie posiadają białe tło. Pracując w arkuszu kolor tła będzie zmieniany na, powiedzmy, niebieski i z powrotem na biały. Potrzebne jest mi makro, które zliczy ile razy dokonano zmiany koloru na niebieski, w całym wierszu. Co więcej, przydałby się przycisk "zapisz", do zatwierdzania,...
Dzięki. Mam jeszcze jedno pytanie: ma formularz wyświetlający oceny o uczniu, mam w nim zrobiony przycisk szukaj ucznia, gdy uczeń nie ma ocen wyświetla się że nie znaleziono rekordu. Nie szłoby zrobić to tak aby ten komunikat brzmiał uczeń nie ma ocen? Idzie zrobić takie makro?
Czy to da się w ogóle zrobić? Da się. Z tym, że nie ma wbudowanych funkcji Excela formatujących komórki. Trzeba napisać makro. Mały przykład w załączniku. Paletę ściągnąłem[url=http://konspekt.eu/?palet... stąd. .
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:...
Rzeczywiście kilka kroków w dół robi czerwone litery :) Makro jest uruchamiane raz i kończy działanie mrugnięcie oka później, więc są dwie opcje do wyboru: - wpisywać i nie przejmować się kolorem, potem zaznaczyć całą kolumnę i ustawić dla wszystkich wpisów kolor czarny, potem uruchomić jeszcze raz makro. albo zmienić makro, które również dla "niesparowanych"...
Nie wiem jak zmieniasz miesiąc i gdzie jest on podany. Musisz wykryć zmianę miesiąca, po zmianie miesiąca wywołujesz makro które ustawia im kolor kolor biały, potem w drugim kroku ponownie sprawdzasz wartości w komórkach w kol. M, jeżeli jakaś ma N to kolorujesz cały wiersz. Drugi krok wykonujesz w pętli. To chyba będzie najprostsza i najszybsza metoda.
Ponieważ pisałem że nie pomagam na PW więc tu zamieszczam przykład który jeszcze dostosuj do siebie. W środku jest kod przedstawiony przez kolegę pitemxa dla jeszcze dwóch kolorów. Podobnie dla tła Jak wiesz już jaki jest "kod grubej czcionki to zapewne sobie poradzisz w przekształceniu kodu. Jak nie wiesz to nagraj makro i popatrz na nagrany kod. "wyłuskaj"...
W excelu jest taka funkcja w Narzędzie>Makra>Rejestruj nowe makro Jak użyjesz tej funkcji, będziesz mógł zmienić sobie kolor tła ręcznie a następnie w zarejestrowanym makrze zobaczyć jak to wykonać za pomocą makra, podobnie też z innymi rzeczami. Pozdrawiam Sławek
Np coś takiego: Function LiczKolorNaPrawo(StartCell As Range) Dim A As Range Dim i As Long For Each A In Range(StartCell.Offset(0, 1), Cells(StartCell.Row, 256)) If StartCell.Interior.ColorIndex = A.Interior.ColorIndex Then i = i + 1 Next A LiczKolorNaPrawo = i End Function
Jeżeli Twoje założenia są prawidłowe (np. nie mogą się wzajemnie wykluczać) to oczywiście można takie makro wykonać. Nie ma znaczenia co kolorujesz i gdzie się to znajduje. Wystarczy zaadresować komórkę i nadać jej kolor. Musisz opisać dokładnie z czym masz problem, bo na podstawie tego co napisałeś wcześniej zakładam że masz problem właśnie z adresowaniem...
Możliwe. Zrób pętlę po wszystkich komórkach i w każdej jeżeli kolor jest taki jak założyłeś (można podać RGB) to zmień kolor tła na inny. Spróbuj sam to zrobić. Makro mogę spróbować ci napisać jak znajdę trochę czasu (nie wiem kiedy) i nikt tego wcześniej nie zrobi.
Dziwne trochę, teraz iść do pracy, będę później. Tu jest mój Co robimy inaczej , że mój makro działa prawidłowo, u Ciebe nie ?
Witam, Mam pewien problem. Mam pewną bazę danych (47 rekordów). Czy istnieje makro które po wybraniu 2 rekordów będzie kolorowało każdy z nich na wybrany kolor ( zielony i żółty). Czy ktoś jest w stanie wykonać coś takiego? http://obrazki.elektroda.pl/8095189500_1... Przykładowo chcę wybrać wartość a i c i nadać im kolor żółty i zielony....
Witam, Nie mogłem znaleźć nigdzie satysfakcjonującej odpowiedzi na dręczący mnie problem makra. Mianowicie, prowadzę magazyn za pomocą excel. Wprowadzamy dane skanerem, ale przy wydawaniu, wyszukujemy konkretny numer etykiety poprzez Ctrl + F a następnie zaznaczamy kolorem żeby potem zastosować filtrowanie przez kolor komórki. Teraz chciałbym zrobić...
Zrób to rejestratorem makr. Nagraj krok po kroku co robisz.
Nie znam Visio, ale musisz w pętli dla kontrolki Shape zwiększać indeks ItemFromID(x) oraz kolor dla RGB(r,g,b).
Robie jak piszesz komórka A1, A2, A3 z wartościami 8, 4, 2 z tłem zółtym komórka A5 kolor żólty bez wartości uzywma funkcji =PRLSumColorValue(A1:A3;A5) w komórce F5 wskazanie 0 a chciałbym 14 Gdzie mogę robić błąd ? używam Excela 2010
Jestem bardzo początkujący w VBA, a potrzebuję do obróbki dokumentów makra, które dokona zaznaczenia w całym dokumencie wszystkich wystąpień fontu z danym formatowaniem, by można było usunąć teksty z tym formatowaniem. Robię to kreatorem makro, ale kreator nie nagrywa, w sekwencji: "Znajdź-> Znajdowanie zaawansowane->Formatuj->Czcionka->Kolor-...
Nie działa mi to :/ Widzę, że to zmienia kolor tylko tej komórki a pytanie jak zrobić żeby kolorowało zakres.
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,...
Mam Excela, który zawiera 20 000 wierszy. Excel jest wypełniony datami - celem makra ma być wskazanie 50 pozycji od początku listy (C;F) od wiersza 5 do 55 i ich pokolorowanie na jakiś kolor (ma to być wizualny dodatek). Po oznaczenia pierwszych 50 pozycji makro ma sprawdzić datę z komórki D5 i jeżeli komórka nie jest pokolorowana to ma pobrać datę...
Dzień dobry. Zwracam się z prośbą o pomoc przy kolejnym projekcie :) . Próbowałem coś porobić samemu, ale skutek mizerny z tego wyszedł. Nie bardzo umiem w VBA a niestety nie wszystko można załatwić formułami. W czym problem? Mam arkusz zawierający 6 komórek z listami. Nie każda zawiera pozycję "RAL" (numer koloru lakieru). W załączonym arkuszu dwie...
Moje makro: Dodano po 19 PRL funkcja zwraca 0, gdzie może być błąd: =LiczkolorTekst(zestawienie!A2:A500;3;"*...
Ale czy zwykłym formatowaniem warunkowym można zmienić kolor wielu komórek w zależności od jednej? Ja nie umiem tego zrobić. Gdyby się nie dało to zawsze można napisać makro.
Witam, moim zadaniem jest napisanie makra, które będzie porównywać dwie kolumny. Jeżeli dana wartość występuje w pierwszej kolumnie oraz w drugiej, to komórka, w której ta wartość występuje, zostanie oznaczona kolorem żółtym. Niestety moje makro działa w ten sposób, że przykładowo: w kolumnie A wartość "2910624111005 5000" występuje 1 raz, a w kolumnie...
Wszystko działa jak trzeba, zakresy pozwalają obsłużyć dużą ilość wierszy, dziękuję za pomoc :) Mam jeszcze pytanie: czy można wpleść do powyższego mechanizmu polecenie zmiany wypełnienia koloru wybranych w array komórek? Coś w stylu: jeśli UCase(.Cells(1, k)) <> "JEST" to wypełnij kolor na biało, jeśli inaczej to wypełnij kolor na żółto.
I jeszcze drobna poprawka dla E2007 na początku makra, aby sprawdzać wszystkie kolory z palety Range("AB5:AC60").... For i = 1 To 56
Witam, piszę tutaj ponieważ od dłuższego czasu powraca do mnie problem wykonania makra, które sprawdzałoby formuły (nie wartości jakie wynikają z formuł, ale "tekst" samych formuł) w 2 plikach. Często mam do czynienia z 2 plikami, które są do siebie podobne (takie same zakładki, takie same lub podobne wartości) i chcę sprawdzić czy formuły w nich występujące...
Makro to też bardzo fajna rzecz, ale ja jakoś nie potrafię tworzyć makr z kodów, jak poleca JRV. Ale w zupełności wystarcza mi sposób z tego opisu: http://www.komputerswiat.pl/poradniki/pr... Czyli wykonujemy czynności z opisu do momentu gdy kursor zamieni nam się na "kasetę magnetofonową"....
Dzięki za pomoc. zauważyłem błędy, które popełniłem. Skorzystałem jednak z propozycji zastosowania innej formuły, która pojawiła się w innym wątku. Ostatecznie po połączeniu tych dwóch procedur makro wygląda j.n.: [syntax=vbscript]Sub Makro5() If Worksheets("SPR").Range("C81").Value Mod 4 <> 0 Then With Worksheets("karty czasu pracy").Range("BG91:BH97").Interior...
Czyli rozumiem że jednak nie wystarczy pikselowe przesunięcie obiektu, tzn. przesunięcie na poziomie pikseli współtworzących tenże obiekt na obrazie. Mówię o zmianach zachodzących w pikselach (kolor rgb, jasność), co w skali makro przekłada się na bieżąco obserwowany dynamiczny ruch obiektów na obrazie. Oczywiście mam tu na myśli wyświetlanie pojedynczego...
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...
Witam, Chciałabym aby makro dla konkretnych nazw z pierwszej kolumny kolorowało cały wiersz tabeli przestawnej. Dla przykładu nazwa "ABC".O ile nazwa pojawia się w pierwszej kolumnie wszystko działa dobrze, ale gdy nie ma takiego wiersza pojawia się błąd. Jak mam poprawić makro tak aby nie pojawił się błąd tylko w razie braku nazwy "ABC" makro przeszło...
Można też sprawdzać kolor wypełnienienia. [syntax=vbscript]If d.Cells(w, k) <> 0 And d.Cells(w, k).Interior.Color = vbWhite Then[/syntax]
To nie wchodzi w grę twoje pierwsze rozwiązanie jest lepsze. Myślę, że stworzę ok 50 kolumn wstawie je jako grupę co umożliwi mi jej schowanie.a w linijce[syntax=vb]For a = 7 To 0 Step -1[/syntax] a zamienie na 49 i bedzię super. Miałbym jeszcze jedno pytanie dotyczące tego pliku. Czy jest możliwość by po sformatowaniu tych kolumn jako daty, by sprawdzało...
W tym przypadku wystarczy takie prościutkie makro: [syntax=vb]With Range("B15:C17") 'zakres do sortowania .Interior.Color = xlNone 'czyścimy stary kolor tła .Sort key1:=.Cells(1, 2), order1:=xlDescending, Header:=xlNo 'sortujemy po drugiej kolumnie majejąco .Rows("1:1").Interior.Color = 65535 'ustawiamy kolor pierwszego wiersza w sortowanym zakresie...
Kolega PRL uszykowl odpowiednie makro.
Cześć, Mam taki problem. Potrzebuje stworzyć makro, które porównuje dwie tabele z dwóch plików. Wartości które się nie zgadzają muszą zostać wypełnione kolorem czerwonym. Chodzi o to by w Zeszyt1 dla każdego produktu w którym cena i marża nie zgadza się z Zeszyt2 komórki powinny być wypełnione kolorem czerwonym. Niestety nie mogę skorzystać z formatowania...
Cześć wszystkim, mam 2 małe problemy makrem do zaznaczania wierszy. 1. Pierwsze makro dodaje mi obramowanie do zaznaczonego wiersza - w tym kodzie chciałbym dodać zakres w jakim ma ono działać (tylko w obrębie tabeli) Od wiersza 42 do 305. If w > 0 Then With Rows(w) .Borders(xlEdgeBottom).LineStyle = xlNone End With End If With Target(1).EntireRow...
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....
Według jakich zasad chcesz to zmieniać? Może dałoby się wykorzystać formatowanie warunkowe? Tylko warunek musi dać się obliczyć, nie może to być po prostu zmiana koloru. Generalnie kolor jest w Excelu dodatkiem i nie powinien być traktowany jak dane. Na przykład zmiana koloru w komórce nie generuje typowych zdarzeń i trudno na to reagować. Może opracuj...
Witam, mam następujący problem: potrzebuję wyświetlić komunikat jeżeli w zaznaczonym zakresie znajdę dane słowo lub jeżeli znajdę odpowiedni kolor komórki... lub jeżeli znajdę „to i to”. „Moje” makro po części to robi, jednak jeżeli występują dwa te „błedy” jednocześnie to wyskakuje mi tylko jeden komunikat z pierwszego....
Witam potrzebuje napisać makro które będzie robić coś takiego: zaznaczy wszystkie liczby "powtarzające się w arkuszu na kolor zielony i wypisze te znaczenia w innym arkusz zrobiłem coś takiego [syntax=vb] Sub Zaznacznie_klorem() Dim ConstantCells As Range Dim cell As Range If TypeName(Selection) <> "Range" Then Exit Sub Application.ScreenUpdating...
1. Zmienne te muszą być liczbami, np. musi być: kol_pocz = 1 wiersz_pocz = 1 kol_fine = 27 ' (27 jest nr kolumny "AA") wiersz_fine = 100 2. "ZZ" - nie ma takiej kolumny (excel 97). 3. Makro to dla dużych zakresów będzie liczyło bardzo długo (musi przejść wszystkie komórki) 4. Należy usunąć wywołanie okien INPUTBOX i zmiennych z nim związanych (lub poprzedzić...
Makro potrzebne w celach dydaktycznych? Bo to 4. wstaw odpowiedni kolor (zależny od dnia tygodnia lub przeźroczysty dla nic) w wierszu Arkusz2!B2 można zrealizować przy pomocy formatowania warunkowego (funkcja DZIEŃ.TYG)...
Cześć, Uczę się dopiero tworzyć makra i to jest moje pierwsze "dzieło". Jednak mam prośbę, nie mam pojęcia dlaczego makro mi nie działa tak jakbym sobie tego życzył. Chciałbym aby wpisując nazwę koloru do inputboxa (np. vbRed), makro skasowało mi tekst w tym kolorze. Możecie mi powiedzieć dlaczego wpisując np. vbRed do okienka generującego z InputBoxa...
Wspomniana wyżej xperia S ma dobry aparat, małe aberracje, dobre zdjęcia makro, dobre kolory...
Ja pokombinowałem z formatowaniem warunkowym. Niestety może być tylko 3 warunki więc nie jest to do końca tak jak chciałeś. Komórkę "uwaga" spełnia komórka z godziną w danym dniu. Jeżeli jest maksymalna (lub większa) ilość litery d (DOM) od ustawionej (3) [można zmienić] godzina zmienia kolor na ciemnozielony Jeżeli jest maksymalna (lub większa) ilość...
Witam, potrzebuję pomocy z napisaniem kodu, który będzie w stanie wyszukać we wskazanym zakresie komórki, które mają obramowanie w kolorze czerwonym. Jeśli komórka ma czerwone obramowanie, to dana kolumna w której jest komórka powinna zostać ukryta. Napisałem prosty kod, który to robi i wrzucenie tego w pętle to też nie problem, ale jest pewien szkopuł,...
Dzieki za pomoc:), jeszcze jedno pytanie, jak zrobić żeby komórki które nie miały wpisanej zadnej wartości lub wpisane zera, makro nie zaznaczalo żadnym kolorem???
Dobrze jesli naspepnym razem sformatujesz swoj kod i uzyjesz znacznikow. Myslisz ze komus sie chce ogladac takie smieci? Sub kolor() Dim litera As Range Set litera = ActiveDocument.Range With litera.Find .ClearFormatting .Text = "A" .MatchCase = True .MatchWholeWord = False End With litera.Find.Execute Do While litera.Find.Found litera.Expand...
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...
Witam Szkoda że nie podzielasz naszego entuzjazmu :cry: , trzeba będzie ustawiać kolorki ręcznie. Dodałem oprócz kolorowania makr, zmianę koloru dla rejestrów i portów uP. Jak na razie wykorzystałem zestaw nazw portów ATMega128, ale z czasem uzupełni się też i inne. W załączniku gotowy plik ini , ale kolory trzeba dobrać wg swojego gustu.
Potrzebuję napisać makro do formatowania warunkowego. Chciałabym pokolorować cały wiersz, jeśli spełnione są dwa warunki: - kolumna O > 10% oraz kolumna B zawiera tekst "styczeń", "luty", "marzec" - kolumna O > 15% oraz kolumna B zawiera tekst "kwiecień", "maj", "czerwiec" AI: Jaka wersja programu Excel jest używana? Excel 2024 AI: Czy potrzebujesz...
Witam, Chciałbym poprosić o makro które kopiowało by nazwy wszystkich Arkuszy z pliku i kopiowało je kolejno do pierwszego arkusza. Plik zawiera wiele arkuszy od Arkusz 1 do Arkusz n (o różnych nazwach). Chciałbym aby jego lista pojawiała się się w pierwszym arkuszu "Lista"od komórki A2 do ilość arkuszy. Dodatkowo w każdym z arkuszy jest "check box"...
Zdejmuje haslo, wrzucam range w makro - chyba, że w złym miejscy ale wrzucam range po ponownym założeniu hasła w makrze. Możesz podpowiedzieć w którym miejscu powinien być range? Dane można wpisywać, gorzej, że np nie mogę ukrywać kolumn czy formatować np kolorami.
Makro reaguje na zmianę wartości w komórce. Jeśli pierwszy wiersz jest "FPS", określa ostatnią komórkę z wartością w kolumnie. Począwszy od 2 wiersz do ostatniej wartości koloruje. Dodano po 16 Oto mały fix, gdyby w zakresie niewypełnione komórki Dodano po 11 Czy chcesz malować kolumna E, ale "FPS" w innej kolumnie(np. B)? Wtedy byłoby inne podejście...
makro zmieniać kolor makro kolor komórki makro kolor komórka
triak badać czujnik ciśnienie ibiza esp8266 flashowanie
pralka miele kyocera termotransfer
Gasnące zegary i wspomaganie w Peugeot 407 2.2 l 2004 Rezystancja czujnika NTC w ekspresach Saeco