Może coś takiego: [syntax=vb] Sub ukryjWiersze() Dim i As Integer Dim selRange As String For i = 60 To 70 selRange = "A" & i If range(selRange).Value = 0 Then range(selRange).Select Selection.EntireRow.Hidden = True End If Next i End Sub [/syntax]
Dobry wieczór, Miał być przykład, ale się nie doczekałem. Można zdefiniować funkcję użytkownika np. taką: [syntax=vb]Function Tło(adr As Range) As Integer Application.Volatile Tło = -CInt(adr.Interior.ColorIndex <> xlColorIndexNone) End Function[/syntax] Funkcja pobiera adres komórki jako argument i zwraca 0 jeśli komórka nie ma zdefiniowanego...
2 – Jest możliwe aby w kolumnie Kartony była podświetlona komórka zawierająca najwyższą wartość ALE z wyłączeniem tras zaznaczonych jako Anulowano i Przeniesiono? Ustawiłęm dla całej kolumny formatowanie Warunkowe -> Reguły dla pierwszych/ostatnich -> 10 pierwszych elementów i zmień z 10 na 1. Sprawdziłem, oznacza na czerwono (można zmienić)...
Program masz "prawie" gotowy. Pomyśl, potrzebujesz odwołać się do Nr wiersza komórki spełniającej kryteria (tutaj zmienna "abc", zadeklarowana jako 'Range'). Będzie to wartość właściwości 'Row'. Następnie należy znaleźć lub określić Nr ostatniej w wierszu. Zadziałaj podobnie (metoda End), jak masz to z licznikiem pętli. Pozostaje przeliczenie (wymnożenie)...
apollinaris , dałeś taki przykład, że trudno się zorientować jakiego wyniku oczekujesz. Czy czas w kol. C będzie zawsze taki sam tzn. 10:45, czy będzie zmienny i kolory mają być dopasowane proporcjonalnie? Jeśli zmienny to adres używany w formule musi zawierać nr wiersza bez znaku $. I zawsze piszemy formułę dla pierwszej komórki zakresu formatowania....
Nie bardzo zrozumiałem - chcesz wpisać "tekst" jak komórka jest pusta, wtedy już nie będzie pusta. Takie działanie nie ma sensu. Ale mógłbyś to zrobić w innej komórce, czyli: (przykładowo) Jeśli komórka A1 jest pusta, wpisz w B1 "tekst", inaczej wpisz wartość A1 1: w komórce B1 formuła =JEŻELI(A1=0;"tekst";A1) 2: W komórce A1, wartość 0, pusta lub inna
Nie wyjaśniłeś, co z tymi numerami działek w różnych miejscowościach. Wobec tego zakładam, że numer działki określa ją jednoznacznie i miejscowość nie jest istotna. Jeśli tak, to rodzaj tytułu prawnego można określić za pomocą funkcji WYSZUKAJ.PIONOWO w jej najbardziej typowym wariancie użycia: [syntax=text]=WYSZUKAJ.PIONOWO(C2;Dane_1...
czyli np.: =arkusz1!A1 jak przeciągnę tą formułę w bok (poziomo), to excel automatycznie w następnej komórce skopiuje dane z komórki B1, czyli =arkusz1!B1, a chciałbym żeby w następnej komórce była wartość z komórki A2, czyli =arkusz1!A2 Hmm, to jeszcze byłoby wykonalne. Jeśli kolumny po kolei w jednym wierszu, to skąd wiadomo gdzie ostatnia komórka...
Witaj. Należy użyć formatowania warunkowego z określeniem funkcji, na podstawie której robiony jest format. Jeśli posiadasz Excela w wersji 2013 lub nowszej, to ma on wbudowaną funkcję CZY.FORMUŁA, która rozróżnia czyw komórce jest wpisana liczba/tekst, czy wartość jest obliczona na podstawie formuły rozpoczynającej od "=" - i o takie rozróżnienie chyba...
Tak na marginesie: :) Kolego, po napisaniu odpowiedzi zanim ją wyślesz, przeczytaj to co napisałeś, byś był pewien że odpowiadasz na pytanie. Twoje pierwsze zdanie: ... jeżeli w A1 wpiszę wartość to ... w A2 należy ... To wynikało z Twojego pierwszego postu, ale excel tego nie zrozumie :) Całe szczęście że dodałeś drugie zdanie :) Z komunikatem jako...
Chcesz mieć w jednym polu informację czy jedna z komórek zakresu jest pusta ? Czy informację, że dana komórka jest pusta ? Jeżeli chodzi o pierwszą sprawę to musisz w takim razie pisać po kolei Jeżeli(Czy.Pusta(A1) I (Czy.Pusta(A2)) itd. 1;0) - wartość wszystkie komórki będą puste to w polu z formułą zwrócona zostanie wartość 1 w innym przypadku 0....
Jeśli chodzi o klasyczne odwołanie, to nie jest to możliwe, gdyż odwołanie zwraca tylko wartość komórki, bez formatowania. Ponadto, nawet z użyciem VBA, komórka zawierająca formułę musi być sformatowana jednolicie (to znaczy można sformatować całą komórkę, ale nie poszczególne znaki). Szkoda, że nie dałaś pliku załącznika, bo wtedy łatwiej można by...
Korzystając z funkcji JEŻELI w kolumnie C musisz stworzyć formułę, w której: - warunek: komórka z kolumny B > 0 - wartość jeśli warunek jest spełniony: wartość z kolumny B - wartość z kolumny A - wartość jeżeli warunek nie jest spełniony: "" [2 razy cudzysłów, czyli pusty ciąg] Teraz już pewnie dasz radę.
Wtedy nie wstydż się i pytaj. Dałeś mi (przy okazji) temat: dlaczego działało a teraz nie działa? Już ci tłumaczę (musiałem się chwilę zastanowić) Dla excela 0 lub "nic" to to samo co fałsz natomiast 1 to prawda. Jednak jak wspomniałem twórcy z M$ mieli różne wizje i jeżeli komórka ma jakąkolwiek wartość (ale nie wyraz - nie ciąg znaków) poza 0 wtedy...
W załączeniu rozwiązanie. Warunek aby działało to tabela dniówek ma być ustawiona rosnącą (tak jak u mnie) Konieczność dodania (powtórzenia) dniówki zaczynającej się od 00:00 (Jakbym nie zmienił formatowania to byś nie zauważył ale pierwsza komórka z 00:00 ma liczbową wartość 0 natomiast ostatnia ma liczbową wartość 1 - zrobiłem formatowanie na [gg]:mm...
Dobry wieczór, Pierwsze pytanie, czy to ma być rozwiązanie w Excelu, czy w Visual Basicu? Jeżeli w Excelu, to można wykorzystać iteracje, żeby w ciągu znaków znaleźć pierwszą literę. Zakładam, że pierwsza litera to początek nazwy miasta. Aby zrealizować obliczenia iteracyjne, należy w opcjach Excela zezwolić na iteracje. Potrzebna też będzie komórka...
Jak Ci wierszy przybędzie do miliona, to zaczniesz myśleć, dlaczego to tak długo liczy...;) Ale jeżeli już chcesz tak, to nie sprawdzaj w każdym przejściu pętli, czy komórka jest różna od pustej, tylko wylicz wartość końcową pętli na przykład tak: [syntax=vb] For x = 2 To Cells(Rows.Count, "A").End(xlUp).Row Cells(x, 1) = "=IF(RC[1]<>"""",R[-1]C+1,"""")".....
Jak pisze kolega zimon wylosowanie jednej liczby z wielu jest dosyć proste. Ale jeżeli chcesz "wymieszać", to dla Excela znaczy, że chcesz wylosować 1000 z 1000 bez zdublowania. Musisz podzielić to na etapy, wykorzystać kilka funkcji w tym WYSZUKAJ.PIONOWO i dlatego dane muszą zostać ułożone we właściwy sposób. W moim przykładzie użyjemy trzech kolumn....
Mam następujące pytanie być może jest na to jakiś prosty sposób ale sam nie wiem jak to wykonać Mam listę (lista nie zawiera liczb, tylko tekst) w kolumnie D od D6 do D14 , dodatkowo w komórce C6 mam podaną liczbę w zakresie od 1 do 9. Chcę uzyskać efekt że w dowolnej komórce np A1 wyświetli mi się zawartość jednej komórki z wspomnianej list a, która...
zastosowałem funkcję VLOOKUP. Jeśli kolumna pierwsza składa się ze scalonych komórek z pięciu wierszy i ma określoną treść, a kolumna druga ma pięć wierszy z określoną treścią, To jak zrobić, zakładając, że obie kolumny są zakresem tabeli, aby funkcja VLOOKUP pokazywała mi drugi wiersz z drugiej kolumny jeśli odniosę się do pierwszej kolumny ze scalonych...
Hej, Chodzi o to, że komórka A1 może zawierać jedną z dwóch wartości: 1 albo 2. I teraz chciałbym, aby w komórce B1 wyświetlała się np. wartość 10 jeżeli w A1=1, ale jeżeli A1=2 wtedy w B1 wyświetlała się lista rozwijana z wartościami do wyboru np 11, 12, 13. W załączeniu przesyłam plik, w którym PRAWIE to działa. W Dane -> Poprawność danych wybrałem...
Witam, jestem początkujący i potrzebuje zrobić małą rzecz w VBA wykonać, ale nie mam pojęcia jak. - Jeżeli komórka w kolumnie zielonej "Wielkość pozycji" jest wypełniona wtedy skopiuj SAMĄ WARTOŚĆ (bez formuły) do wiersza w kolumnie żółtej "Wielkość pozycji kopia wartość" - Jeżeli pozycja w kolumnie niebieskiej "% inwestycji" zaktualizujemy, wtedy aktualizujemy...
Czyli poprostu w stan konta nie może sie zaliczać jedna z dwóch (inwestycje albo do wydania) ?? Chyba ze odejmujesz inwestycje od do wydania :) i pozostaje do stan konta :) Inwestycje musza być odejmowane od stanu konta jako wydatki :) Przychodu masz 1500 kosztów 360 a inwestycje to prawdopodobnie tez wydatki (mogą być jako przychody ale wtedy musisz...
Witaj [syntax=vbnet]Sub CellToComment() Dim Rng As Range Dim WorkRng As Range On Error Resume Next xTitleId = "KutoolsforExcel" Set WorkRng = Application.Selection For Each Rng In WorkRng koment = koment & Rng.Value & vbLf Next WorkRng(1).Offset(WorkRng.Count).NoteTex... Text:=koment End Sub [/syntax]
Cześć Mam problem z napisanie formuły. Chciałbym żeby formuła działała w ten sposób: Jeżeli w komórce OK jest wartość "x" lub "X" to wtedy w zakres komórek od A-F wskakuje wartość "OK" Jeżeli w komórce NOK jest wartość liczbowa w zakresie 1-6 to wtedy w kolumnie odpowiadającej numerowi pojawi się wartość "NOK" (przykładowo: komórka NOK=2 --> komórka...
o samo co wyżej. Pokazuje tylko pierwszy błąd, nie wypisuje wszystkich kolumn Ciekawe, jak do tego doszedłeś... Sprawdź plik.
Witam mam ogrooooomna prośbę potrzebuje i nie mogę poradzić sobie funkcja jeżeli ani warunki Zrobić formule taka Komórka e5 ma wartości procentowe wyniki sprzedaży od 0 w górę I chcę w osobnej komórce mieć takie coś Jak wynik poniżej 80% daje wartość 0 Jak wynik większy od 80 ale mniejszy od 150 % daj wynik 1 Jak wynik większy lub równy 150% daj wynik...
[syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("V15:V16")) Is Nothing Then If Target.Address = "$V$16" Then r = 1 Target.Offset(-10 - r, 3).Resize(2, 2).Copy Target.Offset(r * 2, 2) End If End Sub [/syntax]
Jak masz już zapamiętany w zmiennej numer kolumny, to możesz odwołać się do komórki w trzecim wierszu przez [syntax=text]Cells(3, numer_kolumny)[/syntax] Jeśli potrzebujesz się odwoływać za każdym razem do innej kolumny, to: [syntax=text]Cells(3, ActiveCell.Column)[/syntax]
Dzień dobry, Chciałabym ustawić w pliku Excel najlepiej przy pomocy VBA kod. Działanie: Jeżeli komórka A1 ma wartość > 30000 to następuje zablokowanie komórek B1 Jeżeli komórka A1 ma wartość > 50000 to następuje zablokowanie komórek B1 i C1 Dziękuje z góry za pomoc.
Sheets("DATA ENTRY " & s)
Witam, Wartości w komórkach A1 i B1 się zmieniają - wpisujemy np. w komórkę B1 dowolną wartość i ENTER i wtedy skrypt działa. Ale w przypadku pobierania danych z Internetu (dane zewnętrzne) skrypt nie działa mimo, że w komórce np. B1 pojawiają się wartości większe niż 18 (wartość progowa). Czy można skrypt zmodyfikować, aby monitorował dane w komórkach...
czy można w Excelu, nie korzystając z makr i programowania w VBA, sprawić, by przy użyciu np. funkcji jeżeli Excel zamieniał kolor na wartość liczbową, np. gdy komórka A1 jest koloru czerwonego, to w A2 otrzymujemy wartość 1, a gdy jest innego, to 0. Byłbym wdzięczny za pomoc w rozwiązaniu tego problemu
Pytanie chyba niezbyt przemyślane, a propozycja rozwiązania prosta, ale dość ryzykowna. A co będzie jak użytkownik kliknie dwa lub trzy razy? Nie ma żadnego śladu, co było pierwotnie w komórce, ani możliwości cofnięcia operacji. Poza tym, czy w arkuszu będzie tylko jedna taka cena? Jeśli wiecej, to przy każdej będzie przycisk? Moim zdaniem lepszym rozwiązaniem...
To już wystarczyło zmienić numery wierszy w adresach. Natomiast ważne, aby nie kopiować formuł tablicowych do scalonych komórek. Generalnie to ze scalonymi komórkami same kłopoty. Scalanie komórek - jeśli jest konieczne - powinno być ostatnią czynnością w arkuszu, po umieszczeniu wszystkich danych i formuł. Pozdrowienia
Witam Posiadam plik excel w którym na każdy nowy dzień tworzony jest nowy arkusz kopiowany z poprzedniego dnia. Tworzenie nowego arkusza za pomocą poniższego kodu: [syntax=vbscript] Public Sub RenameSheetWithInputBox() Dim RenameSheet As String RenameSheet = InputBox("What will be the new worksheet name?", "Rename Worksheet") If RenameSheet <>...
chciałbym też planować "wstecz" Najprostszym IMHO rozwiązaniem w takiej sytuacji będzie przygotowanie analogicznego arkusza (tzw kompletacji dostaw) z odwróconą kolejnością dni kalendarzowych :idea: Zastosowane formuły formatowania warunkowego (uwzględniające warunek 1 - parzystości nr wiersza; warunek 2 " pierwszej kolumny " - czy kolumna zawiera...
Dzień dobry, Co Pan chce mieć wpisane w kolumnach? 8 (jako liczbę) czy 8 godzin (w formacie czasu Excela). Tu jakby brak konsekwencji. Komórki w kolumnach dni są sformatowane jako liczby całkowite, a kolumna podsumowania (AI) jest sformatowana jako godziny i minuty gg:mm. To nie pasuje i nic się Panu nie będzie sumować. W arkuszu są jeszcze różne inne...
Rozumiem że opcja "zakreśl nieprawidłowe dane" nie sprawdza się w przypadku jeśli mam zrobione w ten sposób że w komórce mam pole do wyboru? Bo w tym pliku co jest powyżej jak się to opcje zaznaczy i wybierze prawidłową wartość to i tak komórka jest zaznaczona jako nieprawidłowe wartość
VBA wyszukiwanie wartości komórek i ich zamiana
Niestety, nie udało mi się ograniczyć skutecznie obszaru obliczeń, wszystko się chciało przeliczać. Tym niemniej, w międzyczasie pojawiła się chyba poprawka Windows 7 bo Excel teraz wykorzystuje cały procesor do obliczeń co znacznie przyspieszyło przeliczanie arkusza. Dziękuję za pomoc i temat zamykam.
Dzięki za zainteresowanie moim tematem. Sam kod zapisywania się wykonuje. Pojawia się okno zapisu tak jak powinno. Problem mam z tym, że w pasku, w którym wpisuje się nazwę pliku, nie pojawia się wartość z komórki określonej w kodzie (arkusz "ilości", komórka P1). Komórka ta zawiera formułę. Może to ma znaczenie? Cały skoroszyt jest zapisany w formacie...
Witam, Potrzebuję makra, które będzie kopiowało i wklejało zawartość wiersza w którym: Jeżeli w kolumnie G komórka zawiera wartość to wstaw <pod nią> wiersze n-1 i skopiuj dane z tego wiersza. Czyli w komórce g8 pojawia się wartość 3 to makro wstawia pod 8smym wierszem 2 puste i kopiuje cały wiersz 8 do wstawionych wierszy. Mam nadzieję że dość,...
Dzień dobry, Proszę spróbować z taką formułą w formatowaniu warunkowym: [syntax=text]=JEŻELI(MOD(WIERSZ(A1);2);A... Puste komórki w zakresie są traktowane jak zera. Teksty są "większe" od liczb, więc zawsze będą zaznaczane, gdy wystąpią w parze z liczbą. Gdyby miało być inaczej, trzeba zmienić formułę....
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...
Witam ponownie! Mam grafik w formie tabelarycznej (graficzny) który wygląda ogólnie tak że w wierszach są dni a w kolumnach godziny przy czym jedna komórka to 30min. Prowadzenie tego grafiku polega na nadawaniu koloru wypełnieniu poszczególnych komórek po to by po wydrukowaniu jednym rzutem oka wiedzieć w których godzinach w danym dniu jest rezerwacja...
No więc tak: 1. Są 3 wartości w tabelce: - B1 - pusta - B2 - data - B3 - wartość Makro miałoby wyciąć B2 i wkleić do B1, wyciąć B3 i wkleić do B2, i wtedy komórka B3 zostaje pusta, więc ją można usunąć. 2. Tam gdzie są 2 wartości makro nie ma nic do roboty, bo nie ma pustej komórki która mi przeszkadza 3. Analogicznie do 1 przykładu 4. Makro musi przewidzieć...
Jak użyć foramtowania, aby po wpisaniu w Arkusz1 komórka zmieniła kolor na zielony jeżeli wartość znajduje się w Arkusz2 lub na czerwony jeżeli znajduje sie w Arkusz3 Używam excel 2016
CTRL+SHIFT+" (CUDZYSŁÓW) Aby skopiować wartość z komórki nad aktywną komórką do komórki lub paska formuły CTRL+` (POJEDYNCZY CUDZYSŁÓW) Aby przełączać się między wyświetlaniem wartości komórek i formuł komórek Znalazłem tylko takie określenia. Sprawdź jaki format ma komórka po tej operacji. Przed użyciem tego skrótu za pewnie miałeś format komórki jako...
Witajcie! Mam następujący problem - zaznaczam pierwszą komórkę w wierszu (A1) i przeszukuje go do momentu, gdy któraś komórka będzie mieć wartość "XYZ". W tym momencie chciałbym, aby ta komórka została zaznaczona, bo 10 wierszy poniżej względem niej, chciałbym skopiować zakres ("zak") z innej części arkusza. Wymyśliłem coś takiego [syntax=vb]Sub KopiujZakres()...
excel przypisywać wartość komórka zmieniać wartość komórka excel excel kopiować wartość komórka
podgrzewanie przedniej szyby szyby cyfrowy polsat zakodować kanał c20ne schemat
somfy 5054240c samsung wd90n740noa
Citroen C3 PureTech 2021 – żółty kluczyk pojawia się co 2 tygodnie i gaśnie Denon DN-S1200 – jak połączyć dwa odtwarzacze z komputerem DJ (Windows, macOS, VirtualDJ, Traktor)