Zrobiłem dla takiego przykładowego "blabla". O to chodzi?
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.
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...
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ć...
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...
Plik jest jeden i w nim są oba opisane makra. Pierwsze makro opisałem na początku postu nr 7; nosi ono nazwę "LiczX", a drugie makro, które opisałem na końcu postu nr 7, nosi nazwę "Makro1". Czyli mam 1 plik o nazwie: Kalkulator - Koszty Allegro v10f.xls w którym są 2 arkusze, a ich nazwy to: Kalkulator oraz Tablica wyników Odnośnie wymienionych niejasności...
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...
Witam. Chciałbym się zapytać w jaki sposób uruchomić makro w kodzie programu w VBA. Tworze w userform grę w szachy i przy kliknięciu danego pola szachownicy (label) kod programu sprawdza czy to pole było wcześniej kliknięte i jeśli tak to wykonuje różne polecenia. Problem pojawił się gdy muszę "pokolorować" całą szachownice od początku. Jest to kilkanaście...
Prot, to i tak nie ma znaczenia, jeśli chodzi o kolorowanie zakresu C25:H30. Jak C22:C23 będą puste, to kod nic nie pokoloruje na niebiesko.
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 Jak należy uprościć poniższy kod, aby kolorowanie komórek odbyło się bez ich zaznaczenia. Czyli jak należy zlikiwidować te select i selection [syntax=vbscript]Sub Makro4() ' ' Makro4 Makro ' ' Sheets("SPR").Select Range("BI91:BL97,BK105:BL111,BK119:BL125... Range("BK154").Activate With Selection.Interior .Pattern...
Wielkie dzięki za pomoc. Przekazuję Koledze parę punkcików za dotychczasowe wsparcie. FPS może być w dowolnej kolumny, ale wszystko ma się rozpocząć w pierwszym wierszu. Jeśli inaczej, proszę powiadomić Kolorowanie powinno zacząć się od drugiego wiersza. Czy w tym makrze można wybrać pojedynczą kolumnę do kolorowania (np. makro ma kolorować kolumnę...
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...
Witam Mam plik grafiku pracowniczego i napisałem makro sprawdzające czy ilość w danym tygodniu jest zgodna, czyli wynosi 48h dla pracownika. Jest trzech pracowników i makro działa na pracowniku Edyta w pierwszym tygodniu, ale jeżeli ilość godzin jest poprawna, co sprawdzam warunkiem: Poprawiłem temat, pisownię i kolorowanie składni.
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...
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ę...
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...
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...
Dzień dobry, jeśli chodzi o kolorowanie przestawnego to coś takiego tutaj napisałem, może się przyda: [url=http://www.elektroda.pl/rtvforum/to... Edit: Przepraszam, dopiero teraz zauważyłem, że w jednym i drugim temacie pojawia się ten sam, Pana - nick :) Starość nie radość ;) Przeczytam to na spokojnie wieczorem i coś się wymyśli :)
nie wiem co dalej czegoś brakuje :) wiedzy zapewne. Poszukaj trochę i przyjrzyj się jak to zrobili inii. Po mojemu spokojnie obejdzie się bez makr. 1. Znajdź pozycję wybranych z list wartości. funkcja wiersz podstawiasz wynik funkcji z pkt.1 3, Kolorowanie wierszy zrealizujesz przez formatowanie warunkowe. Formuła: =$A6=1 zakres: =$B$6:$O$36 4. Zamiast...
Wielkie dzięki za pomoc! Zmieniłem trochę twój kod do moich celów. W twoim kodzie makro kończyło pracę gdy w pierwszej kolumnie napotkało pierwsza pustą komórkę. Potrzebowałem mieć pewność, że wszystkie dane zostaną skopiowane. Dlatego też zmieniłem pętle DO WHILE na pętle FOR i użyłem funkcji adamas_nt . [syntax=vb] Sub Copy() Dim myPath As String...
W sumie nie wiem co to makro miało by robić. Kolorować kody w kolumnie B i A jeśli w kolumnie C jest wartość? Można do tego użyć formatowania warunkowego zaaplikowanego dla kolumn A i B w zalezności od wartości C
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...
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]
udało mi się zrobić inicjały za pomocą odpowiednich formuł, ale jak zrobić, żeby makro kolorowało komórki?
Nic prostszego zarejestrować sobie makro wykonujące to, co chcesz, a potem je poprawić (żeby działało z parametrami np.). Przykład makra ustawiającego 3 pasek jako żółty: [syntax=vb]Sub Zolty() ActiveChart.SeriesCollection(1).Select ActiveChart.SeriesCollection(1).Points(4... With Selection.Format.Fill .Visible = msoTrue .ForeColor.RGB = RGB(255,...
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.
Możesz wrzucić plik z przykładowymi danymi (kilka wierszy)? Nie jestem pewien o jaki sposób "kolorowania" chodzi.
Witam, Potrzebuję pomocy z makrem. Chcę aby funkcja działała na całą kolumnę. Próbowałem załatwić to Range ale wywala błąd Mismatch zaraz przed komenda kolorowania. Co chce żeby makro robiło: 1. gdy w kolumnie A nie ma słowa "zielony" a w kolumnie B jest słowo "duza", to komórka w której nie ma słowa "zielony" ma byc kolorowana. 2. gdy w kolumnie A...
wielkie dzieki za pomoc walczylam z tym makrem tak dlugo za az przekombinowalam i zaczelam sie sama w tym gubic a tu takie proste i lgiczne roziazanie ktore podpowiedzial cbrman z zastosowaniem Application.Match, dziala elegancko!!!! wielkie dzieki za pomoc i tematy do przmyslenia:-) pozdrawiam, maglol Dodano po 1 witam, Niestety problem znowu pojawia...
Czy macie jakiś pomysł jak to ulepszyć? Spróbuj kodu z załączonego pliku. Tylko pamiętaj o otwieraniu obu plików przed uruchomieniem makra Porownaj() :spoko: 865411
Ładne wzorki. Kiedyś ciekawił mnie temat spirali Ulama i taką spiralę zrobiłem w Excelu. Zaznacza liczby pierwsze. Plik w załączniku. Należy włączyć makra w Excelu.
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...
Czyli, że komórki są kolorowane ręcznie?
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...
Przetestuj następujące makro [syntax=vb]Sub koloruj() Dim lLstRw& Dim iLstCol% Dim rngTmp As Range lLstRw = Cells(Rows.Count, 3).End(xlUp).Row iLstCol = Cells(1, Columns.Count).End(xlToLeft).Column On Error Resume Next For i = 4 To lLstRw Step 4 Set rngTmp = Range(Cells(i, 4), Cells(i, iLstCol)).SpecialCells(xlCellTypeConstan... If Not rngTmp Is Nothing...
Kolega PRL uszykowl odpowiednie makro.
Zrobilem male obejscie - dodalem dodatkowa tabelke, gdzie komorki sa kolorowane na podstawie wartosci z jeszcze innej tabeli ;) Kolory sa brane z posredniej. Ale... ;p makro koloruje obwodke punktu na wykresie, jak i linie laczaca te punkty. Linia laczaca ma byc caly czas koloru szarego, a nie wg koloru komorki. Nie mogeznalezc co za to odpowiada :/
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...
Pkt. 1 wystarczy funkcja Jeżeli. Pkt. 2 tu już trzeba raczej makro, albo formatowanie warunkowe (tylko kolorowanie błędnej komórki)
Nagraj makro zaznaczania i kolorowania tekstu i wkomponuj w kod kolegi JRV. Tzn zamiast: .Font.Color = vbBlue Powinno być coś w stylu: .Characters(Start:=x, Length:=y).Font.Color = vbBlue
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...
Witam, Napisałem proste makro, które koloruje mi zaznaczone obszary i przechodzi dalej. Zamiast tego chciałbym żeby obszary te były ukrywane. Czy da się to jakoś zmodyfikować? [syntax=vbscript]Sub Makro1() ' ' Makro Dalej ' ' Klawisz skrótu: Ctrl+b ActiveCell.Select Range(Selection, Selection.End(xlToLeft)).Select Range(Selection, Selection.End(xlToLeft)).Select...
Spróbowałem z minutami i... koloruje OK. Widocznie sekundy to za często (dla mojego sprzętu) W arkuszu są dwa formatowania warunkowe. Tworzysz je identycznie (instrukcja w arkuszu) Zamień MINUTA na GODZINA, ew: GODZINA($G$2)=LEFT($D4,2)=... Edit: 8:00 - podmieniłem załącznik (59+1=0) Na rysunku, widzę, masz co trzecią kolumnę. Można jak w załaczniku2
Jeśli system zero-jedynkowy, to zsumuj i jeśli >3, koloruj. Bez VBA zrealizujesz przez formatowanie warunkowe...
Pokaż to makro, które źle działa, łatwiej będzie je poprawić.
To co jest w funkcji main wygląda mniej wiecej tak : makro(1); system("ipconfig"); system("cmd /c"); getchar(); do "makro" wrzuciłem kolorowanie konsoli i takie tam funkcje przygotowujące konsole do pracy. A teraz kolejne pytanie : Jakie są komendy do zarządzania połączeniem internetowym / siecią?...
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.
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 Poszukaj tematu o makrach, tam jest opisane jak to zrobić.
makro kolorowanie kolorowanie wierszy excel kolorowanie
bizhub przesunięcie wydruku napięcie czujnika ciśnienia hulajnoga skymaster
układ 5218a fotowoltaika samodzielna instalacja
B&C 15PS100 4 Ohm – parametry producenta, numer seryjny 12720949, specyfikacja techniczna Samsung piekarnik – nie włącza grzania po osiągnięciu temperatury, działa tylko termoobieg