:arrow: makary1 Nie dość że dajesz niedziałające badziewie (z błędami) bez żadnej instrukcji, to jeszcze żądasz "zapłaty" za stworzony plik. :cry: Nieładnie. :cry: Zanim coś dodasz przetestuj czy u ciebie to działa. Tworzysz okno filtra Kol A Filter, a w kodzie piszesz Kol B Filter Zaznaczasz (Range) jedną kolumnę a piszesz Field:=2 Wprowadzasz nazwę...
Czy ktoś pomoże W LibreOffice można to zrobić w dwóch krokach przy użyciu wyrażeń regularnych :spoko: 1159078 1159079 W Wordzie zapewne też to można zrobić, ale Microsoft ma odmienne zasady tworzenia wyrażeń regularnych :cry:
Domyślam się, że je po prostu prze-kleiłeś czyli zrobiłeś połączenie 2 plików które będzie działać jeżeli prześlesz oba pliki (word i excel) i znajdą się one w odpowiednich lokalizacjach. Aby załączyć wykresy Excela, tak aby po wysłaniu je edytować najłatwiej je osadzić tzn. w dokumencie programu Word kliknij wstaw obiekt -> Microsoft Excel Chart. dwuklik...
Ostatni, opcjonalny argument funkcji ustaw na PRAWDA, tabela musi być posortowana.
Ctrl+f, następnie klikasz "więcej" i zaznaczasz "znajdź tylko całe wyrazy".
Kasiu, Funkcję Zaokr(Liczba, IlośćPoPrzecinku) użyj tam, gdzie Ci 'nie pasuje'. Ja już wymiękam. Może Irek, albo JRV znajdzie chwilę.;)
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]...
Zastosuj kolumnę pomocniczą, w której znajdzie się pierwsza litera nazwiska. Dalej zwykłe LICZ.JEŻELI...
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
Filtrowanie w poziomie nie jest łatwym tematem w Excelu. Idealnie do tego nadawałby się układ gdyby wszystkie dane dostawy zawrzeć w jednym wierszu. Prezentowanie później tego nawet w takiej formie, że w kolumnie znajdą się daty będzie zdecydowanie prostsze np. wykorzystując tabelę przestawną.
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.
aaa.. Formuła nie może działać w tej samej komórce Można podzielić 1 kolumne na inne dwie - przed 'w' i po 'w' zmienić jednu kolumnu tylko makrem [syntax=vb]Sub kokos() Dim c As Range Set c = Cells(1, 1) While c <> "" p = Application.WorksheetFunction.Search("w"... c) c.Offset(, 1) = Mid(c, p) c = Left(c, p - 1) Set c = c.Offset(1) Wend End Sub...
Pomysły na pewno się znajdą. Ale dlaczego za pomoc oczekujesz zapłaty (prowizja za download)?
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...
...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.
Jeszcze mam takie pytanie, czy dało by się przerobić ten arkusz, aby odróżniał do 100 a nie do 10 sortował? Myślę że i to się da zrobić ale Jak masz wcześniej posortowane dane (przed tym dziwnym sortowaniem)? gdzie znajduje się 10? po 1 czy po 9 czy tak : 1 1 2 2 ... 9 9 10 10 11 11 Czy tak: 1 1 10 10 11 11 2 2 ... 9 9 Przyznam że z pierwszą wersją...
W każdej komórce tabeli w arkuszu2 w tych polach poza kolumną 1, wstawiasz funkcję szukącej tej samej wartości, co wprowadzasz w polu A, co w polu A, ale w arkuszu 1, i ta funkcja ma zwrócić ci numer wiersza np i, potem w tym polu wpisujesz: =Arkusz1!Bi, albo inne litery dla kolejnych pól. Jak znajdę czas to sam spróbuje ci to zrobić
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ć...
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...
Witam Miałem dokument excel na dysku D na nim pracowałem i zapisałem, po tygodniu chciałem otworzyć dokument i tego dokumentu nie ma. Znajdę gdzieś jakąś kopię tego dokumenty
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...
Pod prawda podstaw A10, pod fałsz "wyszukaj w tabeli G". Tu nie ma znaczenia kolejność, bo oba się wykluczają (nie zawierają się w sobie). Zobacz: Jeżeli(oraz(zielona;duże oczy);żaba;jeżeli(ogon;jaszczurka;inna gadzina)) Jeśli zacznę od ogona i go nie znajdę... Jeżeli(ogon;jaszczurka;jeżeli(oraz(itd Na jedno wychodzi ;)
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")...
Raczej na pomoc, gotowca nie chcę. [url=https://www.google.pl/webhp?sourcei... Nie jestem wcale złośliwy. Pocztaj, popróbuj i się zgłoś z pytaniami o pomoc. Na pewno znajdą się osoby chętne do pomocy. Pozwolę sobie doradzić, że w tabeli z miesiącami proponuję w danym miesiącu dwie kolumny...
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...
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! -szukałem dzień cały rozwiązania, i w końcu piszę. Mam taki oto dylemat: Chcę aby program otwierał dowolny plik *.xlsx w miejscu w którym się znajduje on sam. Moje rozwiązanie wygląda tak: FindFirst('*.xlsx', faAnyFile, znaleziony) ; Excel:= CreateOleObject('Excel.Application'); Excel.Workbooks.Open(znaleziony.name); // <--tu wywala błąd Błąd:...
Żaden komunikat o błędzie nie jest wyświetlany? E ...? Czy pojawiała się cyfra 9 ...? Czy ciepłą wodę grzeje normalnie? Która pompa się uruchamia jak się pojawia A ...? Trochę dziwnie się zachowuje. Tak jakby cały czas próbował doładowywać zasobik CWU, ale nie było obiegu, wymiennik spaliny->woda się przegrzewa i z powodu przegrzewania wyrzuca ciepło...
Chciałbym również spróbować wymienić łożyska, ale po przeczytaniu różnych wątków i odpowiedzi dowiedziałem się, że mogą być różne rodzaje. Czy najlepiej najpierw zdemontować stare łożyska i poszukać na nich oznaczeń? Czy na łożyskach zazwyczaj znajdują się jakieś informacje? Tak, łożyska są opisane. Jeśli prześledziłeś ten wątek, to pewnie zauważyłeś,...
Widzę, że praca wre... Uchował mi się formularz z filtrowaniem, który jest gdzieś na forum (nie chce mi się szukać). Dostosowałem, dorobiłem wyszukiwanie. Przetestuj, a nuż się nada. Przy inicjacji pobierane są listy ze wszystkich arkuszy, po czym przy przepisywaniu tablic usuwane są duble. Funkcja WYSZUKAJ.PIONOWO znajdzie oczywiście pierwszą z góry...
a jakiś schemat do tego prostownika jak myśliscie znajdę gdzieś ?
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ż...
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 ...
Można zastosować konsolidację danych (z opcją sumowania - domyślną), wskazując jako jeden z zakresów listę wzorcową z kolumną zerową. Dzięki temu wszystkie pozycje z tej listy zostaną uwzględnione. Po konsolidacji wszystkie pozycje będą uwzględnione 1 raz. Potem wyniki konsolidacji trzeba posortować wg listy niestandardowej wg wzoru. Po sortowaniu pozycje,...
Takie zrobi to o co prosisz: [syntax=vbnet]Sub szukajwwordzie() Set obj = CreateObject("Word.Application") Set dok = obj.Documents.Open("T:\KSIĄŻKA TELEFONICZNA.docx") For Each komorka In Range("A:A") If komorka = "" Then Exit For With dok.Content .Find.Execute FindText:=komorka, Forward:=True If (.Find.Found) Then komorka.Offset(0, 1) = "Jest" Else...
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...
W załączniku masz plik z Makrem - żeby go uruchomić musisz włączyć Makra, następnie wciśnij ctrl + Q Makro zrobione w excelu 2000 (bo takiego mam) więc mogą się pojawić problemy z kompatybilnością, wtedy ci to przepiszę na nowszą wersje, jak będę w pracy i znajdę chwilkę wolnego. Wyrzuciłem wiersze z błędną wartością w kolumnie G (było ich sporo) bo...
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...
Zamień wszystko nie interesuje ile jest kolumn i gdzie są dane. Zamienia co znajdzie.
Siemka, nie ogarniam Excela na tyle aby samemu to zrobić. Moja tabela składa się z kilku kolumn ale interesują mnie tylko 3. Chciałbym aby Excel wskazał mi duplikaty - np kolorując na jakiś kolor taki WIERSZ. WIERSZ składa się z 3 komórek z 3 kolumn. Specjalnie piszę dużymi literami aby zaznaczyć że interesują mnie 3 komórki w tej samej linii. Chodzi...
Tak naprawdę liczba pkt będzie zawsze w przedziale od 1 do 3 (nigdy nie będzie to mniej niż 1 i więcej niż 3), ale znajdą się tam miejsca po przecinku.
Nie zadziała A u mnie działa (no chyba że o to nie chodzi)
Liczbę zgodności można uzyskać dość łatwo pod warunkiem, że wpisy będą faktycznie identyczne. Formuła tablicowa: [syntax=text]=SUMA(--($C2:$H2=INDEKSY!$A...
wykres Gantta jest prosto zrobić to nawet nie musze czytać. Problem jest w tym jak nanieść na niego dodatkową współrzędną "Z" obrazującą lata tego raczej w pomocy się nie znajdzie
(at)ElektrodaBot wracając do powyższego, chciałbym zrobić tak że jak znajdzie się wpis np "KV" w kolumnie B:B to odwoła się do konkretnej komórki.
Witam, tak jak w temacie. Pozdrawiam
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...
Znajdzie się ktoś pomocny? :)
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...
Filtr przed pompą wody? Może problem z wentylatorem? Mozesz zmienić obroty startowe w menu i zobaczyć czy to coś zmieni. Instrukcje znajdziesz na stronie ACV , kod serwisowy 05 lub 54
Zamieść, jak i tak już się namęczyłeś :) Co robi program jak znajdzie identyczny cały wiersz? A jak znajdzie trzy takie same?
No właśnie przeliczanie arkusza nie chce działać. spróbuje z opcją ThisWorkbook.RefreshAll chyba że jeszcze jakiś inny pomysł ktoś znajdzie ?
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,...
adamas_nt bardzo dziękuję za podpowiedź, po nagraniu makra i podstawieniu go do całości faktycznie udało się wykonać, jednak nie w całym zakresie, sprawdziłam o co chodzi i wyszło mi że opcja -naciśnij Ctrl+Shift+Strzałka w dół -naciśnij Ctrl+Shift+Strzałka w prawo powodują zaznaczenie obszaru ale nie w całości pokrywającego się (w dół) z moim zakresem...
Kolego, nie rób jaj tylko rusz łepetyną. To są tak proste rzeczy że aż płakać się chce. Przykład: dodać dwie liczby a+b=c Excel: w komórce A1 - wpisujemy liczbę a np. 2 w komórce B1 - wpisujemy liczbę b np. 3 w komórce C1 - wpisujemy działanie które chcemy wykonać , czyli dodawanie wygląda tak: = A1 + B1 jak naciśniemy Enter to pojawi się w tej komórce...
Potrzebujesz jakiejś funkcji która zwraca to konto czy wystarczy Ci, że szybko je znajdziesz ręcznie? Jeżeli ręczne wyszukiwanie wystarczy, to można założyć autofiltr i na kolumnie konto ustawić "nie równa się 490" a na kolumnie "Nr w dzienniku" wpisać szukany numer.
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.
Powtarzające się ciągi znaków są między arkuszami czy w danym (jednym) arkuszu? Powyższe funkcje nie wyłapią powtarzającego się ciągu znaków (chyba że inaczej się rozumiemy). Jeżeli w Arkuszu2 będziesz miał dubel (lub więcej) danej nazwy to zarówno wyszukaj.pionowo() jak i podaj.pozycję() znajdzie tylko pierwszy taki ciąg pozostałe ciągi o tej samej...
Do tego nie jest potrzebne makro, wystarczy "znajdowanie i zamienianie" (CTRL+H). A jeśli już koniecznie musi być makro, to np. coś takiego (dla danych w kolumnie A, w razie czego dostosuj sobie): [syntax=vb]Sub z() Dim rngTmp As Excel.Range Dim lLstRw& lLstRw = Cells(Rows.Count, 1).End(xlUp).Row Set rngTmp = Range(Cells(1, 1), Cells(lLstRw, 1)) rngTmp.Replace...
Spróbuj prawem przyciskiem myszy sprawdzić ViewPageSource może tam się znajdzie to co potrzebujesz...
Być może dane do zamiany są w arkuszu chronionym Faktycznie taki komunikat wyskakuje kiedy arkusz (albo poszczególne komórki), albo cały skoroszyt jest chroniony :cry: Sprawdź funkcje znajdź jeżeli taką wartość lub formułę znajdzie :arrow: to wniosek nie masz prawa zmieniać tej komórki :D
gdyby ktoś zmodyfikował mi makro Na pewno ktoś się znajdzie, kto rozróżni nagłówek od bloku.
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! Jedyny pomysł, jaki mi przychodzi do głowy, to potęgę zamieścić w opisie osi Y. Należy wpisać w tytule osi x10-7 (dokładnie tak) i zatwierdzić. Następnie klikasz w x10-7, tak, aby pojawiła się ramka oznaczająca możliwość edycji. Zaznaczasz -7 i z prawokliku wybierasz "Formatuj tytuł osi", w oknie zaznaczasz indeks górny. Przykład w załączniku....
Dodam że robiłem to na szybko. Dla uproszczenia możesz zmienić warunek dla funkcji licz.jeżeli(): "ZŁĄCZ.TEKSTY(O2;1)" na zwykły "O2&1" (bez znaków "w cudzysłowie")- będzie krócej. Jak znajdę czas to może jutro wymyślę coś bez kolumny pomocniczej ... ale nie wiem czy mnie nie zarzucą robotą bo dziś miałem wolne :) I jaszcze jedna rzecz: W moim przypadku...
Ku...rcze działało itd ale pracowałem na otwartym pliku z internetu i co z tego że zapisałem............ Jutro jak znajdę czas to powtórzę.
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...
Witam, mam problem z głośnikami. W wejściu została urwana wtyczka z kabla, którym podłączane były do komputera. Moje pytanie jest następujące: gdzie znajdę do kupienia coś takiego? (patrz zdjęcie). http://obrazki.elektroda.pl/6195458500_1...
Sama się o to prosisz (.UsedRange = zakres, gdzie zakres=Empty). Dalej nie rozumiem: jak chcesz to realizować? UsedRange to zakres, w którym znajdują się dane. Albo określisz wspólny PrintArea dla wszystkich arkuszy, lub chociaż ostatni wiersz, albo tablica dla każdego arkusza z zapisanym adresem zakresu w postaci tekstowej. Całe to makro (załącznik),...
Jeśli nazwy nie powtarzają się można zastosować na przykład taką formułę: [syntax=text]=INDEKS($A$2:$L$2;PODAJ.POZ... albo [syntax=text]=X.WYSZUKAJ(1;BYCOL($P$3=$A... Gdyby jakaś nazwa się powtórzyła, formuła znajdzie pierwszą kolumnę,...
Dzień dobry. Posiadam tabelkę z danymi, gdzie znajdują się także daty. Chciałem utworzyć formatowanie warunkowe, aby: 1. Jeżeli data jest większa od daty aktualnej (dzisiejszej) - komórki podświetlana jest na zielono. 2. Jeśli data jest z miesiącem i rokiem tym samym co obecnie (np. dziś jest 22.10.2018, komórki mają daty 31.10.2018) - komórki podświetlane...
Kłopot w tym ze jeśli SZUKAJ.TEKST("K5";C2;1)nie znajdzie nic to zwraca #ARG...
Witam, Przy wyniku 0:1 formuła nie nalicza punktów, próbował poprawić ale nie udało mi się. Czy znajdzie się jakiś ochotnik, żeby to poprawić??
Witam! Twój opis kolego jest niejasny i nie precyzyjny. Gdybyś swój projekt zilustrował przykładowymi plikami ("makieta" projektu z przykładowymi danymi) to zapewne szybciej uzyskał byś tu na forum konkretną pomoc :idea: Udostępnianie takich plików Excela wymusza niestety pewne ograniczenia możliwości zastosowanych rozwiązań (np brak możliwości zastosowanie...
Nie dam za to głowy, ale wydaje mi się, że foxpro posługiwało się formatem dBase. Bazę można zaimportować do accesa, jeżeli baza jest niewielka - otworzy ją nawet excel. W sieci znajdzie się też sporo darmowych narzędzi, które sobie z tym poradzą.
Najprościej oprogramować kolumnę "firma" (procedura zdarzeniowa). Wyślę, że worksheetFunction.VlookUp wystarczy. Jeśli znajdzie wpisuje, jeśli nie, zostawia pustą...
No cóż, skoro "skomplikowałeś" sprawę, to żeby miało to jakie takie "ręce i nogi", na jednym module się nie zakończy, przykładowo mogłoby to tak wyglądać: 953853 Dostęp do zdjęć bazuje na takim dostępie do nich: _01.jpg ", czyli wychodzi, np.: 100_01.jpg, 200_01.jpg, itd. Możesz sobie to dostosować. Po wklejeniu do arkusza dany obrazek (zdjęcie) otrzymuje...
Sub Koloruj() k1 = vbGreen 'tu zmień sobie kolorki k2 = vbBlue Takie pytano do znawcy VB. Czy znajdę gdzieś wykaz nazw odcienie kolorów, które można użyć? Coś w stylu "LightGreen". A może da się określić kolor np. kodem RGB w tym skrypcie?
Witam! Mam w Excelu tabelkę, w której na bieżąco aktualizuje się dane (kolumna F). Po czym jest to sortowane wg wartości kolumny F, więc kolejność non-stop się zmienia. Na wykresie kołowym mamy procentowy udział, który automatycznie się aktualizuje. Problem w tym, że zmieniają się również kolory danych na wykresie. Czy możliwe, żeby każdy element kolumny...
Chodzi o makro "Usun2"? Wprowadź warunek, Np[syntax=vb]Sub Usun2() Dim knyps As Boolean knyps = False For i = 1 To Shapes.Count If Shapes(i).FormControlType = 1 Then a = Shapes(i).Top If Shapes(i).Top > 150 And Shapes(i).Top < 200 Then 'a kto tu namieszał?! nazwa2 = nazwa1 nazwa1 = Shapes(i).Name 'jesli znajdzie ramkę knyps = True 'zmieniamy wartość...
Przepraszam, źle sformułowałem zdanie. W kolumnie A wpisuje kod po którym będzie szukało obrazek na stronie. Jeśli go znajdzie to zapisze ten plik pobierając wartość z kolumny B + „.PDF” Dodano po 59 Przepraszam, źle sformułowałem zdanie. W kolumnie A wpisuje kod po którym będzie szukało obrazek na stronie. Jeśli go znajdzie to zapisze ten plik pobierając...
Mam podobny dylemat :-) Jak znajdę info na ten temat to napiszę 🙂
Wracam do tematu i proszę o pomoc. Jeżeli w kolumnie D5:D15 nie występuje liczba tylko wartość np: L/8/7/C to jak będzie wyglądała formuła? Mam nadzieję że znajdzie się rozwiązanie. Pozdrawiam.
Widzę kilka błędów Przykro mi :cry: , że w trakcie testowania nie wyłapałem takiego błędu Excela :!: jak widać na zrzucie :D 1118100 To ze względu na bardzo dziwne zaokrąglanie wyniku funkcji MOD() w przypadku godziny 14:00 - powstają takie niejednoznaczności i następuje dublowanie jednostkowych czasów pracy :cry: Szukam rozwiązania, jak znajdę to...
Musi obsługiwać twoje piloty, na ich stronie znajdziesz bez problemu.
Masz dwa błędy w formule: =WYSZUKAJ.PIONOWO(B12;'Adresy obiektów'!A2:K 2 ;2; PRAWDA ) Tabela którą przeszukujesz (A2:K2) jest jednowierszowa więc nie dziwne że działa tylko "Sandomierz" Druga rzecz to parametr PRAWDA. W tym przypadku dane w adresach zawsze powinny być posortowane rosnąco i co najważniejsze funkcja jeżeli nie znajdzie dokładnego odpowiednika...
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...
Witam, Ponieważ nie jestem programistą mam dosyć spory problem z rozwiązaniem swojego problemu. Sytuacja wygląda następująco: mam 101 arkuszy Pierwszy z nich to "protokół likwidacyjny" w którym znajduje się tabela mająca 100 pozycji. Kolejne 100 arkuszy są to kwity likwidacyjne (nazwy arkuszy są zgodne z pozycjami w tabeli z protokołu likwidacyjnego)...
Więc w Q4 musi być taka wartość z wszystkimi cyframi po przecinku. Inne rozwiązanie to w kolumnie N użycie funkcji zaokrąglenia do wartości całkowitej. Inaczej funkcja nie znajdzie wartości i wyzuci błąd.
To ja też podam przykład... Jak makro zacznie działać, to najpierw w J1 znajdzie się pierwszy kraj, a skończy ostatnim krajem. Bez sensu. Przecież nie będziesz widział zmian w J1!
...i pewnie jeszcze kilka innych sposobów by się znalazło Najprościej ;) Zaptaszkuj referencje "Microsoft Excel xx.x Object Library" i masz dostęp do obiektów Excela. Możesz Np otworzyć plik w ukrytej instancji i "obrabiać" arkusze do woli... A gdzie znajdę tą referencję. O ile w excelu poruszam się płynnie to accessa uczę się jeszcze. Dziękuję i pozdrawiam
Może spróbuj innej wersji makra działającego tylko w obszarze do Lastrow :D [syntax=vbscript]Sub Uzupełnij() Dim i As Long, LastRow As Long LastRow = Cells(Rows.Count, "A").End(xlUp).Row For i = 3 To LastRow If Cells(i, 1) = "" Then Cells(i, 4).Value = Cells(i - 1, 4).Value End If Next i End Sub[/syntax]
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?
Pojedyńczy dysk nie wykorzysta pełnej przepustowości kontrolera ale dwa dyski w trybie raid jak najbardziej ;) HDtune pokaże jakie transfery może osiągnąć dysk zależnie od tego w jakim polożeniu znajduje się głowica. Zbliżając się do środka transfer spada. W rzeczywistości transfer będzie zależał jeszcze od kilku czynników, międz innymi od fragmentacji...
LICZ.JEŻELI Możesz sobie obliczyć liczbę każdej ewentualności nieobecności. Wielkość liter nie ma znaczenia. Mając liczby takich dni (op, uo, c, w), możesz sobie stworzyć dosłownie co chcesz. Dodatkowo sumujesz wszystkie dni, jeżeli w danej komórce znajdzie się liczba.
Poszukaj z podobnego dysku, np w serwisach komputerowych tam na pewno znajdziesz uszkodzony dysk z uruchamiającymi się talerzami.
Zmiana na format tekstowy nic nie da bo excel zadziałą z automatu i przestawi na datę. Proponuję wykorzystać formułę podstaw(). Czyli gdy np wyniki masz w kolumnie "B" od drugiej komórki czyli "B2" to w komórce obok czyli "C2" wpisz: =PODSTAW(B2;":";"-") i skopiuj w dół. Potem skopiuj kolumnę C z tymi danymi i wklej specjalnie z opcją "wklej tylko wartości".
dałem podręcznik serwerva ftp mojemu 10 latkowi do przeglądnięcia, może coś znajdzie ciekawego, to sie odezwę
Tak, tak rozumiem tylko jak to sie mówi: " A u mnie to działa normalnie " ciekawe od czego to zależy... ?hmm Niestety Excel to wredny typ. Pusta komórka czasem nie jest pusta a tego nie widać i wiele innych podstępów Micro$hita ... potestuje u mnie jeszcze i dam Ci znać jak coś wyknuje jeszcze Pozdrawiam .... a rzeczywiście .... zwielokrotniłem twoje...
Witam wszystkich, chciałabym dowiedzieć się jak zrobić (i czy w ogóle mozna) żeby Excel na podstawie zawartości komórki wyszukal plik z danego folderu i go wydrukował w ilości podanej w innej komórce? Np komórki a1: abc B2: 2 Excel wyszukuje że wskazanego folderu plik abc.jpg i drukuje go 2 razy. Czy znajdzie się ktoś miły i poratuje? :) z góry ślicznie...
znajd tekst delphi znajd makro znajd
focus łożysko testy akumulatorów spawarka magnum viper
agregat prądotworczy multimedialne urządzenie autors
Hyundai i30 1.5DPI 2021 - dławienie na LPG LandiRenzo Jak ustawić zegar w mini wieży? Przewodnik krok po kroku
