Korzystając z opisów kolegów np. z tego wątku https://www.elektroda.pl/rtvforum/viewto... oraz przenosząc sumowanie w Arkuszu2 z dołu do góry (łatwiej znaleźć pierwszą pustą komórkę w kolumnie) możesz użyć takiej procedury: Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Row...
Sprobuj takie makro [syntax=vb]Sub sortgodz() With ActiveSheet.UsedRange .Sort key1:=.Columns(4).Cells(1), header:=xlYes Set bt = .Find("Zast") r = Cells(Rows.Count, 4).End(xlUp).Row + 1 Rows(bt.Row).Cut Rows(r).Insert shift:=xlDown End With End Sub [/syntax]
A czy makro nie może być przerwane w momencie kiedy napotka pierwszą pustą komórkę w kolumnie A? Na ten moment makro długo działa chyba z uwagi na to czyszczenie kolumny B. W moich danych nie ma pomiędzy pustych komórek, tak jak w twoim pliku. Np. wklejam do pliku 100 wierszy (ciągiem, nie ma pustych pomiędzy) i te 100 ma ponumerować. Co więcej: Za...
Zamiast obrazka lepiej załączyć plik przykładowy. Na obrazku trudno sprawdzić jak działa proponowane rozwiązanie. Konkretnie dużo zależy, czy w tych komórkach otrzymujesz faktycznie zero, czy tylko liczbę, która sformatowana z 5 miejscami po przecinku wygląda jak 0. Jeśli jest to faktycznie 0, to wystarczy zastosować odpowiedni kod formatu (niestandardowego)....
Tak jak już wspomniał kolega Dżyszla filtrowanie nie jest zgodne ze scalaniem komórek. Filtr jakby nie zauważał, że komórki są scalone i filtruje wg faktycznej a nie widocznej zawartości komórek. Natomiast scalenie skutkuje tym, że 1) zawartość obszaru scalonego jest umieszczona w pierwszej komórce tego obszaru, a pozostałe komórki są puste, 2) formatowanie...
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....
Witaj, Musisz gdzieś w takim razie zapisywać aktualny stan, albo wykrywać pierwszą pustą komórkę w zakresie pracy Twojego makro (o ile konstrukcja arkusza na to pozwoli).
Podstawiłem na próbę bezpośrednio wartości (10, 4) - nadal ten sam błąd. --- Sprawdziłem też co jest wartościami j, k - wartości są ok i faktycznie wskazują na pierwszą pustą komórkę.
Witam, Jestem totalnie zielony z VBA a chciałbym sobie pomóc w pracy. Mam dwa arkusze gdzie z jednego kopiuję dane do drugiego przy czym komórki kopiowane są do jednego wiersza , czy mógłby mi ktoś pomóc napisać kod który automatycznie by kopiował komórki z jednego pliku do drugiego przesyłam przykładowe pliki Dziękuję 881425 881424
wrs = ActiveSheet.Range("a1").CurrentRegion.Ro... Dodaj gdzieś pustą komórkę i zobacz dokąd przeliczy CurrentRegion
Mam propozycję, ale z ograniczeniami. Założenia są następujące: 1. W kolejnych komórkach będą kolejne liczby (lata) lub komórki będą puste, ale nie będzie sytuacji, że w sąsiednich komórkach będą liczby (lata) niekolejne. 2. Przed pierwszą liczbą musi być co najmniej jedna komórka pusta. 3. Liczba komórek jest zadana z góry (formuła nie jest dynamiczna)....
Widzę że nie do końca precyzyjnie opisałem mój problem. Chodziło mi o to że za pomocą funkcji Cells (i koniecznie za pomocą jednego polecenia) muszę móc zaznaczyć dwie nieprzylegające do siebie komórki a później przekopiować do innego pliku xls. Dlaczego? Ponieważ to będzie proces powtarzający się i z kolei w pliku xls do którego jest wszystko kopiowane...
Dzień dobry, Jak w tabeli przestawnej mam wartości bez wartosci a nie chciałbym aby one mi się nie wyswietlay https://obrazki.elektroda.pl/2393646800_... np. zeby Towar1Ultra Medium nie pokazywał mi się ten wiersz. wogole. Zeby w tabeli przestawnej nie pokazywało się Towar1Ultra bo nie ma wartości, tak samo jak dla Privacy small. etc.
Witam. Domyślam się że to co potrzebuję jest bardzo proste. Mianowicie potrzebuję pomocy żeby stworzyć przycisk dzięki któremu będę mógł kopiować wartości z jednego arkusza do aktywnego arkusza (w którym znajduje się przycisk) do konkretnej kolumny z tym żeby jak będzie kopiować do kolejnego pustego wiersza. Czyli np. po naciśnięciu przycisku z arkusza...
Dzień dobry, Jest taka możliwość, tylko zakresowi komórek tworzących listę trzeba nadać nazwę np. lista i przy definiowaniu źródła trzeba użyć tej nazwy: =lista (ważne, żeby było = na początku). Zakres musi zawierać pustą komórkę, a pole "ignoruj puste" musi być zaznaczone. Powodzenia!
Dziwne, ja nie mam problemu ze zmianą zawartości komórki w Twoim pliku. A masz włączone edytowanie pliku?
Witam! Mam dość duży dla mnie problem. Potrzebuję stworzyć makro które będzie aktualizowało jeden skoroszyt pobierając dane z innego skoroszytu. Niestety nie zawsze wszystkie pola są wypełniane więc pojawiają się pustki i nie mogę skorzystać z funkcji znajdź pierwszą pustą by tam wklejało dane. Byłoby łatwiej gdybym mógł zmienić kolejność kolumn - jednak...
Problem w tym, że jeśli dam aby pomijał tekst "po terminie" to będzie pomijał wszystkie teksty... Chodzi o to, że pomimo tego, że komórka jest pusta to arkusz pustą komórkę traktuje jako datę jeśli cała kolumna jest tak sformatowana. .. Wiec sprawdzaj 2 warunki w forumule np.: ORAZ(E20<DZIŚ();E20<&g... albo kolejny...
Witam. Potrzebuje pomocy otóż mam pod sobą magazyn części zakładu produkcyjnego, mam zainstalowany system dostępowy. Dane z w/w systemu zapisywane są w bazie danych na serwerze SQL. Udało mi się zaciągnąć dane z serwera SQL ale we właściwościach odświeżanie jest naj mniej co 1 minutę ja potrzebuję odświeżanie w czasie rzeczywistym. W magazynie mam bezprzewodowy...
Sumowane są komórki wynikowe formuł... Działania matematyczne na pustych (które są w tym przypadku NULL a nie EMPTY) dadzą w wyniku błąd. Więc... Połącz JEŻELI z CZY.BŁĄD
Dziękuję za zainteresowanie moim postem i podpowiedź. Faktycznie przeoczyłem, że MAKRO miałem zapisane w PERSONALU a nie skoroszycie, więc wysłałem plik bez MAKRA. Ponawiam więc załącznik z dopisanym kolejnym kawałkiem kodu. Warunek aby nazwy spółek pozostających w portfelu z poprzedniego miesiąca nie pokrywały się zestawieniem z obecnego miesiąca rozwiązałem...
Witaj. Można spróbować dopisać sobie w makro: On Error Resume Next If Cells(Target.Row, 5).Value = "" Then Cells(Target.Row, 5).Value = Now On Error GoTo 0 Linijki On Error są opcjonalne, ale jak w kolumnie E będziesz miał w zwracanej formule błąd, to makro też wyłoży się błędem. Po wymuszeniu działania w przypadku napotkania błędu wartość jest aktualnie...
Dzień dobry, To wszystko jest mało precyzyjne. Czy dane będą w określonej kolumnie? Czy można określić zakres tych danych, czy trzeba analizować całą kolumnę? Wyniki mają być w wierszu w sąsiednich komórkach? Czy ciągi danych będą rozdzielone pustymi komórkami? Czy liczba tych pustych komórek jest nieokreślona? Czy wśród danych mogą być zera ew. liczby...
Cześć! :) Mam taki problem: Mam plik Excela z listą osób: Liczba porządkowa (kolumna B), imię i nazwisko (kolumna C), potem miesiące (od stycznia do grudnia) i suma w kolumnie P. Chciałbym zrobić makro, za pomocą którego wyskoczy mi InputBox, w którym będę mógł dopisać na końcu listy nową osobę. Ponadto chciałbym, aby obok nazwiska tej osoby pojawiała...
Jak zmieniłeś nazwy arkuszów ("Arkusz1" to teraz "BAZA" a "Proszki" to "MAŁE") to w całym kodzie makra trzeba je zmienić, a nie tylko w jednej linii. Poza tym (nie chce mi się tego mocno analizować dlaczego) ale makro odczytuje ostatnią pustą komórkę w kolumnie B arkusza "Dane" jako "zapisaną". Nie wiem czego - może ktoś z kolegów wyjaśni. Dlatego dołożyłem...
MAGJA123 , nie wysiliłeś się na ten przykład. W zasadzie on niewiele wyjaśnia. Istotne jest czy dane, które chcesz usunąć występują po tych, które chcesz pozostawić czy nie zawsze. Jeśli nie zawsze, to dane trzeba najpierw posortować tak, żeby dane które mają zostać były pierwsze. Powinno wystarczyć zwykłe sortowanie, bo ono pozostawia puste komórki...
A nie wystarczy sprawdzanie poprawności danych - opcja pełna liczba i podać zakres od 0 albo od 1 do ile potrzeba. Jeśli dane wprowadzane z klawiatury i użytkownik nie jest złośliwy, to powinno wystarczyć. Co innego jeśli dane są kopiowane z innych komórek, wtedy ten mechanizm nie działa. Wstawiłem do A1. Komunikat MsgBox można wyświetlić przy zmianie...
To mój pierwszy post na elektrodzie także witam wszystkich :) Słuchajcie, szukałem rozwiązania mojego problemu w odmętach internetu, niestety ze względu na moją niedostateczną wiedzę nie jestem w stanie dostosować przykładu, który znalazłem (prób było wiele) :/ Chciałbym kopiować wartość wskazanej komórki do kolejnej pustej komórki w kolumnie innego...
Łatwiej to zrobić w drugą stronę, czyli w drugim arkuszu wpisz warunek, np. coś takiego: =JEŻELI(Arkusz1!A1<Arkusz1!B1;Arkusz1... Czyli jeżeli w Arkuszu 1 wartość w komórce A1<B1 to w Arkuszu 2, w komórkę z powyższą funkcją, wpisz wartość z komórki C1 Arkusza 1. Jeżeli warunek nie jest spełniony, pozostaw pustą komórkę.
Zakładam, że w każdym wierszu będą dwie kontrolki zależne. W Excelu 365 na karcie Wstawianie znajduje się pole do wstawiania tych kontrolek. [syntax=text]Wstawianie > Kontrolki > Pole wyboru[/syntax] Aby wstawić kontrolkę należy zaznaczyć komórkę (lub komórki) i kliknąć przycisk. Standardowo kontrolka jest powiązana z komórką, a w tej komórce...
Jeżeli to operacja jednorazowa to: w excelu 2003 i niżej : Zaznacz kolumnę z danymi. Menu Dane - Filtr ... - Filtr zaawansowany. Zaznaczasz kopiuj w inne miejsce. Okienko z warunkiem zostawiasz puste. W okienku celu ("Kopiuj do:") zaznacz pierwszą komórkę gdzie ma być wklejona lista. zaznacz "Tylko unikatowe rekordy" i wciśnij ok. w excelu 2007 i wyżej...
Nagraj makro i dostosuj do swoich potrzeb. Dzięki. Nie pomyślałem i rzeczywiście udało się. Będę tylko wdzięczny jak ktoś mi podpowie co należy dopisać jeżeli chcę np edytować komórkę w kolumnie C pod ostatnią wypełnioną komórką (w kolumnie są też puste komórki) Dodano po 1 Mam takie teraz makro: [syntax=vbscript]Sub wstawianie_bezduplikatów() Sheets("Arkusz1").Select...
Witam. Mój problem polega na tym, że chce wprowadzić uwagi do określonego wiersza poprzez przycisk VBA. Najpierw. Szukanie liczby porządkowej w kolumnie A. Następnie wprowadzenie do kolumny E danych tekstowych. Wiem że da się to zrobić klikając myszką w odpowiednią komórkę. Jednak ma to być zrobione przez VBA z wyskakującym MsgBox. Utknąłem niestety...
Spróbowałem. Niestety nie działa, albo jak kto woli działa tylko nie tak jak potrzeba :cry: . Mianowicie w obecnym kształcie makro przeszukuje kolumnę z typem łożyska (później będzie przeszukiwać wszystkie kolumny bazy, aby móc wpisywać różne kryteria szukania, nie tylko typ łożyska) i z jakiegoś powodu wypisuje wszystkie wersy gdzie komórka kolumny...
Ponieważ dziś jest Dzień Matematyki to jeszcze jedno rozwiązanie niestandardowe, z wykorzystaniem funkcji MEDIANA: [syntax=text]=MEDIANA(4;40;N(H2))[/synta... N (w starych Excelach <=2007 jest to L) jest użyta, aby zinterpretować pustą komórkę lub zawartość tekstową jako 0.
Wykorzystuję w Excelu czcionkę Wingdings do budowy znaków specjalnych, są komórki scalone i wykorzystując formułę typu: = JEŻELI($R$10>myLimit;"J";"") i następnie publikuję do html za pomocą funkcji: ActiveWorkbook.PublishObjects.Add(xlSour... Katalog1 & "Nazwa1.htm", "NazwaZakladki", zakres1, xlHtmlStatic, "vvvvv", "") Wszystko gra poza przypadkami,...
Jeśli chcesz, żeby po zaznaczeniu więcej niż 1 komórki była brana pod uwagę tylko pierwsza z zaznaczonych, to możesz dodać linię: [syntax=vbscript]If Target.CountLarge > 1 Then Set Target = Target(1)[/syntax]przed tą linią, którą masz zaznaczoną na żółto. Całościowa propozycja w załączniku. Zasady są nieco inne. Zasięg działania w arkuszu nie jest ograniczony,...
Dzień dobry, Jeśli to ma być zrobione jednorazowo, można użyć Filtra zaawansowanego, jak w pliku przykładowym. Danym trzeba nadać nagłówek, potem taki sam musi być w zakresie kryterium. Jako kryterium wpisać gwiazdkę. Wybrać opcję filtrowania Kopiuj w inne miejsce. Jeśli lista nie zawiera duplikatów, można też użyć funkcjonalności Usuń duplikaty. Należy...
Działa.. ale tylko jeden (mam tych plików od 43_01 do 43_13. Niestety po zmianie adresu na 43_02.xls zwraca tylko puste komórki. Ale pierwsze punkty już lecą, dzięki!
Musisz wyznaczyć ostatnią zapisaną komórkę w danej kolumnie, przykład dla kolumny D: cbrman wydaje mi się, że jeżeli będzie pusta komórka lub kilka w ciągu danych, to raczej Twój kod nie zadziała. Pokaże adres niepustej komórki przed pierwszą pustą. Dodatkowo paweltsg nie napisał niestety, czy chodzi mu o kolumnę, czy wiersz.
Najpierw wyznacz pierwszą wolną komórkę [syntax=vbscript] lastRow = Range("BZ" & Rows.Count).End(xlUp).Row + 1 If lastRow < 3 Then lastRow = 3 End If [/syntax] nastęnie wkopiuj: [syntax=vbscript] Sheets("Dane").Range("BZ" & lastRow) [/syntax]
Odwróciłbym kolejność. Wpisywał "z palca" nadgodziny i liczył etatowe. Nadgodziny raczej nie zdarzają się codziennie i można zostawić komórkę pustą... http://obrazki.elektroda.pl/8776059500_1...
Coś bardzo namieszałeś z tą kolumną AA. Po pierwsze: dlaczego są tam odwołania do komórek A131 i A132, które są puste, a nie do komórek A10 i A11, jak było pierwotnie? Po drugie: Po co jest dodany ten Arkusz2? Czy on ma być używany do obliczeń, czy pełni tylko jakąś funkcję kontrolną? Po trzecie: Opisz słowami, ewentualnie przykładem w pliku, co ma...
Dzień dobry, Proszę załączyć plik w Excelu, bo na podstawie obrazka trudno coś konkretnego doradzić. W pierwszym wierszu formuły na początku zapewne powinno być $E$3 a nie $E$2, poza tym nie wiadomo jak są zdefiniowane TABELA2 i TABELA3, nie wiadomo po co przy średnicach jest znak Φ, dane stają się wtedy tekstami, a wtedy łatwiej o błąd. Jaką rolę...
Niestety, nie poradziłem sobie. Przeceniłeś moje umiejętności. Wielkie dzięki za pomoc!!!! Mam kolejny problem. Tym razem w Excelu 2010. Mój Excel traktuje pustą komórkę, jako komórkę o wartości 0. A chciałbym, żeby traktował ją jako faktycznie pustą. Czy da się tak ustawić?
Chodzi o to, że Excel traktuje pustą komórkę jako wartość zerową. Konieczne jest sprawdzenie CZY.LICZBA. Wpisz jako formułę formatowania warunkowego =ORAZ(CZY.LICZBA(A1);A1=0...
Rzeczywiście. Nie znałem tej opcji, tym bardziej że dla pewności właśnie sprawdzałem zakres z pustą komórką - który utwierdził mnie w moim osądzie. Wyjątku, że tylko wtedy jeżeli nazwana lista jest z pustą komórką to można coś z ręki wpisać nie znałem. Widzę że pomimo iż z excelem mam do czynienia bodajże od jego 5 wersji (jeszcze na W3.1) to jednak...
Po pierwsze, nie sprawdzaj czy jest aktywna komórka w kolumnie "C" - jeśli ma być tam aktywna to ją uaktywnij bez sprawdzania, np. Application.WorksheetFunction.CountA(Col... , o ile kolumna jest ciągłą i nie zawiera przerw, to pierwszym wierszem z wolną komórką będzie o 1 większy niż zwróci to funkcja tzn. [syntax=vb]wiersz=Application.WorksheetF...
Ze względu na to, że nie znam Access, bardzo chciałbym pozostać przy Excelu - Jeśli uda się zaprogramować plik !wprowadzenie żeby przenosił dane do wszystkich plików raportów wtedy byłyby one używane tylko do odczytu wprowadzonych danych, bez ich dodatkowej modyfikacji. W pliku do wprowadzania cześć kolumn będzie docelowo ukryta a komórki z formulami...
Teraz działa dobrze ale tylko wtedy kiedy wpisuje pojedyncze wartości. Jeśli wklejam kilka wartości to wartości "AAA" nie są zamieniane. Druga sytuacja jeśli wklejam kilka wartości a pierwsza wartość to "AAA" to wszystkie wartości wklejane zostają zastąpione wartością "BBB" nawet puste komórki. (at)ElektrodaBot
Jeśli ustawię Enabled = False nie wyświetla mi wartości komórki A label nie ma ControlSource Przepraszam, mój błąd. Ustawiłem przypadkowo na pustą komórkę i dlatego nie wyświetlało wartości :)
Ja w "międzyczasie" napisałem coś takiego: [syntax=vbscript]Sub GoalSeekinRange() Dim i As Long, RngForm As Range, wks As Worksheet Dim RngGoal As Range, Rngx As Range Set wks = Worksheets("Brudnopis") Set RngGoal = wks.Range("L5:L9") Set Rngx = wks.Range("J5:J9") Set RngForm = wks.Range("K5:K9") For i = 1 To RngGoal.Count If IsNumeric(RngGoal(i)) And...
Witaj Z matematycznego punktu widzenia każda liczba pomnożona przez zero daje wynik zero. Podczas obliczeń Excel domyślnie pustą komórkę pomija lub traktuje jako zero. Napisz w jakim kontekście przy mnożeniu przez zero Excel ma traktować zero jak jeden. Pozdrawiam
Kolumna A: Nr domu Kolumna B: funkcja "=JEŻELI(C1;"/";"")" Kolumna C: Nr lokalu Funkcja w kolumnie B sprawdza, czy coś jest w kolumnie C (oczywiście chodzi o komórki w tym samym wierszu). Jeżeli jest wstawia znak '"/", jeżeli nic nie ma zostawia pustą komórkę.
Moim skromnym zdaniem niepotrzebnie aktywujesz kolejne obiekty. -szukanie pierwsze pustej najlepiej zrealizować przez skok z ostatniej komórki kolumny: end(xlUp).row +1 (nagraj Ctrl+strzałka w górę). Szkoda czasu na pętlę. -arkusz można sortować odwołując się do nazwy/indeksu (nie musi być aktywny) Najwięcej czasu pochłania zapewne kopiowanie i tu nic...
Witam, Nie znam się na vba a potrzebuję makro, które jedzie po wszystkich wypełnionych komórkach w kolumnie (aż napotka pustą komórkę) i zamienia treść na nr wiersza. Czy mógłby ktoś pomóc?
Nie wiem jak usunąć duplikaty tak, aby zastąpił duplikowaną wartość pustą komórką. Jeśli chodzi o efekt estetyczny to można go uzyskać przez wprowadzenie dodatkowej kolumny z formułą jak na zrzucie :D 927700
Makro czy funkcja w tym przypadku to żaden problem. Kłopotem jest to czy to co przedstawiłeś jest "prawdą". Czyli czy nie ma innych danych w arkuszu oprócz tej tabeli - tak jak to przedstawiłeś (bez nagłówków i innych danych w innych komórkach - inne komórki "czyste")? (A może zawsze tabela "ściągana" ma te same "namiary komórkowe"? ) Czy może jednak...
Witam, Proszę o pomoc w napisaniu makra, dzięki któremu po kliknięciu nazwy obrazka w komórce A1 w Arkuszu1 pojawi się ten obrazek a po kliknięciu w dowolną pustą komórkę obrazek zniknie. Obrazek będzie umieszczony np. w Arkuszu2.
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...
witam piękne dzięki radio poszło bez karty mam jeszcze jedno pytanie jak kolega przesuną ten plik ja czytałem ten plik progaramem motorola C versja 6.2 jako MC68HC11K4 ponieważ program nie chciał się zgłosić z MC68HC11PA8 może dla tego pierwsze komórki były puste dobrze było by wiedzieć jak przesuwać te pliki do normalnych adresów pozdrawiam
Dim Czas As Long Dim hh,mm,ss As Long Dim ZmienCzas As String Dim index As Int16 = 1 While True Czas = Cells(index,2) if Czas = 0 or czas = Nothing then Exit While End If hh = Czas \ 3600000 mm = ((Czas Mod 3600000) \ 60000) ss = ((Czas Mod 60000) \ 1000) ZmienCzas = hh & ":" & mm & ":"...
Do While Worksheets(1).Cells(Wiersz, kolumna).Value <> "" 'Tu rób co do ciebie należy lub nie rób nic Wiersz = Wiersz + 1 Loop W zmiennej "Wiersz" będziesz ostatnią sprawdzaną pustą komórkę. Zmienna "kolumna" <- tu podaj którą kolumnę będziesz sprawdzał To rozwiązanie mimo że zadziała, nie jest dobrym sposobem z dwóch powodów: 1. jest czasochłonne...
Bym podejrzewał jakiś Twój błąd w obsłudze willem`a (być może nawet w programie). PICe wymagają napięcia programującego min 12V na nóźke MCLR i napięcia 5V na zasilanie ,a wartość 0x3FFF oznacza komórke pustą (komórka ma 14 bitów)
Funkcja jeżeli była by ok jeśli by zostawiała pustą komórkę . Ale zostawia 0 i to nic nie daje Dodano po 40 Udało mi się już zrobić funkcję jeżeli aby zostawała pusta komurka ale mimo wszystko podczas tworzenia wykresów bierze się je pod uwagę ...
Jak zaznaczę tą pustą komórkę i dam tą funkcję to w zakresie mam całą kolumnę w której chce zliczyć te oceny a w kryteriach co pomocy Dodano po 2 Juz sie z tym uporałem temat zamykam.
A jak ograniczyć żeby nie sprawdzało całego arkusz jak dam wiersz=wiersz+1? Pętla przerwie działanie jeśli trafi na pustą komórkę, więc jeśli w danych nie ma "dziur", to nie ma problemu. W innym przypadku musisz wyszukać ostatnią niepustą i do niej ograniczyć licznik pętli.
[syntax=vbscript]For Each ws In ThisWorkbook.Worksheets Call PrintRange(oFile, ws.Range("A7:D46")) Call PrintRange(oFile, ws.Range("F7:I46")) Call PrintRange(oFile, ws.Range("K7:N46"))[/syntax] Przyjąłem takie zakresy i gdy np. dla zakresu K7:N46 mam pustą komórkę M32 to nie zaczytuje tego do pliku.
Może źle zdefiniowałem pytanie fraza jest automatycznie przypisana do linku kierującego bezpośrednio na stronę z określonym hasłem poprzez utworzone hiperłącze mam po prostu gotowe linki do strony internetowej.Tylko że jak mam kilka linków w kolumnie to chciałbym żeby po najechaniu na każdy z osobna myszką otwierała się za każdym razem inna strona internetowa...
Czy bez funkcji "jeżelibłąd" tylko przy użyciu "wyszukajpionowo" da się to zrobić? No tak da się :D jednak jeśli musisz uniezależnić się od błędów to tylko wtedy nie zobaczysz symboli błędów w takiej tabelce w sytuacji gdy komórka C5 będzie pusta :cry: lub będzie miała wpisane nazwisko spoza listy :cry: Praktycznie tego typu formuła nie będzie również...
Witam, jako początkujący w VBA zaciąłem się nad zagadnieniem jak skopiować dane z kilku zakresów w jednym arkuszu do drugiego arkusza w momencie wyboru i wskazania konkretnej komórki. Mam arkusz formularza, z którego chcę uruchamiając makro, otworzyć arkusz rejestru i bez przeszukiwania pierwszego wolnego wiersza wskazać dowolną zaznaczoną przez siebie...
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ą...
ea - stos, w którym komórka wskazywana przez wskaźnik sp jest pusta, przy odkładaniu najpierw jest zapisywany element, potem zwiększany wskaźnik. fa - komórka pod sp jest zajęta, najpierw jest zwiększany wskaźnik sp, potem jest odkładany element. ed - najpierw jest zapisywany element, po czym wskaźnik jest zmniejszany (wierzchołek stosu znajduje się...
Pewnie pierwsze dane masz w drugim wierszu, u mnie był w 3, zamień: For k=3 na For k=1 (sprawdzanie od pierwszego wiersza). Makro sprawdza kolumnę B od dołu, widocznie są u Ciebie jakieś puste wiersze ... Jeżeli wiesz ile masz komórek w kolumnie B do sprawdzenia wpisz na sztywno (3500 to ilość wierszy) : zamiast: For k = 3 To Cells(Cells.Rows.Count,...
Witam. Chodzi mi o to, że mam dwie tabele z wynikami meczy i chcę przenieść wynik jednej tabeli do drugiej, ale tak żeby jak się zmieni w pierwszej to automatycznie też będzie się zmieniał w drugiej. Zrobiłem to przez scalenie dwóch komórek metodą kopiuj --> wklej łącze, ale jak pierwsza tabela (komórka) jest pusta to w drugiej wyskakuje mi zero, a...
Cześć wszystkim szukam rozwiązania do automatycznego wstawiania zdjęć na podstawie wartości z komórki. Zamieszczam plik przykładowy. Arkusz1 -> tabela, która powstaje z zapytania PQ (zmienna ilość wierszy); jest to lista towarów wraz z ich indeksami i cenami; wiersz 2, 8, 11 to nazwy grup towarowych (Metalowe, Narzędzia, Malarskie); w kolumnie A w wierszach...
Noo, jak by to powiedzieć... napisałem ;) Kliknij prawym klawiszem w zakładkę arkusza i wybierz 'Wyświetl kod' Znajdziesz tam procedurę zdarzeniową arkusza. Z prawej u góry jest lista wszystkich dostępnych procedur. Wybierz sobie którąś i pokombinuj. Do niemal wszystkich, jak można zauważyć, przekazywany jest argument 'Target'. To zmienna obiektowa...
Cześć Czy ktoś pomoże rozwiązać mój problem? :) W Excelu posiadam okno UserForm z polem TextBox. Chciałbym aby po wpisaniu numeru seryjnego np, G20A61627 excel wyszukał je w jednym z arkuszy w kolumnie oraz podał obecną godzinę w tym samym wierszu, natomiast kolumnę obok numeru seryjnego. Obecnie kod wyszukuje wolne pole w kolumnie "Data oddał" https://obrazki.elektroda.pl/6582089700_...
Zmień na: [syntax=vb] Option Explicit Private Sub Workbook_Open() If ThisWorkbook.Name = "wzór.xlsm" Then With ThisWorkbook.Sheets("Arkusz1") '<--Tu nazwa twojego arkusza .Range("E18").ClearContents '<--czyści tylko wartości zostawia formatowanie .Range("E18").Clear '<--- czyści i wartości i formatowanie 'Range("E18").Value = "" wstawia do...
Kopiuj ze zrozumieniem bo dopiero teraz zrozumiałem że masz podział na miesiące więc pierwsze dwa warunki po "oraz(" należało by uzależnić nie od pustych komórek tylko od zmiany miesiąca. Aha i w twojej drugiej tabelce masz błąd w styczniu - nie bierzesz wszystkich danych za stycznia.
Dzień dobry, Używając funkcji NETWORKDAYS należy pamiętać, że funkcja po pierwsze uwzględnia w obliczeniach zarówno pierwszy, jak i ostatni zadeklarowany dzień - to jest ważne gdy daty mamy w tabeli i okres jest podzielony na podokresy. Po drugie - funkcja standardowo pomija soboty i niedziele. Po trzecie - jeśli trzeba pominąć dodatkowo dni świąteczne...
A pierwszy wiersz w kolumnie B masz wypełniony? Zliczasz niepuste komórki i jeśli pierwsza jest pusta, nie wyszuka Ci ostatniej wartości. Wówczas zmień linijkę: [syntax=vbscript] For r = 2 To Application.CountA(Sheets("baza").Range(... [/syntax]
To ten problem mam z głowy, ale nurtuje mnie inny. Mianowicie w innych funkcjach próbowałem tak samo, ale to nie działa, bo np. w funkcji LICZ.JEŻELI wpisałem analogicznie jak mi mówiliście: =LICZ.JEŻELI(N37="";"";LICZ.JEŻELI(N37:X... i dalej jest wyświetlane to zero, a chciałbym pustą komórkę do momentu wprowadzenia danych. Podobny problem mam z...
Z góry uprzedzam, że znawcą nie jestem, ale: - spróbuj we właściwościach osi wykresu zmienić wartość minimalną z 0 np. na 0.0001 i format opisu osi na liczbę bez znaków po przecinku i zobacz, czy to coś dało; - albo prawoklik na wykres, "Zaznacz dane", w nowym oknie na dole po lewej przycisk "Ukryte i puste komórki", z listy wybierz "Połącz punkty danych...
Jeżeli komórka H jest pusta ORAZ w komórce w kolumnie I jest fragment tekstu (Chor, Reh, Wyp, Zas), to zastąp pustą komórkę w kolumnie H tekstem z kolumny I A słyszałeś coś o odwołaniach cyklicznych :D To jest właśnie to co Ty chcesz zrobić :cry: Proponuję w tej kolumnie K zrobić prostą formułę =JEŻELI(ORAZ(H2="";I2<>"");I2;"") i uzyskasz w wyniku...
Witam Mam napisane makro na wyszukanie pierwszej pustej komórki i działa dobrze, ale ja potrzebuję aby wyszukało pierwszą komórkę o zawartości 0,00 . Wartości 0,00 kopiowane są za pomocą formuły z innego arkusza. Pozdrawiam.
Plik jest istotny, tylko Ty zdaje się sprawy nie potraktowałeś zbyt poważnie, a to przecież Twój interes, nie nasz. W ramach drobnej złośliwości podrzuciłeś nam plik o "wadze" prawie 8 MB. Na innym forum to by nie przeszło. Czy Twój plik faktycznie tak wygląda? W kolumnie wyników są tylko zera, teksty albo błędy zamienione na "Brak"? Po co wobec tego...
Dzień dobry, Nie bardzo wiem w czym problem, to jest normalne sortowanie, górny wiersz będzie wierszem nagłówkowym (tabela ma nagłówki), a pierwszej kolumny nie należy zaznaczać jako obszar do sortowania. Gdyby z tym były jakieś problemy (bo Excel ma tendencję do zaznaczania do sortowania wszystkich przylegających komórek), to można dodać pustą kolumnę,...
Sprawdź takie makro: Cells(CC, 3).Cut zastąp linijką Cells(CC, 3).Copy . Makro działa od pierwszego wiersza, jeśli pierwszy wiersz Twojej tabeli to nagłówek, początkowe parametry CA oraz CC zmień na numer wiersza, od którego zaczynają się faktyczne dane. Makro działa do momentu napotkania pierwszej pustej komórki w kolumnie C.
Wydaje mi się, że na moje potrzeby jest ona zbyt automatyczna i może być tak, że będzie więcej formuł kopiować niż ja potrzebuję. Poza tym tak jak wspomniałam, nie chcę żeby formuły były widoczne, chcę je zamieniać na wartości, aby odciążyć plik. Poza tym nie chodzi tylko o taką prostą funkcję dodawania. Wolałabym, aby ktoś pokazał mi jak makro odnieść...
Można, ale w komórce A1 musi być jakakolwiek zawartość (wystarczy pusty tekst, ale komórka nie może być pusta).
Spróbuję uszczegółowić. Użytkownik wpisuje w kolumnę B jakąś wartość dodatnią (należy zabronić wpisu 0 lub mniej niż 0). W zakresie D : O wstawiane jest automatycznie 9 a kolor komórki zmienia się na zielony. Użytkownik może zostawić pustą komórkę w kolumnie B i nic się nie dzieje i nie zmienia. Mamy zatem wpis w kolumnie B (np. 270,00) i automatycznie...
Witam, sprawa wygląda tak: 1. Jak wcisnę ctrl+c to program zamiast kopiować daną komórkę zaznacza pewien obszar tabeli lub całą tabelę 2. Jak wcisnę ctrl+c, a komórka którą chcę skopiować jest oddalona co najmniej o jedną pustą komórkę od tabeli to ctrl+c nie działa 3. Jak operuję myszką, to funkcja "kopiuj" działa i wszystko jest ok 4. ctrl+v działa...
Mnóstwo się dzieje.;) Aż jedna linijka: [syntax=vb]Function GetFirstEmptyRow(Sht As String) As Long GetFirstEmptyRow = Sheets(Sht).Cells(Rows.Count, "A").End(xlUp).Row + 1 End Function[/syntax] A dla Autora załącznik. Nie zapomnij zmienić iLastPos z Integer na Long oraz [syntax=vb]iLastPos = GetFirstEmptyRow(ThisWorkbook.Worksheets... - 1 [/syntax]...
Przecież kolega spoli już ci powiedział co powinieneś zrobić. Wpisz w D26 =JEŻELI(LUB(A26=0;B26=0;C26=0... i skopiuj w dół i w górę Funkcja wykaże pustą komórkę jeżeli którykolwiek z parametrów w kolumnie A B C nie będzie podany. Innymi słowy muszą być wszystkie 3...
Jak Cells(n, m) nie puste, to m+1 nie działa, - I o to chodzi : ) Kryteria do filtrowania znajdują się w kilku kolumnach, które są położone obok siebie i mają różne długości. n- to numer wiersza m-numer kolumny n zwiększa się przed sprawdzeniem powyższego if, jeżeli w danej kolumnie już zostały sprawdzone wszystkie kryteria to cells(n,m) wpada na pustą...
Pierwszą rzeczą, która przychodzi do głowy jest Autofiltr na przemian przez kolumny i Kopiuj SpecialCells(xlCellTypeVisible)
Po pierwsze odczytany plik zapewne zawiera całą pamięć, wraz z pustymi komórkami na końcu - to może być przyczyną większego rozmiaru. Dalej może program kompilowany był na innej wersji kompilatora - to czasem rodzi pewne trudności.
Zakładam wątek bo przejrzałem większość postów na forum i niestety nie mogę znaleźć dodam, że jestem zielony jeśli chodzi o pisanie makr Problem wygląda następująco, mam do wykonania makro które przedrukowuje z excela do pdf wraz z przygotowaniem obszaru do wydruku. Chciałbym żeby wyglądało tak że pierwsza strona składa się z 70 komórek, zaś każda kolejna...
Jeżeli kolega zapisuje tylko jedną komórkę w pamięci to mogę podsunąć jeszcze jeden sposób, który kiedyś się komuś może przydać a mianowicie wykorzystane jest pewnie tylko kilka wartości z przedziału 0-255 więc można ustawić jakąś wartość komórki pustej a następnie odczytywać ostatnią zapisaną lub zapisywać pierwszą nie zapisaną komórkę kiedy się skończą...
excel pierwsza pusty komórka pusty komórka excel pusty komórka
zapalona kontrolka akumulatora stacyjka sterownik odszraniania smart goodram
drzwi balkonowe drzwi balkonowe
Dlaczego psuje się dekoder DVB-T2? Przyczyny awarii Jak ustawić czujnik ruchu i zmierzchu?