1. Funkcja znajdz() wrażliwe na dużych i małych liter. 2. Przepraszam - LICZ.JEŻELI p.s. Między innymi funkcja LICZ.JEŻELI pozwala znaki *
Witam, Mam pytanie - ogólnie nie wiem jak sobie z tym poradzić. Mam w pracy plik excela z danymi (najprawdopodobniej zrzucony z jakiegoś innego systemu). W kolumnie z kwotami (tysiące są tak jakby ręcznie oddzielane spacją), jednak excel tej spacji tak naprawdę nie widzi. Używając ctrl+h (znajdz: spacje, zamien na: 'nic') excel twierdzi, że nie ma spacji...
A wieć dodaję przykład zrobiłem to na jednym akruszu bo też tak może być . Może uda się to zrobić dzięki jakiejś funkcji np znajdz albo wyszykaj pionowo ?? Prosze o poradę
zwraca #N/D! Jeżeli masz nowego excela to spróbuj: [syntax=excel] =JEŻELI.BŁĄD(WYSZUKAJ.PIONOWO(C4;Fronty!... lub =JEŻELI(C4<>"";JEŻELI.BŁĄD(WYSZUKA... lub =JEŻELI(C4="";"";JEŻELI.BŁĄD(WYSZUKAJ.PI... [/syntax] Ja mam starego, więc u mnie działa coś takiego: [syntax=excel]...
Mówisz i masz: [url=http://stackoverflow.com/questions/... duplikat w zaleznosci od zawartosci innej komorki
Znajdz "formularze", wyswietli sie formatka z min. przyciskami. Tworzysz przycisk a nastepnie przypisujesz do niego makro.
A sorka niezauwazyłem ze temat tak sie rozwinoł! jutro sprawdze na magazynie czy mamy te kosci pamieci a jak nie to cała centrala sie znajdzie! A ile Ci krzykneli za naprawe?
Musi obsługiwać twoje piloty, na ich stronie znajdziesz bez problemu.
Wg mnie to opcje "pokazywania" plików w windowsie a nie excela. Excel nie otworzy (poprzez windows) plików bez rozszerzenia .xls (w nowszych .xlsx) (jest jeden przypadek - ale tu nie o to chodzi) Otwórz byle jaki folder. Wybierz w menu "Narzędzia" - "Opcje folderów ..." znajdz "Ukryj rozszerzenia znanych typów plików" i "odhacz", a następnie wciśnij...
Witam, Chciałbym aby tekst w komórce N2 w Arkuszu6 wyglądał tak jak tekst w komórce N3, N4 itd... w Arkuszu2 próbowałem znajdz zamien i z altem 010 wpsiałem znak entera lecz to nie o to chodzi. Potzrebne jest mi to do prawidłowego odczytu pliku CSV.
niestety u mnie po uruchominiu makra sie nic nie dzieje Pracuje na niemickim excel. Jesli chodzi o funkcje to musze tez niemickich uzywac np zamiast znajdz.pionowo - sverweis
Tu znajdziesz rozwiazanie http://blog.actuary.pl/2010/01/zegarek-n...
Wszystko zależy jak masz ustawiony w systemie odczyt i wydruk plików *.pdf Zerknij na ten temat https://www.elektroda.pl/rtvforum/topic3... Sam wydruk pliku *.pdf z Excela można uzyskać np. komendą Shell druk = Shell("c:\sciezka do programu\Acrobat.exe /t d:\sciezka\plik.pdf") To oczywiście duże uproszczenie, trzeba...
Jeśli dane mają być wpisywane w kodzie na stałe to wystarczy zrobić tabelę w html-u, tu odsyłam do lektury kursu. [url=http://www.kurshtml.edu.pl/html/tab... Natomiast jeśli chodzi o kolory to trzeba by zrobić dwa kolory tła wierszy w CSS i przy dopisywaniu kolejnych wierszy do tabelki ustawiać odpowiednią klasę. Jak to zrobić również znajdziesz...
z programu workingmodel 2d po imporcie dostałem taki plik (tylko w formacie dta.) Chodzi mi o jakas funkcje, pomysl ktory pozwolilby wartość -5.659e+004 zamienić na odczytywalną przez program. Moim jedynym pomysłem była funkcja znajdz i zamien e+004 na *10000 , ale pojawia się kolejny problem. Jak wstawić znak = w każdej komórce przed liczbą żeby mnożenie...
Witam, Mam w komórce coś takeigo (22) 5234241 Miasto <- baza klientów. Często miasto ma dwa człony. Chciałbym oddzielić to na dwie komórki Nr telefonu | Miasto <- żeby w tabelce jechać sobie miejscowościami (sortować) Nie umiem sobie z tym poradzić. Oddzieliłem Imiona i nazwiska, zostało mi oddzielenie numerów od nazw miast. Kombinowałem tak,...
Wydłubałem coś takiego: żadna francja-elegancja, ale na załączonym przykładzie Worda działa. Zrobiłem test dla ~500 tabel, im dalej znajduje się pozycja, tym dłużej muli - zamiana pojedynczej pozycji może potrwać do kilkunastu sekund - ale działa i może do czegoś Ci się przyda. Mam też nowszego Offica, więc pewnie w VBA->References będziesz sobie musiał...
Czy jest jakaś funkcja która znajdzie kolumne po nazwię nagłówka. Tak jest taka funkcja :idea: 930167
Witam Mam mały problem z makrami, sam nie potrafię sobie poradzić i mam nadzieje, że znajdzie się tu ktoś, kto mi pomoże Ale o co chodzi? Mam makro w Wordzie (Office 2007, odniesienie do biblioteki Excela): [syntax=vb] Sub dane() Dim objExcel As New Excel.Application Dim exl As Excel.Workbook Set exl = objExcel.Workbooks.Open(ActiveDocument.P... & "/excel.xls")...
Proszę sprawdzić załącznik. Plik po dekompresji "waży" ponad 2,6 MB i zawiesza Excela przy próbie otwarcia. Może zapisać plik w formacie .xls i załączyć bez kompresji. Po odzyskaniu zawartości pliku brak wykresów. Dodano po 1 Jeśli chodzi o wykres, to zastosowany sposób jest trochę udziwniony. Polega on na zastosowaniu różnych formatów daty, aby wymusić...
Chyba tu znajdziesz rozwiązanie: http://support.microsoft.com/kb/162059
Jeżeli możesz umieścić wynik w innej kolumnie niż B to wystarczy formuła: =JEŻELI(DŁ(B2)<=6;B2;(ZASTĄP(B2;SZUKA... Pod warunkiem, że 1.250,00 to 1250. Jeżeli trzeba podstawiać w tej samej kolumnie, to można tę formułę przekształcić w makro, zapętlić, postawić warunki itd Dodano po 4 Eeeh, coś mnie naszło i zrobiłem coś takiego...
Pliki excela dodawaj bezpośrednio korzystając z funkcji załącz plik. Pakuj je wcześniej do zip, wtedy załączysz je bez problemu. Obrabianie pliku generowanego przez ten OCR do Excela to będzie porażka. Pierwszym krokiem jakiejkolwiek analizy takich danych musiałoby być ich uporządkowanie. Nawet po tym algorytm próbujący rozpoznać informacje nie będzie...
Potrzebuje pomocy. Potrzebuje makra, które zrealizuje mi coś takiego - otwiera automatycznie dwa dokumenty - jeden jako dokument xls drugi jako txt. To mi działa. Chciałbym aby z pliku txt z komórki A2 szukał jej w pliku xls po komórkach A i jeżeli znajdzie pasujący wynik to wklei zawartość w pliku txt do xls ale od kolumny B. Prawda jest taka, że nie...
Witam raz jeszcze, Mam nadzieję, że piszę już po raz ostatni w tym temacie, ale nie daje mi on spokoju, ponieważ makro traktuje wszystkie procedury jako True. A sądząc z warunku If, jeśli nie znajdzie odpowiedniego wymiaru w tabeli, to powinno być False. Nie wiem też czemu po podświetleniu w kodzie słowa knyps, zawsze wyświetla się knyps=True, a moim...
[syntax=vb]Sub Znajdz() ostw = Cells(Rows.Count, "A").End(xlUp).Row For x = ostw To 1 Step -1 If Cells(x, 1) >= Cells(1, 3) Then Cells(1, 4) = Cells(x, 2) Next End Sub [/syntax] P.S. "Zależy mi na tym, aby obejść się bez makra. " Niedoczytałem...
Chcę zrobić makro które wyszuka dany fragment tekstu i zamieni go na podany w danej komórce. Nagraj sobie makro z przeprowadzania procedury systemowej "zamień (ctrl+H)" i w odpowiednie miejsca wprowadź swoje comboboxy :idea: Wszystko rozumiem, ale "zamień (ctrl+H)" w "znajdz" wpisuje szukana frazę i w "zamień na" w co mam wpisać ? chcę aby znajdował...
nie podpowiem ci nic odnosnie makro, ale powiem jak ja uzyskalbym taki rezultat bez zadnego bawienia sie w makro 1 zainstaluj programmers notepad, jest darmowy 2 skopiuj tresc z excela do notepada 3 i teraz magiczne opcje znajdz wszystkie i zamien "PZ" > "PZ ", z wyrazem NA zamienic musisz "NA" > " NA " Tym sposobem w sekunde rozdzilisz sobie wszystkie...
To się baw. Sprawdzanie PESELa znajdziesz w sieci. [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$C$12" Then If Target = "Tak" Then Range(Rows(13), Rows(14)).Hidden = True Else Range(Rows(13), Rows(14)).Hidden = False End If End If If Target.Address = "$C$15" Then If Target = "Tak" Then Range(Rows(16), Rows(17)).Hidden...
Witam, bardzo serdecznie:) Makro wysypało mi się teraz trochę w innym miejscu. Niby prosta rzecz do zrobienia, tak mi się wydaje, skopiowanie zakresu pojedynczych komórek i wklejenie ich, żeby stały jedna obok drugiej w jednym wierszu zaczynając od komórki A1 (arkusz Excel). Makro w arkuszu Excel działa i wygląda mniej więcej tak: "Selection.PasteSpecial...
Dokładnie takiego samego to chyba nie znajdziesz (czyjaś praca). Mnie się udało znaleźć jeden podobny arkusz (aktywny do wypełnienia) ale to też jest czyjaś praca. Tak że szukaj w internecie aktywnego arkusz .xlsx i sam dostosuj do swoich potrzeb. https://obrazki.elektroda.pl/1875457600_...
Spróbuj pośrednio: Znajdz jakis program a'la PDFTransformer (ten nie jest darmowy) i przekonwertuj wszytkie pdfy do innego formatu, najlepiej txt. Potem mozesz albo odrazu napisać program, który ci z tego txt wygarnie dane, albo pokusić się np o masowe importowanie do programu a'la Excel i napisanie makra które przekonwertuje dane i na końcu wygenerowanie...
a może można wszystkie 3 warianty zastosować? Da się. Zainteresuj się formatowaniem warunkowym. Kilka przykładów znajdziesz na elektroda.pl.
możesz trochę rozwinąć bo nie jestem specem w excel:( Użyj google lub wpisz w youtube podane słowa a znajdziesz wyczerpującą odpowiedz jak ich użyć.
Chyba nie znajdziesz jednej "funkcji" :cry: , która obsłuży wszystkie Twoje wymagania w założonym układzie :crazyeyes: , ale możesz wykorzystać kilka prostych formuł (dla każdego zboża osobna :D ), żeby uzyskać zbliżony efekt - jak na zrzucie :spoko: 928057 Takie formuły będą dodatkowo zliczać (sumować) wszystkie ilości, które mogłyby wystąpić w nieco...
Dziekuje za szybka odpowiedz. Chodzi mi tu raczej o cos w stylu znajdz->zamien->skopiuj do odpowiedniej komorki. Poczatkowo wprowadzam dane, ktore maja zostac odnalezione i na jakie dane zamienione, a potem te zamienione dane wpisac w odpowiednie komorki. Nie zawsze kody wygladaja tak jak przedstawilem. Czasem kod wyglada tak CORRI-BLRE-BRAS075DD. W...
Proponuje takie makro odpal Alt+F11 w oknie VBAProject wybierz arkusz na którym pracujesz i wklej poniższy kod Public Sub znajdz() Dim i As Integer Dim j As Integer For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row For j = 2 To Cells(Rows.Count, 3).End(xlUp).Row If Cells(i, 1) = Cells(j, 3) Then Cells(i, 2) = Cells(j, 4) End If Next j Next i End Sub a...
Zakładając, że makro uruchamiasz przy aktywnym arkuszu wynikowym, konstrukcja powinna wyglądać mniej więcej tak ostWrs = tu szukamy ostatniej niepustej komórki w arkuszu wynikowym For Each sht In ThisWorkbook.Worksheets If sht.Name <> "tu nazwa arkusza wynikowego" Then ostWrsArk = tu szukamy ostatniej niepustej komórki w arkuszu źródłowym...
Tak, ten żal wyrzucić prowizorkę. Powiem ci, że im dalej, tym al będzie większy. Tak wiem... tak byłoby najlepiej a jeszcze lepiej nająć firmę, która by to zrobiła... ale na to mnie nie stać. A na to co jest teraz, cię stać? Dodano po 32 Wiesz, zawsze można się nauczyć dotneta, będzie najbliżej, jest tam, nawet Basic, troszkę inny, choć polecam c#,...
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ć.
Ostatnie pytanie.. jak będzie wyglądała procedura która ma za zadanie : po naciśnięciu Buttona zamknąć Formę a otworzyć plik excel'owsi w którym się znajdujemy ? Dokładniej chodzi mi o to, że.. po otwarciu excela otwiera mi sie automatycznie forma z moim programem.. i teraz, chce zrobic tak, ze jak ancisne button ktory u mnie sie nazywa "Zamknij" to...
Trzeba wrzucić to w pętlę. Jak znajdzie robi warunek PRAWDA Jak nie znajdzie to w warunku FAŁSZ wyświetla Msgbox i kończy działanie
Zauważ jak działa "lista" (ostatnia procedura w kodzie Sub Przygotuj_Lista() ) Na początku sprawdza czy nie ma dubli w podanych danych, potem... Wprowadza (w pętli) nazwę i wersję do arkusza menu i uruchamia procedurę Znajdz czyli wykonuje się "arkusz" wyszukania asortymentu. Na jego podstawie poniższa pętla przepisuje po kolei miejsca paletowe aż do...
(at)clubs Masz rację, jak usuwam linijkę w kodzie z dodatkowym "findem" to pętla działa poprawnie. Poprawiłem trochę kod i praktycznie został mi tylko jeden "find" ale bez niego nie wiem jak to zrobić inaczej aby znaleźć w drugim arkuszu nazwisko wybranego pracownika. A bez tego cały projekt do piachu.... Miałem wstawić plik, ale niestety z braku czasu...
Cześć, Ja bym to tak zrobił: w komórce A1: liczba w komórce B1: =JEŻELI(A1>=209;209;JEŻELI(A1>=200;200;J... itd. przez wszystkie dzielniki. To znajdzie pierwszy największy dzielnik. w komórce C1: =JEŻELI(A1-B1>=209;209;JEŻELI(A1-B1>=200... itd, znajdzie drugi dzielnik.
[url=https://www.youtube.com/watch?v=ywS... coś znajdziesz.
Witajcie ponownie. Podsyłam plik, bo chyba niezrozumiale dla Was napisałem o co mi chodzi i w czym tkwi mój problem. Chodzi o to aby w kolumnie "P" była wartość premii, w zależności od ilości punktów jak wcześniej, w kolumnach: K, L, M wartości premii już są policzone. ps. a może znajdziecie jakieś inne mankamenty w tym pliku i macie jakieś inne uwagi?...
Przykładowy plik w załączniku. Daną wejściową zaokrąglam tak, aby zaokraglona liczba była w tabeli: =ZAOKR(D2;2) - tutaj akurat do dwóch miejsc po przecinku. W tym przypadku jest stndardowe zaokrglanie - trzecia cyfra po przewcinku decyduje, czy zaokragenie jst w dół, czy w górę (0-4 w dół, 5-9 w górę). Zadbaj o to aby tabela miała wszystkie możliwe...
Instrukcje warunkowe, typu: PRL wydziel z makra i przekształć w funkcję, do której będziesz się odwoływać, być może nie tylko z tego miejsca.
Myślę że do twoich celów odpowiednia będzie wbudowana funkcja wyszukaj.pionowo. Ma ona 4 argumenty - pierwszy to wartość szukana, druga to tabela zawierająca dane (może mieć wiele kolumn). Tabela musi mieć w pierwszej kolumnie wiersz w którym będziemy szukać wartości podanej w pierwszej kolumnie. Funkcja znajdzie tą wartość i zwróci z wybrane dane z...
Wykorzystaj WYSZUKAJ.PIONOWO(szukana_wartość;tablica... Szukana wartość to kod, tablica to kod i druga kolumna, nr kolumny to kolumna z której mają być informację i teraz najważniejsze: 0 wtedy dokładnie będzie szukał kodu i dane nie muszą być posortowane, jeżeli nie znajdzie kodu funkcja zwraca błąd. Więc wykorzystaj tu funkcję jeżeli (jeżeli...
Private Sub TextBox1_Change() Dim tekst As String, wynik As String, i As Integer tekst = TextBox1.Value For i = 1 To ThisWorkbook.Worksheets.Count ' "i" w tej pętli to indeks arkusza If Left(LCase(Sheets(i).Nam... 2) = "m-" Then 'przypisanie wyniku zwróconego przez funkcję. Drugi parametr funkcji...
Nie musisz robić Select Użyj: [syntax=vbscript]Range("a2:n35000").Copy Destination:=ThisWorkbook.Sheets("Arkusz... Szczegóły znajdziesz na stronach M$ i nie tylko. Oczywiście oba adresy muszą być prawidłowe, wpisałem przypadkowe. Jeżeli zamierzasz kopiować więcej danych albo zmieniać pliki i arkusze to lepiej podczas otwierania...
Tu znajdziesz wszystko http://www.planet-source-code.com/vb pozdr. dioda dla ułatwienia http://www.planet-source-code.com/vb/scr...
Kasiu, Funkcję Zaokr(Liczba, IlośćPoPrzecinku) użyj tam, gdzie Ci 'nie pasuje'. Ja już wymiękam. Może Irek, albo JRV znajdzie chwilę.;)
Twojego filmiku nie widać. Edit: Już się pokazał. Spróbuj jednak dokładniej opisać swoje obserwacje. Czy problem z tym plikiem "okrojonym" na potrzeby forum występuje u Ciebie na każdym komputerze i w każdej wersji Excela? Masz w pliku kilka ukrytych arkuszy, ale eksperymentujesz tylko z "B". Czy każdy arkusz po ukryciu zachowuje się tak samo? Ponieważ...
Poszukaj z podobnego dysku, np w serwisach komputerowych tam na pewno znajdziesz uszkodzony dysk z uruchamiającymi się talerzami.
...Wspomniane zastrzeżenia to dane w tabeli muszą być posortowane, w pierwszej kolumnie powinny być wartości do wyszukania. Sprostuje: dane nie muszą byc posortowane gdy ostatnim parametrem funkcji wyszukaj.pionowo będzie 0 lub Fałsz z tym że w tym przypadku jeżeli funkcja nie znajdzie szukanej wartości zwróci błąd.
W kod arkusza wklej[syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Count = 1 And Target.Column = 5 And Target.Value <> "" Then wrs = Columns(5).Find(what:=Target.Value, lookat:=xlWhole).Row Target.Offset(0, 1) = IIf(Target.Row = wrs, "", Cells(wrs, 6)) End If End Sub[/syntax]W przypadku braku odpowiednika znajdzie sam...
Wedle mnie chodzi o to aby w "równoległej" tabeli odejmować te pozycje na których znaleziono MIN i MAX w Tabeli 1. Przyda się tu funkcja PODAJ.POZYCJĘ, która znajdzie miejsca wystąpienia MIN i MAX w Tabeli 1, potem trzeba wybrać te same pozycje w tabeli 2 i wykonać dane działanie. Tak to zrozumiałem ...
W ostateczności, jeśli nie znajdzie się inne rozwiązanie, można napisać makro, które przy otwieraniu pliku "Master" będzie zdejmować hasła ze wszystkich "Slave" (warunek: żaden z nich nie może być edytowany w tym czasie) i przy zamknięciu (Mastera) nakładać ponownie. Druga faza opisana [url=http://www.elektroda.pl/rtvforum/to...
[syntax=vb][/syntax] Witam wszystkich Forumowiczów, Jest to mój pierwszy post na tym forum jednak od jakiegos czasu sledze watki na elektroda.pl . Jednoczesnie przepraszam za brak polskich znaków. Poszukuje kodu VBA do znalezienia pierwszej wolnej komórki w zakresie a nastepnie wklejenie do tej komórki w kolumnie A tego co znajduje sie w schowku . Powyzsze...
Co robię nie tak? Próbujesz porównać wartość komórki z tablicą. Właściwe działanie to, jak wyżej opisano, wyszukanie wartości w tablicy. Tablicą w Twoim przypadku jest zakres B2:B27963. W zasadzie potrzebujesz formuły, która zwróci FAŁSZ lub "dubel" w zależności od tego czy wyszukiwanie zakończy się błędem, czy nie. Połączenie Twoich wysiłków z podpowiedzią...
Oczywiście, że funkcji takiej nie ma, bo jest to makro. Musisz otworzyć edytor makr w excelu (Visual Basic) i tam w moim przykładzie znajdziesz funkcję. Ogólnie możesz w edytorze Visual Basic dodać do Twojego arkusza nowy moduł i wkleić w nim definicję funkcji: [syntax=vb]Function NDay(exclude As Range, prev As Date) As Date Dim flag As Boolean Dim...
Sama funkcja wyszukaj.pionowo() też tu nie poradzi. Właściwie tak jak to przedstawiono to na przykładzie to nic oprócz oka ludzkiego nie posegreguje "z pustymi". Bo po czym ma excel poznać że dana z drugiego wiersza B równa "002" jest inna od danej z trzeciego wiersza B równego "002" Za pomocą Wyszukaj.pionowo() z zerem jako ostatni argument efekt będzie...
Dobry wieczór, Do tego trzeba zaangażować Visual Basic, bo w samym Excelu są ograniczone możliwości sterowania treścią komentarzy. W załączniku jest propozycja rozwiązania, ale musi Pan ją zaadaptować do swoich potrzeb. Jeśli danych jest dużo trzeba zastanowić się nad optymalizacją, bo działanie może być powolne. Podstawą rozwiązania jest procedura...
Nie. Żeby wszystko działało muszę być ustalone, sztywne zasady. Im więcej warunków i danych do sprawdzenia, tym większe prawdopodobieństwo błędów. W wierszu 23 chodzi o to, co opisujesz w p.4 Przyjąłem, że nadawcą pytania jesteś Ty. Temat rozpoczyna się od "RE: ", oznaczasz go jako "Kategoria Żółty" i jeśli pojawi się odpowiedź z identycznym tekstem...
W wierszy drugim (2 na tym arkuszu) numery kolumn z jakich ma pobierać dane. Jeżeli zmienisz ten numer (w wierszu drugim) zmienią sie dane - będą pobierane z kolumny o numerze jaki podałeś. Jeżeli to ci przeszkadza wpisz na stałe zamiast B$2 C$2 itd numer kolumny z arkusza pierwszego. To było dodane tak dla zautomatyzowania. Zauważ że jest on w dwóch...
A jak są nazwane pliki z ankietami? Gdzie je zapisujesz, jeżeli mają taką samą (mozliwe?) nazwę? Czy jest jakaś struktura katalogów? I Ile tych ankiet będzie mniej wiecej? Może nie warto zbytnio kombinować z monitorowaniem tylko wczytać wszystko dopiero jak będzie potrzebne? Makra działają dosyc szybko. Mam gdzieś gotowca łączącego pliki Excela. Sama...
Witam Zmniejsz SKREN jak pisał poprzednik ten jasny ekran najprawdopodobniej wynika z braku zasilania 200v płytki kineskopu zanim znajdziesz tego powod sprawdz co spowodowało ta usterke zobacz czy nie masz zwarcia jednego ze wzmacniaczy na plytce kineskopu powodzenia Dlaczego kolega nie używa znaków interpunkcyjnych ? Regulamin p.15 Proszę poprawić...
Prościej chyba się nie da. Z tym, że w tym przypadku nie szukasz k-tej naj/mniejszej/większej, więc wystarczy MIN, MAX (tablicowe). Np =MAX(JEŻELI(Dane!$A$2:$A$613... Możesz oczywiście "skomplikować" sobie użyciem kolumny pomocniczej w arkuszu "Dane" i wtedy wystarczy "zwykłe" MIN/MAX, ale po...
Witam.Potrzebuję zmienić funkcje tego makro aby sprawdzało 6 pierwszych znaków numerów w kolumnie i nie usuwało podobnych(teraz nie kasuje tylko identycznych .Czy ma ktoś pomysł jak to zrobić? Sub wyszukaj_numery() ' ' wyszukaj_numery Makro ' ' Otworz plik z lista numerow Workbooks.Open Filename:="C:\Users\lista numerow.xls" ' Policz niepuste wiersze...
Należałoby przeszukać sąsiadów w wierszu "wierszkontrahenta"... Taki efekt: http://obrazki.elektroda.pl/8119171000_1... uzyskałem przy pomocy [syntax=vb]Sub Szukaj() ilekontrahentow = 20000 ListaFirm = "nazwisko" 'symulacja wartości pola tekstowego wiersz = Worksheets("KONTRAHENT").Range("B3", "B" & ilekontrahentow) _ .Find(what:=ListaFirm,...
Witam, do wpisywania faktur są zrobione 2 listy rozwijana osobno dla kolumny A nazwa i kolumny B konto . jak sie znajdzie z listy np. Akcesoria IT to potem trzeba pamiętać jakie ma konto aby wybrać z drugiej listy. Pytanie jest takie czy da się zrobić aby po wybraniu z jednej listy od razu w kolumnie obok pokazywał się prawidłowy nr konta ? Wybieram...
Witam mam następująca tabelę https://obrazki.elektroda.pl/6660471400_... W której po zaznaczeniu jednego rekordu i po kliknięciu przycisku Zapisz do Excela pobiera on z bazy danych wybraną osobę po jej ID. A czy dało by się zrobić coś takiego, że zaznaczam dwa rekordy w tabeli lub wszystkie na raz i za jednym razem zapisuje wszystkich...
Podawałeś kolumny A, B i C :) Wklej formułę w C1 nowego arkusza, następnie wstaw tyle kolumn aż formuła znajdzie się w kolumnie W, dodaj 4 wiersze od góry i skopiuj formułę przez zaznaczenie w pasku formuły do komórki V1 swojego arkusza... Gotowa formuła =JEŻELI(ORAZ(JEŻELI(CZY.BŁĄD...
Przyjrzyj się mechanizmowi zapytań SQL, a dokładnie ADODB dla Excela. Na necie znajdziesz mnóstwo przykładów jak to uruchomić, [url=http://www.vb-helper.com/howto_ado_... zacznij na początek - przykład jak wstawić rekord do Accessa.
Witajcie Jestem jeszcze trochę słaby z excela, dlatego chciałem zapytać Was, jak powinna wyglądać formuła, która w moim mniemaniu powinna byc mieszanką funkcji JEŻELI z funkcją WYSZUKAJ.PIONOWO. Moim zadaniem jest znalezienie zawartości komórki B2 - jest to ciąg cyfr (plik excel nr 1) w jakiejś tablicy (plik excel nr2), i wypisanie sława "TAK", pod...
Albo dodaj sprawdzanie przed, by nie lecial przez wszystko. ;) [syntax=vb] Dim MyCell As Range Dim MyRange As Range Dim DuplicateFound As Boolean DuplicateFound = False Set MyRange = Intersect(ThisWorkbook.Worksheets("4").R... ThisWorkbook.Worksheets("4").UsedRange) With TextBox1 If Not .Text = "" Then For Each MyCell In MyRange If CStr(MyCell.Value)...
... nastepujace zadanie, za ktore nie wiem jak się zabrac... rozumiem ze dostales do rozpracowania programowalna diode TL431. Przyda sie wzor: Vout = Vref*(1+R2/R3) , Vref to typ. 2.495V , co do mocy traconej w TL431, na ktora kaza w zadaniu uwazac, to zaleznie od obudowy: np. dla TL431 w TO92 max 0.7W. R1 dobierasz na podstawie roznicy napiec miedzy...
Możesz spie ręcznie przeklepać te wartości do excela albo jeżeli masz troszkę umiejętności - napisac sobie prosty program np. w Delphi, który Ci to zapisze w pliku excel. Jeżeli nie wiesz jak odczytać plik .hex (intel hex) to podałem opis w wątku: http://www.elektroda.pl/rtvforum/topic15... Znajdziesz tam co oznaczają liczby na danych pozycjach...
A bez makr, skryptów itp itd się nie da? ;) Niestety, nie. Możesz użyć funkcji użytkownika podobnej do tej Function LiczKolory(zakres As Range, kolor As Integer) For Each kom In zakres If kom.Interior.ColorIndex = kolor Then LiczKolory = LiczKolory + 1 End If Next End Function Wklejasz do modułu standardowego i używasz jak funkcji Excela tzn...
Dzięki Marku. Wg mnie nic to nie zmienia. Efekt nie jest ten sam. Inaczej działa Find a inaczej podaj.pozycję() z zerem jako ostatni parametr. W twoim przypadku "Find" szuka ciągu nazwy klienta w innych ciągach. Dlatego dla Klient2 po zamianie w "wykonaniu" nazwy klient2 na klient000 wyszukiwał "Klient22" bo klient2 "mieści się w klient2 2. I tu powstawał...
sprawdziłem i działa! Dziękuje Mam już chyba ostatnie pytanie... najprościej ujmując po wykonaniu wyszukiwania zgodnie z ID dane przerzuca mi do arkusza wyszukiwanie... chciałbym następnie dane z tego arkusza skopiować do dwóch innych np do "arkusz1" oraz "arkusz2" zgodnie z kryterium: jeżeli w komórce F wpiszę "ok" to przerzuca mi dane dla tego wiersza...
Wszystko może byłoby w porządku gdyby... nie to, że przepisujesz bez zwracania uwagi i próby zrozumienia (bezmyślnie) to co znajdziesz w necie. Sprawdź nawiasy w przypisaniu wartości zmiennej liczba. Edit: A tak na marginesie pytanko matematyczne: Ile to 40-1+1 ?
Jeśli Arduino to masz bibliotekę do kart SD, schematy podłączenia znajdziesz w internecie bez problemu, musisz tylko uważać na to, ze karta SD zasilana jest napięciem 3,3V i w takim standardzie przyjmuje też sygnały - czyli bezpośrednie podpięcie jej do Arduino pracującego na 5V uszkodzi ją. Warto też pamiętać, że karta pobiera 100mA lub więcej "w szpilkach"...
Jak wykorzystasz wyszukiwarkę :idea: https://www.elektroda.pl/rtvforum/find.p... to znajdziesz ponad 1000 postów i ponad 100 załączników (w tym konkretne rozwiązania w plikach) na ten temat :D Wybrać, przebrać, dostosować do swoich potrzeb, a jak wystąpi jakiś problem to załącz plik, w którym on występuje - zawsze ktoś Ci tu pomoże w samodzielnej...
makro, które znajdzie wiersz podsumowujący A po co makro miałoby się tak wysilać ? Samo może zrobić podsumowanie ... :) ... Coś w tym stylu ... może i w tym ... może w tamtym ... 886901 Takie odrobinę automatyczne ... podajesz adres początku tabelki, jeśli w innym miejscu jak 'A1', parę innych rzeczy, jeśli chcesz je zmienić, i jak nie będziesz za...
W załączniku masz plik XLS z Excel-a 2003. Po zmianie arkusza, wyskakuje okienko do wprowadzenia hasła. Na wszystkie arkusze jest 12345. Po wpisaniu prawidłowego można pracować a arkuszem, po wpisaniu błędnego następuje przekierowanie na pierwszy arkusz, który może być arkuszem tytułowym z opisem obsługi całego dokumentu. Edytując kod VBA zajrzyj do...
Proponuję wykorzystać wcześniej przedstawioną funkcję tzn. funkcję WYSZUKAJ.POZIOMO :idea: Tak jak w każdej funkcji konieczne jest określenie dla niej właściwych argumentów - jeśli nie wiesz co to za argumenty to zajrzyj do pomocy Excela :!: tam znajdziesz np taki opis WYSZUKAJ.POZIOMO(szukana_wartość;tabela_...
Witam 1. Co to jest w ogóle za zakres? (jego konstrukcja rozumiem ze dane co wysyła to tylko A12:A10) [syntax=vbscript]tBRng = "A12:A" & Sheets("QM-Handbuch").UsedRange.Rows.Cou... 2. masz .send wewnątrz pętli (czyli tyle razy wyśle ile znajdzie w tBRng)
Witam, potrzebuje utworzyc w dwa formularze w ktorym bede mogla za pomoca pola combo przefiltrowac dane czyli tak jak w zalaczniku do przycisku "zmien" potrzebuje formularza w ktorym bede miala dwa filtry z Arkusza 2. czyli najpierw wybieram z piewrszej listy dane z filtra "suchbegrif" pozniej "Selektion" i na koniec mam trzecia liste z przefitrowanymi...
Dzień dobry, Nie trzeba makra, wystarczą funkcje WYSZUKAJ.PIONOWO lub PODAJ.POZYCJĘ. Wyszukiwane dane należy połączyć w pary operatorem złączenia tekstów & i wprowadzić funkcje jako tablicowe Ctrl+Shift+Enter. WYSZUKAJ.PIONOWO zwróci szukany wyraz (jeśli go znajdzie) lub błąd #N/D! jeśli nie znajdzie. PODAJ.POZYCJĘ zwróci położenie znalezionego wyrazu...
Zastosuj kolumnę pomocniczą, w której znajdzie się pierwsza litera nazwiska. Dalej zwykłe LICZ.JEŻELI...
[syntax=vbscript]Sub ZnajdzDodaj() Set a1 = Sheets("Arkusz1") Set a2 = Sheets("Arkusz2") a = InputBox("Znajdź :", "Szukanie") owa2 = a2.Cells(Rows.Count, "A").End(xlUp).Row If Application.CountIf(a2.Range("A1:A" & owa2), a) > 0 Then MsgBox a & " istnieje już w bazie." Exit Sub End If owa1 = a1.Cells(Rows.Count, "H").End(xlUp).Row For x = 1 To owa1 If...
Mam pewien problem z lastRow. Napisałem poniższe makro do przeszukiwania wszystkich arkuszy w celu znalezienia "szukanej". W każdym arkuszu makro szuka od wiersza 7 do lastRow. I tu mam problem taki, że jak w Sht 1 lastRow = 7 ,a w Sht 2 lastRow =2 i załączę makro w Sht 2 to makro przeszukuje mi także w Sht 1 tylko 2 wiersze. Rozumiem to, ale szukam...
A Ty tak JacekCz, to z definicji nie lubisz Excela? Nie trzeba armaty do zabicia komara. Co do baz, o których wspominasz, to Akces też znajdzie dla siebie zastosowanie. Taka z resztą była koncepcja napisania Office...
Z książek to najbardziej polecam "Wprowadzenie do transmisji danych" Andrew Simmonds WKIŁ tam znajdziesz wszelkiego rodzaju modulacje cyfrowe. A tak na chłopski rozum to jeżeli masz sygnał cyfrowy np. 00101010101010110, to łączysz go odpowiednio w ciągi 3-bitowe (dla PSK-8) lub 4-bitowe (dla PSK-16) i teraz 2 do trzeciej jest 8 - czyli tyle mamy kombinacji...
Witam działające z Officem darmowe :( Tu masz może coś znajdziesz http://office.microsoft.com/en-us/market...
Szacun za takie poświęcenie dla hobby. W swoim czasie próbowałem skatalogować swoje elementy, płytki , projekty przy pomocy excela i mimo, że trochę tam skrobałem w VBA to sam proces wprowadzania danych na początku doprowadził mnie do wniosku, że to strata czasu i projekt został zarzucony. Jak pamiętam to na forum były jakieś próby zainteresowania dziełami...
znajdz uzytkownika znajdz telefon makro znajdz
corsa czujnik halla wykonam układy elektroniczne kompensacja wzmacniacz
thomson 26hu5253 asembler arduino
Electrolux EWD 1697 MDW – pralka nie włącza się, brak zasilania, diagnoza filtra EMI i SMPS Elektryczny podnośnik samochodowy Yato YT-17220, Unitec 10368, Heckermann TY-EJ03 – trwały i tani wybór
