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...
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...
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...
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...
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...
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...
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)
Kod w module standardowym? Funkcję używaj "po staremu". http://obrazki.elektroda.pl/2078982100_1... Jeśli chcesz wartość pobierać z innego miejsca, trzeba dopisać parametr. [syntax=vb]Function CountCcolor(range_data As Range, criteria As Range, criteria2 As Range) As Long Dim datax As Range Dim xcolor As Long Dim xvalue As Variant xcolor...
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
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...
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...
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 <>...
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
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...
VBA wyszukiwanie wartości komórek i ich zamiana
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ść
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()...
Jest to kawałek większego projektu, zaproponowane rozwiązane przez -psiak- nie wchodzi w grę. Historia wprowadzania danych jest nie potrzebna. Wartość w C1 ma się zwiększyć o wartość wprowadzoną w A1, a zmniejszyć jak wpiszę coś w B1. może być też wprowadzone w A1 ze znakiem minus żeby się odjęło. Ale kod z 2 postu działa elegancko. Nawet komórka B1...
[syntax=text]LET(lista;SORTUJ(FILTRUJ($B... FILTRUJ filtruje dane w kolumnach B:C, aby pozostał tylko jeden produkt (z E4), funkcja SORTUJ sortuje wyniki filtrowania wg pierwszej kolumny (daty) w porządku malejącym (-1), funkcja LET nadaje wynikowi sortowania lokalną nazwę 'lista'. [syntax=text]SCAN(F4;INDEKS(lista;0;2);....
Spróbuj zrobić dodatkową tabelkę w której wartość komórek wynosi po kolei jeżeli A2=C1 to B2, następnie A3. Potem spróbuj przenieść tylko te komórki co mają wartość i obok nich komórka z wartością C1
Jeśli dobrze zrozumiałem w A1 wpisz: [syntax=text]=2000-SUMA(A2:A21)+MIN(C1;0...
Widzę, że nie bardzo lubisz makra ;) a wystarczy: 1. makro z WorkbookOpen powtórzyć przy WorksheetActivate (aktualizacja listy Combobox''a). 2. Usunąć instrukcje warunkowe dot. producenta Listę kolorów modyfikujesz w arkuszu "Opcje". Musi być "ciurkiem" (bez dziur). Edit 20:17 - zmieniłem załącznik (Clear brakowało przy Activate)
Miałem zrobić formatowanie warunkowe, by widzieć wizualnie (odpowiednim kolorem) kiedy spłata rat dobiegnie końca lub wyjdzie nadpłata lub niedopłata. Jakie było moje zdziwienie, gdy po odjęciu 12 kwot od zadłużenia komórka świeci się kolorem przypisanym do nadpłaty, a w komórce wartość 0. Okazało się że wcale nie jest 0, ale faktycznie poszło na minus...
Witam. Chciałbym napisać formułę, która sprawdzała by kolor komórki i jeśli na przykład komórka wypełniona będzie kolorem żółtym to do innej komórki zwróci wartość 8. Czy jest to możliwe do uzyskania w Excelu 2003, a jeśli tak, to czy ktoś podsunie sposób na wykonanie tego?
Witam Mam następujący problem. W formularzu mam kolumnę nazwijmy ją '1', w której obliczane są dane na podstawie danych źródłowych. Używam funkcję "jeżeli.błąd", tak by w przypadku braku danych źródłowych nie było w kolumnie '1' widocznych danych - czyli w przypadku branych danych źródłowych wstawiana jest wartość "". Następnie na podstawie danych w...
Witam Mam do Was pytania Wpisuję wartość w wyznaczoną komórkę wciskam enter lub strzałkę następuje wyszukiwanie i obliczenia 1 - dlaczego szybciej otrzymuję wynik po wciśnięciu enter natomiast po wciśnięciu strzałki jest znaczące opóźnienie (nawet 1-2 sekund) ? 2 - kod wyszukujący kończy się ... ... ActiveCell.Offset(0, 3).Select End If End If End Sub...
Dzięki. Częsciowo działa. Wartość w Label10 się pokazuje, ale po wpisywaniu wartości w TextBoxach1-9 nic się nie zmienia w Label10 chociaż w komórka A10 dokonuje obliczeń. Dodano po 1 Dobra, dzięki wielkie już sobie sam poradziłem. Temat zamknięty.
Tak na szybko masz tu makro, które chyba robi to co chciałeś. założenia - pliki są w katalogu C:\dane - pobierasz nazwę do szukania z komórki B3 - szukasz takiego produktu w kolumnie B - w obu plikach arkusze nazywają się Dane - zakres poszukiwania w kolumnie B jest ograniczony do 30 - wartość dotycząca szukanego produktu jest pobierana z komórki sąsiedniej...
Chce zautomatyzować raportowanie bo raport źródłowy ma masę pozycji i mnóstwo zakładek, a zestawienie końcowe jest ubogie w stosunku do źródłowego. Samo przenoszenie do innego pliku ogarnąłem. Największy problem mam z wyszukaniem konkretnej wartości w źródle i wyeksportowaniu wartości z pozycji niżej/wyzej. Dodano po 27 Poniżej prosty Excel który zrobiłem...
Dim i As Integer i = ActiveCell Range("C6") = i Aby ustawić komórkę jako aktywną: Range("A2").Select
Potrzebuję pomocy w napisaniu zdarzenia działającego następująco: Użytkownik wybiera z listy wartość w kolumnach od I do FK, w wierszach NIEPARZYSTYCH (lista już zdefiniowana). I teraz: jeśli wartość zostanie wybrana, to pod nią automatycznie pojawi się dzisiejsza data. Czyli np. jeśli pojawi się wartość z listy w komórce I3, to zdarzenia ma działać...
Mam taki problem. Chcę porównać dwie wartości - jedna wartość to czas obliczany z liczby za pomocą formuły w komórce Komórka A1 = wpisana wartość np. 6 - formatowanie komórki "liczbowe" komórka B1 - wpisana formuła "=A1/24" - formatowanie "Czas" - efekt 06:00:00 Teraz VBA wpisuje do komórki C1 wartość obliczaną wg kodu: zmienna_czas_komorka_A1= Cells(1,...
Niestety nie działa, próbuję dojść co może być nie tak. Arkusze mam nazwane: Arkusz1 "Pierwszy" - w nim znajduje się komórka B18 z nazwą odniesienia i komórką K18 w której znajduje się wartość do dodania. Arkusz2 "Druga" - w tym znajduje się tabela z dużą ilością wierszy w których znajdują się produkty których szukamy i jak już znajdziemy to do komórki...
Data to liczba, a liczbę można wykorzystać w pętli FOR, tylko trzeba ją zapisać pomiędzy hashami i "po amerykańsku": [syntax=vb]poz = 2 For i = #4/1/2013# To #5/1/2013# Cells(poz, 1).Value = i poz = poz + 1 Next i[/syntax]
Proszę o pomoc w rozwiązaniu problemu: 1. komórka "F11" ma wartość 1 lub 0 (wynik operacji w arkuszu). 2. w zależności od jej wartości chciałbym by uruchamiało się Makro1 lub Makro2. 3. Napisałem taką instrukcję: Private Sub Worksheet_Calculate() Sprawdz = Range("F11").Value Select Case Sprawdz Case 1 Call Makro1 'sortuj_malejąco Case 0 Call Makro2...
Witaj, Nie mam pomysłu na formułę, mam natomiast pomysł na proste makro, które mniej więcej robi to, co chcesz. Nie jestem najlepszym programistą VBA, ale w sumie na pierwszy rzut oka działa. [syntax=VB]Sub Makro1() ' ' Makro1 Makro ' Makro zarejestrowane 2011-04-16, autor Darek ' ' Kolumna A od wiersza 2 w dół zawiera działania ' W kolumnie B będą...
Dobra chyba wiem gdzie się mijamy, ja nazywam pierwszą komórkę każdej kolumny nagłówkiem. Komórka z wartością /Delivery-Header/Delivery-Number (F1) i wszystkie komórki pod nią które mają wartość inną niż pusta komórka mają trafiać do kolumny A w pliku B. Jeśli w pliku Order, /Delivery-Header/Delivery-Number zmieni położenie do np XZ1 także ma trafić...
- zakresy ciągłe wpisuje się w następujący sposób: [syntax=vb]Range("F4:S200")[/syntax] - do rozwiązania tego problemu trzeba użyć metody Intersect: https://msdn.microsoft.com/en-us/VBA/Exc... czyli np. coś takiego: [syntax=vb]Dim kolumna As Excel.Range Set kolumna = Range("AK5") 'Wcześniej zadeklarowana...
Co w przypadku jesli klikasz na B6, lub F4 itp.? Dodano po 3 w kodzie arkusza[syntax=vb]Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Count = 1 And Target.Column = 1 Then Cells(1, 1) = Cells(Target.Row, 1) End Sub [/syntax]
Przepraszam, złe założenie zrobiłem. Odwróćmy zatem warunek: if (Asc(Right(Rng.Value,1)&... Or Asc(Right(Rng.Value,1))&... then Rng.Value = Rng.Value & addStr Dodano po 37 nie do końca rozumiem dlaczego wynik formuły ma się zawierać między 48 a 57 Teraz już nie ma się zawierać. Zrozumie Kolega czytając...
http://obrazki.elektroda.pl/7839680900_1... Dziękuję Adams_nt za pomoc, jednk po wpisaniu kodu wyskakuje mi błąd, iż dzielę przez 0. Dla ułatwienia sprawy, aby wytłumaczyć o co mi chodzi, wstawiłem przykładową tabelę. Jak widać w przedziale A1:A10 mam podane pewne wartości. Chciałbym żeby Excel wyliczył mi średnią dla iluś pierwszy...
Funkcja ADR.POŚR może służyć do odczytania danych z pliku otwartego w tej samej instancji Excela. W tym przypadku to się nie przyda. Bez VBA czy innych dodatkowych narzędzi nie da się tego zrobić w sposób trywialny. Istnieją sposoby "drogą okrężną". Najpierw trzeba przygotować teksty odwołań, potem zamienić formuły na wartości i wreszcie aktywować uzyskane...
Ja bym wpisał w kolejności rosnącej np. w komórkach F29:F35 wartości "indeksów" {0*; 1,6; 1,7; 1,9; 2,1; 2,3; 3} i w komórkach G29:G35 wartości "indeksowane" {od 17 do 23}, a następnie zastosował formułę =WYSZUKAJ.PIONOWO(E29; F29:G35; 2; PRAWDA) *) Wartość zero do ewentualnego zastąpienia przez inną liczbę, która jest mniejsza od najmniejszej wartości...
Cześć, potrzebuję pomocy w przetłumaczeniu procedury na język VBA. Mam 2 arkusze: Arkusz1 i Arkusz2. W Arkusz2 użytkownik wpisuje w komórkę B2 liczbę całkowitą. Następnie w wybranych komórkach zakresu D7:D100 również Arkusz2 wpisuje dane. Wpisane dane (i tylko te wpisane) mają się po naciśnięciu na przycisk (przycisk i podpięcie akcji sobie ogarnę)...
Cześć, Stworzyłem makro używając rejestratora makr, ręcznie stworzyłem jego wielokrotność do 60 pozycji zmieniając pogrubione wartości. Pytanie czy można poniższe makro napisać tak żeby robiło się np w zakresie zaznaczonych zmiennych komórek A i D 2-200 ? Makro nie jest skomplikowane, kopiuje jedną wartość A2 wklejając (B3) daną w innym arkuszu, następnie...
Chce aby exel wyliczal mi takie zadanka Smile jest sobie liczba w kolumnie i chce wyliczac procent(prowizje) cene towaru w zależnosci od jej wartości Spróbuj użyć następującej formuły =A2*(1+WYBIERZ(PODAJ.POZYCJĘ(... Komórka A2 - wartość towaru
ORAZ i JEŻELI są funkcjami, na których pewnie da się to zrobić, tylko założenia są nieprawidłowe, dlatego funkcje nie działają. - jeśli w komórce podam wartość np 310 Co to jest wartość "na przykład" 310? I jakie inne przykłady są poprawne, a jakie nie? W formułach, które Kolega konstruuje przyrównuje Kolega komórkę B4 do precyzyjnie określonej wartości...
Cześć, mam znowu problem z Excelem. Próbuję już cały tydzień i już nie mam cierpliwości. Bardzo proszę o pomoc. Macie pomysł na rozwiązanie? Funkcja ma wykonać taką czynność: Jeżeli komórka w kolumnie H jest pusta, sprawdź, czy w komórce w kolumnie I są teksty rozpoczynające się na "Chor" lub "Reh" lub "Wyp" lub "Zas". Jeżeli komórka H jest pusta ORAZ...
Żaden błąd. Włączam arkusz w którym mam wpisane makro, wpisuje wartość i komórka jak była biała tak zostaje dalej biała
Witam, mam pewien problem. Potrzebuję w arkuszu kalkulacyjnym zrobić formułę, która przy próbie wprowadzenia jakiejś danej (liczbowej w formacie np. 125,90) do konkretnej komórki wyświetli komunikat ostrzegawczy, że aby wprowadzić tę daną należy usunąć inną daną znajdującą się w innej komórce lub przynajmniej sprawdzić tę inną daną w innej komórce....
Jeżeli ilość znaków pomiędzy "-" jest stała użyj: Fragment.Tekstu(Tekst; Liczba początkowa; Liczba znaków) gdy nie wiadomo ile ma być znaków pomiędzy "-" do określenia odpowiedniego parametru użyj: Szukaj.Tekst(Szukany tekst; Obejmujący tekst; Liczba początkowa) Za pomocą kombinacji tych dwóch formuł podzielisz wszystko z dokładnością...
Witam, Chciałbym ustawić w pliku Excel najlepiej przy pomocy VBA kodu. Działanie: Jeżeli komórka A1 ma wartość 0 to następuje zablokowanie komórek B1 i C1 Jeżeli komórka A1 ma wartość inną niż 0 to jest możliwość edycji komórek B1 i C1 Chciałbym też aby taki kod miał również na uwadze to iż podczas zmiany wartości w komórce A1 powinien usunąć dane z...
Witam Kochani mam problem z moim excelem, kombinuje i kombinuje i jednak potrzebuje pomocy korzystam z Funkcji MAX. w danym zakresie komórek. https://obrazki.elektroda.pl/6229323400_... Chciałbym utworzyć funkcje gdzie w kolumnie D wyświetla się największa liczba z pośród wiersza np. 3 i żeby excel zaznaczał mi kolorem z której kolumny...
A nie wystarczy zwyczajnie wstawić "Jeżeli" które sprawdza czy komórka ma wartość OVERALL RESULT ? Teraz w zależności od wartości komórki wykonuje albo jedną albo drugą operację (jeżeli warunek jest prawdą/fałszem).
To trzeba wykonywać program krokowo i gdy wystąpi błąd sprawdzić wartości wszystkich zmiennych. Opis błędu wskazuje, że nie ma arkusza o wskazywanej nazwie, więc trzeba dokładnie sprawdzić jakie są nazwy arkuszy, a co jest w komórkach. Jeśli nie znajdziesz sam przyczyny błędu, załącz przykładowy plik, bo tak to można tylko zgadywać.
Witam Potrzebuje pomocy przy napisaniu makra excel W kolumnie M mam 10 typów wartości liczbowych powtarzających się, pomieszanych. Chciał bym aby makro znalozło wiersze w kolumnie M zaierające wartości 1224, 1228 i 1232 Po czym usunęło całe wiersze, czyli wszystkie dane we wszystkich kolumnach w tym wierszu który zawiera te liczby. Ale tak było nie...
Hey Siedzę już trochę i nie mogę znaleźć klucza. Chce ustawić formatowanie warunkowe dla komórki B2 B3 B4 B5 takie że gdy wartość komórki A2 równa się 1 to ta komórka która jest pusta z zakresu B2:B5 powinna się podświetlić jakimś kolorem. Ktoś pomoże ?
Niestety nie - VBa pamiętam ze szkoły ale to się skończyło na takich rzeczach jak Excel Komórka 'a' ma wartość między 1-10 to wypełnij jej kolor .... jak co innego to inaczej itd.. taki poziom takich zadanek a na koniec "kursu" prosty kalkulatorek w VS VBA W sumie jak potrzeba zdobyć odp. na konkretny problem w VBA PP to mógłbym napisać na StackOverFlow...
Czy mógłby mi ktoś podpowiedzieć co jest źle lub jak powinna wyglądać komórka C6 w załączonym pliku? ;) Przy tych wpisanych wartościach powinna wskazywać 21,48% a pokazuje zupełnie coś innego.. Pozdrawiam Tytuł tematu został skorygowany.
Witam Czy da się tak zrobić aby słupki w wykresie zmieniały się na taki kolor jaki ma dana komórka z której pobierane są dane. Przykład jest taki: wiersz 3 odniesienie wiersz 4 to wiersz do którego są wpisywane dane i z którego te dane pobierane są do wykresu, ma on zastosowane formatowanie warunkowe w których komórki które mają większą wartości od...
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...
Witam, Potrzebuje Waszej pomocy. Potrzebuję formułę lub makro, które będzie wyszukiwać mi "wyrażenie" które znajduje się w jednej komórce w ciągu zdania. Dla przykładu i wyjaśnienia wklejam przykład: 1097 SPORT:1313 VER:31424441 MAZDA ORD:9470 - SERVIZI ROMA SPORT:3142 Takich linijek mam w arkuszu okolo 200 każda przeważnie jest inna. W ciągu tej linijki...
Yogi (przypominasz mi dzieciństwo) ;). Nie pamiętam, czy był to 'Zwierzyniec', czy też 'Ekran z bratkiem'. Ale autor napisał: potrzebuję makro A do Autora. Może ten kod będzie wygodniejszy (jest bez obsługi błędów, sam się pobaw): [syntax=vb]Sub Przenies() Dim d As Date, p As Date, k As Date ow = Cells(Rows.Count, "B").End(xlUp).Row y = Sheets("Arkusz2").Cells(Rows.Count,...
[syntax=vbscript] Public Sub pobierz() Dim lang As String Dim URLStr As String, DLPath As String, UName As String, PWD As String, DontOverWrite As Boolean Dim zakres As Range Dim Lastrow As Integer Lastrow = ActiveSheet.Range("A1").CurrentRegion.Ro... Set zakres = Range("A2:A" & Lastrow) kat = Dir(Environ("USERPROFILE") & "\Downloads\karty\", vbDirectory)...
Napisałem krótki kod w VBA, który tworzy mi historię edytowania każdej komórki z danego zakresu w komentarzu. Pokazuje też, kto wprowadził zmiany wraz z datą. Wszystko ładnie działa, tylko musi to być bardziej - że tak powiem - idiotoodporne :) ...i z tym mam problem, tzn.: 1. Jak już komentarz automatycznie się stworzy, to nie może być możliwości usunięcia...
Dzień dobry, Jeśli rozwiązanie ma być w Excelu to należy użyć funkcji JEŻELI np. =JEŻELI(A1>151;150;A1). Formułę można potem skopiować, aby objąć wynikami cały zakres. Można też najpierw zaznaczyć zakres, wprowadzić formułę i nacisnąć Ctrl+Enter, nie trzeba już będzie kopiować. Wyniki można zamienić na stałe, jesli to konieczne. Skopiować Ctrl+C, potem...
excel przypisywać wartość komórka zmieniać wartość komórka excel excel kopiować wartość komórka
ciężka rozruch zimne silnik sprzedam dozymetr skrzyni biegów grande punto
Czy insekt może uszkodzić wyświetlacz w ekspresie DeLonghi? Uszkodzenie wyświetlacza ekspresu do kawy przez insekt a gwarancja
