Wszystko zależy od tego, w jakim formacie będziesz miał dane, które dostaniesz. W przykładzie jest to x, y, z, x, y, z na przemian. To by oznaczało, że już przy pierwszym pytaniu pojawią się wszystkie nazwiska, jeśli nic się nie zmieni. Możesz skopiować te nazwiska (jednokrotnie, tak jak w arkuszu na drugiej stronie) i wkleić je tam, gdzie być mają....
Excel nie "wydaje się naturalny" jako źródło danych przy wielodostępie. Już prędzej MS Access. Oprócz SQLite o którym wspomniałeś (do obsługi polecam GUI SQLite Studio) warto przyjrzeć się też kompaktowej edycji SQL Servera. Ta ostatnia jest dostarczana z pakietem Visual Studio, który dodatkowo wspiera jego obsługę w designerze. Co więcej, nawet w wersji...
Wiesz co wziąłeś się za makro nie do końca chyba rozumiejąc zasady. Pierwsza część: Po co to, jak jeszcze nie wprowadziłeś żadnych danych do tablicy: AA = tablica(a, f) BB = tablica(b, f) CC = tablica(c, f) DD = tablica(d, f) EE = tablica(e, f) Wszystkie wartości tych zmiennych (AA BB itd.) będą puste. Druga rzecz Wydaje mi się że nie te pętle zastosowałeś...
Witam! Jestem tu nowa, więc bardzo proszę o wyrozumiałość i pomoc. Mam dwa pliki (dokument A i dokument B). W dokument A mam Arkusze o nazwach od A do L- wszystkie mają identyczny układ. W dokument B jest tylko jeden arkusz w którym w kolumnie C "wymienione" są kolejno wszystkie arkusze z dokument A. Moje pytanie czy istnieje możliwość zaprogramowania...
Nie musi być ostatnia, ale tak było w przykładzie. Przykład powinien być adekwatny do rzeczywistych danych, a nie warto komplikować kodu "na wszelki wypadek".
Niestety nie znalazłam błędu po rozszerzeniu do 6 miejsc. Zrobiłam na tej samej zasadzie sumowanie kolumny G i działa poprawnie . Próbowałam też puste miejsc wypełnić zerami ale nie pomogło. Range("A1").Select Selection.End(xlDown).Select ost_kom_kolumny = ActiveCell.Address(False, False) ilosc_wierszy = Range("A1", ost_kom_kolumny).Count Range("E1").Select...
Pomijając literówkę w przypisaniu, zamienione argumenty w Cells(row, column), zakręcony wybór kontrolki w pętli, to zdaje się coś za dużo tych pętli. Po modyfikacji http://obrazki.elektroda.pl/3585684200_1...
Ja w tym kodzie błędów nie widzę - makro działa tak, jak je zapisałeś. Nie kończy się na wierszu 16, tylko ponieważ jest ono uruchamiana w zdarzeniu Change komórki, polecenie wpisujące coś do komórki: [syntax=vb]... Cells(c.Row, 12) = DateAdd("m", Cells(c.Row, 9), Cells(c.Row, 11)) ...[/syntax]powoduje ponowne wywołanie zdarzenia zmiany (co może wyglądać...
Uparłeś się przy tej hulajnodze. Jeśli koniecznie chcesz w taki sposób, to spróbuj takiego kodu: [syntax=vbscript]Sub Podstaw_kolejne_liczby() Dim lw As Long, n As Long, a As Variant Dim rng As Range, found As Range lw = Range("A" & Rows.Count).End(xlUp).Row 'numer ostatniego wypełnionego wiersza Set rng = Range("A1:A" & lw) Set found = Range("A"...
"Zwykłym" WYSZUKAJ też można.
Jeśli to jest nowy Excel, to najlepiej sprawdzi się tu nowa funkcja WYBIERZ.KOLUMNY. Tylko dlaczego ta ostatnia kolumna ma nagłówek "n", a nie liczbowy? To jest arkusz kalkulacyjny, w którym dane powinny być przede wszystkim liczbowe. Teksty pomieszane z liczbami, to jest dodatkowy kłopot. Co oznacza to "n"? Nie można go zastąpić liczbą? Tu można sobie...
Jeśli dobrze zrozumiałem chodzi o coś takiego: [syntax=vb]Sub FirstAndLast(ByVal c As Integer, ByVal cellRow As Integer, ByVal cellCol As Integer) Dim i As Integer Dim first As Integer Dim last As Integer lastindex = Cells(ActiveSheet.Rows.Count, c).End(xlUp).Row For i = 1 To lastindex If first = 0 And Cells(i, c).Value <> "" Then first = i End...
W załączniku twój przykład. Rzeczywiście przy umieszczeniu kodu w module trzeba było troszkę jeszcze poprawić kod (co uczyniłem powyżej). [Ukierunkować na odpowiedni arkusz] Co do tabel: Proponuje najpierw wcisnąć przelicz a potem opisywać kolory. Chyba że kolory będą zawsze przypisane temu samemu odbiorcy. Wtedy przydałby się arkusz ze słownikiem....
Wartości ujemne: Najlepiej skorygować przy imporcie, wystarczy kilka poprawek w istniejącym makro[syntax=vb]Sub kopiuj_z_pliku() Dim kom As Range Windows("plik importu.xlsm").Activate 'wskazane wybranie właściwego arkusza Range("A2:K1000").Select Selection.Copy Windows("rozliczanie palet.xlsm").Activate Sheets("Import").Activate 'dodałem Range("A3").Select...
Ja zastosowałbym zwykłą sumę warunków: SUMA.WARUNKÓW($F:$F;$A:$A;$H6;$B:$B;I$4) w pierwszej komórce zakresu. Suma iloczynów nadmiernie męczy komputer (w każdym razie mój :) ). Natomiast w komórkach I41:I71 zwykłą sumę I6:L6 ... I36:L36 Ponadto datę w ostatnich dwu wierszach kolumny dni (H35 i H36 oraz H70 i H71) warto dodać jeszcze jeden warunek, żeby...
Tak, funkcja lewy kopiuje od początku. A jak chcesz ze środka to możesz skorzystać z funkcji fragment.tekstu . Opisy tych funkcji i przykłady użycia są w pomocy, więc nie warto się za bardzo o nich rozpisywać.
Cześć, Mam jeszcze jedną prośbę o pomoc w Excelu. Otóż mam arkusz zawierający tysiące linii, a ostatnia kolumna jest ustawiona alfabetycznie i ma mnóstwo powtarzających się wartości. Jak można by wizualnie zgrupować te powtarzające się wartości od następnych? Przykład poniżej i w załączniku. Mam to co po lewej, a chciałbym uzyskać coś podobnego do tego...
[syntax=vbscript]ostatnia = Columns("C").Find("*", SearchDirection:=xlPrevious, SearchOrder:=xlByRows, LookIn:=xlValues).Row[/syntax]
nadal zwiększa się ostatnia wartość - 18 Przeciągnij sobie same wartości liczbowe, a dopiero potem zmień dla całego zakresu na pożądany format niestandardowy :idea:
:) 8-) Bez przesady. 8-) to ułamek mojej wiedzy 8-) :) Nie no ... oszukuje :) Na poważnie: Miło że Ci się podoba ale kod makra nie jest zbyt ambitny. Może ktoś zrealizuje to prościej ale niestety mam kocioł w pracy i muszę się "wyłączyć". (ostatecznie pomagać wieczorami) W załączeniu poprawki. Zapomniałem wspomnieć Arkusz "Zlecenia" ma się tak nazywać...
Aktualnie kończy mi się lojalka w tp, multipakiet1024. Na multipakiecie (tv przez neostradę) mi nie zależy, ale cena jest ok. Na jaki internet się zdecydować? Do tego warto też było by się rozejrzeć za jakimiś pakietami. W załączniku excel z rachunkami za ostatnie 6 miesięcy. Co przy takim użytkowaniu polecacie? Dużą ilością międzynarodowych w ostatnim...
Dzień dobry jeszcze raz, Chwilę to trwało, bo jak zacząłem dodawać swoje funkcje "słownie" stwierdziłem, że procedura Staz nie jest doskonała i uznałem, że warto ją podmienić na coś innego. Zapewne dałoby się ją poprawić, ale to już pozostawiam Autorowi, jeśli uzna za celowe. Niestety w VBA nie ma takiej wygodnej funkcji jak półoficjalna DATA.RÓŻNICA...
Jeżeli wystarczy formatowanie warunkowe pokazujące rekordy zawierające dany ciąg znaków wystarczy stworzyć regułę z wykorzystaniem formuły (ostatnia pozycja: Użyj formuły do określeni...) Zaznaczyć wszystkie rekordy (zakładam w kolumnie A) i w miejsce formuły wpisać np: =JEŻELI(LEWY(A1;$B$2)=$C$2;1;0) Następnie ustawić format. W komórce B2 wstawisz...
Hej. Potrzebuje pomocy z przepisywanie danych do innego wiersza : Opis sytuacji : Mam przykładowo komórkę B2 - w tej komórce co jakiś czas zmienia się wartość (live) - połączenie ze sterownikiem Chciałbym, aby ostatnia wartość została zapisana do innej kolumny przykład E2 i później kolejne zmienne zapisywały się poniżej E3,E4,E5 itp.. Czy ktoś może...
To co radzi ci Lutek49 jest właśnie rozwiązaniem na twój problem. Jeżeli chcesz wiedzieć tylko chwilowo jaką masz sumę dla danego miasta przy zastosowanym filtrze zaznacz po wybraniu np. Warszawy komórki z liczbami, a na pasku stanu pojawi sie suma (jeżeli jest ustawiona jako suma a liczby są liczbami a nie tekstem). Możesz to zrobić "automatycznie"...
Wykorzystaj Wyszukaj.pionowo() lub podaj.pozycję() w obu przypadkach z zerem jako ostatni argument. Jeżeli danego nr pesel nie będzie na drugiej/przeszukiwanej liście, funkcja zwróci błąd (#N/D). Czyli gdzie będzie błąd tego numeru pesel brakuje. Edit --------------------------- Teraz zerknąłem co zaproponował kolega Yogi - czyli to samo tylko bardziej...
CZeść czy ktoś mógłby mi pomóc w treści kodu makra, który wyszukuje na podstawie danej wartości w komórce np.AO1O_00123456_0 wyszukuje wartość która jest nazwą pliku i automatycznie dodaje hiperłącze? Tzn w moim przypadku wyszukuje po całej wartości która jest w komórce np. AO1O_00123456_0, a chciałabym żeby móc również modyfikować kod żeby wyszukiwał...
Nie wiem jak to jest we wcześniejszych wersjach, ale w E2007 ostatnia pozycja listy: zapisz jako>inne formaty>zapisz jako typ to "Arkusz kalkulacyjny OpenDucument (*.ods)" Niestety ale chyba nic z tego, po zapisaniu w ten sposob jednak openoffice nie obsluguje tego makra. Przynajmniej u mnie.
Ja tak między wódkę a zakąskę :) ale: Umieszczanie zmiennej w komórce jest poza pętlą. Wpisana zostanie TYLKO ostatnia znaleziona...
Przykład w załączniku formularza do którego mi jest to potrzebne. Na zakładce SPT mam kolumnę Wynik z którego są obliczenia do zakładki RC. Chodzi mi o to żeby na RC wyliczały się wartości jak w formułach, a potem gdy dodam na SPT 4 kolejne kolumny (Wynik, B, T, Data) wyniki zmieniły się na takie jakie będą w kolejnej kolumnie Wynik. Itd jeśli będę...
Potrzebuję pomocy przy arkuszu. Chodzi o to, że w kolumnie Wi ma być przypisane odpowiednia wartość z kolumny G*i http://obrazki.elektroda.pl/9535355400_1...
Cześć, mam pewien problem odnośnie rozwiązania przypisania danej wartości w każdym wierszu gdzie następuje kopiowanie danych z jednego arkusza do drugiego. [syntax=vbscript] Private Sub CommandButton1_Click() CutCopyMode = False Dim strPlik As String Dim i, b, z As Integer Dim data As String Application.ScreenUpdating = False ' Kopiowanie danych do...
Albrecht AE6690 działa znacznie lepiej, ale z ostatniej dostawy od ALANa przyszły sztuki w których autosquelch działa mniej ciekawie, wieć też lepiej używke. Yosan Turbo JM-3031M jest tańszy od Albrechta 6690 i to praktycznie to samo pod względem funkcji i jakości, tym bardziej jak teraz Albrecht ma te problemy z ASQ. Wadą jest okropny panel tego radia
Witam, mam pytanie dotyczące makra vba w excelu. W jaki sposób można znaleźć wartość ostatniego wiersza i dopisać wartość o 1 większą w pierwszym pustym wierszu, czyli np. komórki A5(ostatnia pełna) i A6(pierwsza wolna). Czy da się tak zrobić dla jednego wiersza piątego, ale w kilku kolumnach jednocześnie? Dodam, że wartość w tej komórce wynosi np....
tak, już do tego "doszedłem" :) Marcin230 Twoja propozycja jest jeszcze prostsza i powiem szczerze błądziłem wokól niej i już teraz widzę swój GŁUPI błąd!!! Rozwiązanie Paweliw to inne spojrzenie na temat + nowe doświadczenie i przekonanie do nowych funkcji Dużo jeszcze przede mną by poznać perfekt excela. Wiem jednak iż nie zawsze warto słuchac innych...
...i teraz tak, potrzebuje obliczyc procentowe zmiany wartosci z miesiaca na miesiac. innymi slowy, chcialbym pozbyc sie wszystkich danych oprocz tych z ostatniego dnia kazdego miesiaca... Nie do końca wiem o co ci chodzi. Procentowe zmiany z miesiąca na miesiąc a procentowa zmiana ostatniego dnia miesiąca to trochę co innego ale jeżeli chcesz tylko...
Zadanie mogłoby być rozwiązane formułami gdyby warunki były dobrze określone. Poza tym warto byłoby też podać w której wersji Excela ma to działać, bo liczba dostępnych funkcji zmienia się z wersji na wersję, szczególnie ostatnio. W sformułowaniu zadania są błędy logiczne i arytmetyczne. T. ZEWN -18 <- najbliższa możliwa wartość równa lub większa...
Wywołałeś mnie z uśpienia i tak się zastanawiam czy warto. Uporządkowanie makra to jedno (ktoś je wcześniej nagrywał i tak pozostawił). Tam jest sporo niepotrzebnych manewrów które właściwie same siebie wykluczają Tu nie ma co poprawiać starego makra tylko trzeba napisać nowe. Jeżeli to ma być tylko tak jak przedstawiłeś we wzorze to wystarczy takie...
Potrzebuje aby odwołać się do komórki w zamkniętym pliku Excel, adres komórki jest zależny od zmiennych. Ostatnia linijka kodu jest napisana błędnie ... Jak bardzo zależy od zmiennych ? Bo jak nie za bardzo, to można obsłużyć to zwykłymi wzorami. Przykład pobrania zawartości komórki ' A4 ' z arkusza ' Arkusz1 ' z pliku (niezahasłowanego) o nazwie '...
Sprawdź, jak to działa (załącznik). Nie wiem, jakbyś chciał liczyć ceny. Ja założyłem, że: - mamy na przykład 3 dostawy po 10 sztuk towarów, pierwsza dostawa ma towar za 1pln, druga ten sam towar za 2pln, trzecia ten sam towar za 3pln, to wtedy: - w przypadku, gdy ktoś kupuje po jednej sztuce, pierwsze elementy będą miały liczoną cenę zakupu 1pln, po...
Z tą formułą jest ok jak wypełniam pola od początku kolumny, problem pojawia się gdy kolumnę zaczynam wypełniać począwszy od jej połowy np od 5 wiersza. w rocznym sprawozdaniu zakładamy że jakieś czynności robię od czerwca, do tego czasu niema danych, aby formuła poprawnie działała muszę od stycznia do maja wypełnić zerami a jest to niepoprawnie bo...
MISTRZU !!! to została ostatnia problema :D aby wstawiał z pierwszego arkusza(u) "naliczenia na wszystko" ilość tego zapotrzebowanego materiału. W arkuszach podrzędnych i wszystko będzie cacy :)
Witam Zielony jestem w Excelu, a tu przyszło mi zrobić takie coś. Dostaję codziennie pliki (takie same pliki, tak samo wyglądają), w których zawarta jest nazwa towaru, jego dostępność oraz cena w dolarach. Potrzebuję zrobić porównanie ostatniego pliku z nowo nadesłanym i wyłapanie różnic cenowych. Chodzi o to, że: nazwa towaru - cena towar 1 $25 towar...
Ale jakich makr nie umiesz stworzyć? Ja tego nie zrozumiałem. To po kolei: 1. Do arkusza "Firma 1" wklejam dane z innego pliku od kolumny E do AB - mniej ważne gdzie to wklejasz, ważniejsze co dokładnie. Czy umiesz określić zakres do kopiowania? np. A5:Z123, albo kolumny A do Z od wiersza 5 do ostatniej wartości w kolumnie C (nie może być w tej kolumnie...
Mialbym prosbe o wyjasnienie dzialania ponizszego zapisu (dodatkowo dodano rysunek) W pomocy Excela nie moglem znalesc odpowiednich opisow. https://obrazki.elektroda.pl/8058282500_... Sub Makro2() ' ' Makro2 Makro ' Makro zarejestrowane 2012-02-26, autor XXX ' ' Klawisz skrótu: Ctrl+a ' Dim pierwsza Dim ostatnia pierwsza = Range("D3").Column...
Moje rozwiązanie wyglądałoby jakoś tak: [syntax=vb] Sub Makro1() ' ' Makro1 Makro ' Makro zarejestrowane 2013-05-12, autor Darek ' ' Const S1 = 8 ' najmniejszy przedział Const S2 = 16 ' sredni przedzial Const S3 = 32 ' najwiekszy przedzial Const D1 = 3 ' tolerancja sredniej najmniejszego przedzialu Const D2 = 5 ' tolerancja sredniej sredniego przedzialu...
Cześć, Mam dwa pliki i chcę zastosować SUMIFS w VBA. Jednak mam dwa błędy 91 oraz 424 Plik 1 z którego są pobierane dane: DanedoSumIFs.xls Plik 2 - tutaj sumuje, kolumnę C z pliku 1, dla każdego kodu z Plik2 z daną datą z Plik2. Mam dwa problemy w napisanym makrze: [syntax=vbscript]Sub Makro1() Dim ok, ostk As Integer Dim ow, ostw As Integer Dim i,...
Filtruj wg kolumny z wynikami LICZ.JEŻELI http://obrazki.elektroda.pl/7228439700_1... i ostatnia czynność: kopiuj > wklej specjalnie/wartości - w z góry upatrzony arkusz. Przy odrobinie wprawy wszystko "idzie piorunem" ;)
Nie tak dawno na Elektrodzie spotkałem się z problemem, który można było prosto rozwiązać, jeżeli się pamiętało, że w arkuszu możemy używać krótkiego i rozszerzonego adresowania. Podstawowy typ adresu komórki to np. B4, c7, a dla zakresu E2:E15 lub F2:H30 (warto tu sobie zdać sprawę, że ten ostatni zakres będzie dalej świetnie obsługiwany chociażby...
To można liczyć wieloma sposobami. Zależy, czy preferujesz zwięzłe formuły, czy wolisz obliczenia pomocnicze w arkuszu. Jeśli chodzi o kategorie rozmiarowe, to w kilku pierwszych wierszach kolumny G masz kilka różnych formuł korzystających z tej tabelki pomocniczej, którą sobie przygotowałeś. Ale ona właściwie nie jest potrzebna. Od wiersza 9. jest...
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...
excel ostatnia wartość excel ostatnia niepusta komórka excel ostatnia wypełnionej komórki
grundig magnetowid pilot odbiornik niskiej częstotliwości otwartego oprogramowania
siemens pralka reset dahua wideodomofon dzwonek
Linde H25 – brak podnoszenia, diagnostyka błędów L90/L291, zawór 2Y9, hydraulika ESP8266 OTA – wgrywanie firmware przez Wi-Fi, ArduinoOTA, bezpieczeństwo, PlatformIO
