Chciałabym, aby odpowiednie komórki automatycznie uzupełnić odpowiednimi odniesieniami do sąsiedniego arkusza. VBA fajna rzecz - warto się poduczyć :D , lecz póki co dla Twoich celów wystarczy wykorzystać prostą funkcję :spoko: 897374 3 formuły jak na zrzucie możesz kopiować do następnych kart.
Na przykład tak: [syntax=text]=ILE.NIEPUSTYCH(A1:INDEKS(A...
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...
Spróbuj taką formułę SUMA(B2:INDEKS(B2:B7;JEŻ...
nie ułożonych po kolei Wtedy uzyj =INDEKS(kolumna_bazy; C1)
Przy założeniach że w arkusz1 dane w kolumnie A rozpocząć 3 wiersz, tabela na arkusz2 rozpoczyna się w 2 wiersze =INDEKS(Arkusz1!A:A;(WIERSZ()-2)*45+3)
Może tak? [syntax=text]=INDEKS($A$2:$W$2;PODAJ.POZ...
Indeks czego? Porównywana wartość?
B4 =JEŻELI(CZY.BŁĄD(INDEKS(Proc... Dla Excel >=2007 B4 =JEŻELI.BŁĄD(INDEKS(Procesy!4:4;NR.KOLUM...
Trochę przerobiłem. Działa pod warunkami: 1) lista firm pobierana jest z arkusza "Sty". Jeśli w innych arkuszach (miesiącach) będą różnice należy do tworzenia listy użyć makr. 2) Arkusze muszą mieć taki sam układ (wspólne makro) 3) Indeks (łącze komórki pola kombi) jest wspólny dla wszystkich arkuszy.
Co Ty kombinujesz? Wyślę Ci plik z makrem, które kopiuje zakres 'B2:B7' do pietwszego wolnego wiersza w kolumnie 'A'. Nie opisałeś, gdzie 'B2:B7' ma być wklejane, więc zmień sobie indeksy komórki.
Szukam funkcji która by pobierała wartość z komórki i szukała numeru wiersza wyświetlając jego zawartość Funkcja [syntax=vb]=INDEKS(A:A;H8;1)[/syntax]?
No to na zgodę: Wklej w kod arkusza "1" lub arkusza z pierwszym indeksem. Makro uruchamia się poprzez podwójne kliknięcie w komórkę z datą. Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Cancel = True If IsDate(Target) Then cel = Target.Address For i = 2 To Sheets.Count Sheets(i).Range(cel)...
Nie można usuwać komórek do których odwołują się formuły bo właśnie wtedy pojawia się błąd odwołania. Odwołania również są usuwane. Jeżeli chcesz by odwołanie było cały czas "sprawne" kasuj dane a nie usuwasz wiersz. Jeżeli chcesz aby wybierać różne wiersze w arkuszu docelowym skorzystaj z formuły indeks() i poprzez dodatkową komórkę określającą nr...
Dobry wieczór, Kilka wariantów z funkcjami PRZESUNIĘCIE i INDEKS w załączniku. Pozdrowienia.
Zbliżone działanie do pożądanego :D tj. przenoszenie danych z katalogu do oferty przy pomocy dwukliku (makro działa pojedynczymi wierszami - oczekując na wpis ilości do oferty :ok: patrz na zrzut ) 978389 Drugie makro w "ofercie" usuwa wybrane wpisy (wybrany indeks :!: ,a przy okazji ilość :D ) 978391
Co masz na myśli pisząc "karta"? Dla arkuszy skoroszytu można zagnieździć kod w kolejnej pętli For ark = 1 to thisworkbook.sheets.count ' lub liczbowo indeksy Np 2 To 4 sheets(ark).select 'kod Next
Próbowałem w komórkach arkusza. Jeżeli chcesz uzyskać indeks górny tylko części zawartości komórki, należy znak indeksu poprzedzić spacją (sprawdzone, jeśli piszesz ciągiem, niby pokazuje że znak idzie do góry, ale po zatwierdzeniu wraca do normalnej postaci. Cały M$... Mam Office 2007. Także zapisujesz np. 10 2 - 2 - właściwości czcionki, indeks górny,...
A jeszcze jakiś szybki, sprytny sposób na wstawienie w A1 nazwę karty? Jak w A1 wstawisz: =FRAGMENT.TEKSTU(KOMÓRKA("nazwa_pliku";F... powinno dodać nazwę karty. Dodatkowo chciałbym w jakiś szybki/ prosty sposób na każdej karcie poza "stany paczek" w komórce A2 skopiować nazwę karty a w B2 indeks czyli dla...
Oprócz tego opisu przydałby się załącznik. Patrząc na arkusz łatwiej sobie wyobrazić sytuację. Ale na podstawie tego opisu (o ile dobrze zrozumiałem) najprościej chyba byłoby użyć funkcji INDEKS. [syntax=text]=INDEKS(D6:D14;C6)[/syntax]
INDEKS w połączeniu z PODAJ.POZYCJĘ. Jeśli to Excel 365, to jest to tzw. formuła rozlana, jeśli wcześniejszy, to trzeba wcześniej zaznaczyć 4 komórki i zatwierdzić tablicowo Ctrl+Shift+Enter.
Zależy co umieszczasz w komórce H26. Jeśli liczbę (indeks arkusza) to wystarczy tak, jak napisałem wyżej. Jeśli nazwę (bez cudzysłowu) to lepiej wkb = Range("H26") Workbooks(wkb).Activate lub jednocześnie wybierając arkusz wkb = Range("H26") ark = Range("I26") Workbooks(wkb).Sheets(ark...
Nic z tego. Chodzi zapewne o "formularzowe" w arkuszu. Nie wykorzystasz komórki z indeksem pola kombi dla obu sposobów. Jeśli wpiszesz tam formułę, to przy ręcznym wyborze (we wtorek) zostanie zastąpiona indeksem. Najprościej byłoby wstawić ComboBox'y ActiveX i oprogramować...
Dzień dobry, Jest kilka sposobów rozwiązania, w pliku podałem 3 warianty do wyboru z wykorzystaniem funkcji INDEKS, PRZESUNIĘCIE i ADR.POŚR. Składnia jest następująca: =PRZESUNIĘCIE(początek_zakresu;skok*(WIE... =INDEKS(zakres;skok*(WIERSZ()-nr_pierwsz... =ADR.POŚR(litera_kolumny&skok*(WIERSZ()-...
Łącze komórki pola kombi i funkcja INDEKS. Np [url=http://www.elektroda.pl/rtvforum/to... W wyszukiwarce forum wpisz: "kombi indeks" i naciśnij "szukaj". Jest kilka tematów...
Witam, Czy jest możliwość wklejenia obszaru komórek tak, aby wklejony obszar nie zastępował już istniejącego lecz tworzył nowe wiersze? Mam listę indeksów porządkowych (np. od 1 do 100, choć w moim przypadku sa to inne oznaczenia). Po każdej komórce z liczbą jest wolna komórka. W tę wolną komórkę muszę wkleić obszar komórek z innego arkusza. Obszary...
Formuła tablicowa [syntax=Excel]=JEŻELI(LICZ.WARUNKI($D$18...
To zależy jaki użyjesz jako Kolor1. Prościej będzie przerobić funkcję, gdzie drugim argumentem będzie komórka "wzorcowa". Np [syntax=vb]Function LiczKolory(zakres As Range, kolor As Range) idCol = kolor.Interior.ColorIndex For Each kom In zakres If kom.Interior.ColorIndex = idCol Then LiczKolory = LiczKolory + 1 End If Next End Function[/syntax]Użycie...
Witam, proszę o pomoc w rozwiązaniu problemu zdefiniowanego w załączonym pliku .xls Próbowałem na różne sposoby z funkcjami INDEKS, WYSZUKAJ.PIONOWO, PODAJ.POZYCJĘ na razie bez efektu.. Pozdrawiam
Witam Słyszałem wiele dobrego o użytkownikach elektrody i dlatego zwracam się do Was z prośbą o pomoc, gdyż moja znajomość excela jest dosyć ograniczona. Mam następujący problem: Muszę wpisywać w excelu 2003 godziny pracy maszyn w taki sposób jak w załączniku, tj. ggmm-ggmm w jednej komórce. Problem w tym, że minuty muszą być sformatowane indeksem górnym,...
Jeżeli we wszystkich komórkach zakresu są błędy, a tylko w jednej jest zawartość różna od błędu, to można użyć formuły tablicowej (ctrl+shift+enter) =INDEKS(Arkusz1!$S$2:$S$135;PODA... albo formuły zwykłej =INDEKS(Arkusz1!$S$2:$S$135;PODA...
Dzień dobry, Problem można też rozwiązać samymi formułami, nie potrzeba żadnych kolumn pomocniczych. Do znalezienia unikatów można użyć formuły tablicowej: [syntax=text]=INDEKS($D$8:$D$57;PODAJ.PO... gdzie: $D$8:$D$57 - zakres danych (tytuły), $F$63:$F63 - zakres wyników (unikaty). Początek...
Najprościej: Wstaw pole kombi lub pole listy, określ komórkę łączącą. Wykorzystaj funkcję: INDEKS(tablica, Nr wiersza), gdzie Nr wiersza to wartość z komórki łączącej pola kombi.
Chciałbym po ustawieniu kursora na dany wiersz (wybrany klient) i po kliknięciu by cały wiersz został sformatowany warunkowo kolorem i wszystkie dane zostały przeniesione do arkusza z wzorem FAKTURY VAT. Wybranie wiersza i kliknięcie z przeniesieniam danych do innego arkusza trzeba obsłużyć VBA. Ale prościej, bez kombinowania w VBA będzie dodać kolumnę,...
Formuła dla komórki B5 (bez kopiowania jakichkolwiek danych do dodatkowych kolumn): [syntax=text]=JEŻELI.BŁĄD(INDEKS(Arkusz2... i poprzeciągaj w prawo i dół.
A tak sprawdzałeś? [syntax=vbscript]=HIPERŁĄCZE(KOMÓRKA("ad...
A więc to co sobie wymyśliłeś jest dosyć mocno skomplikowane. Można by próbować napisać makro, ale trzeba by przemyśleć algorytm i trochę nad nim posiedzieć... Można też próbować w następujący sposób: Każdą z baz - A - B - wrzucić do oddzielnych zakładek. Doprowadzić bazy do takiej postaci, jak na rysunku 1. Posortować pary indeks-zamiennik (najpierw...
Jeżeli z zakresu U38:AU38 pozbyć się scalania komórek oraz w każdą z nich wpisać wartości formatu albumu to można użyć następującej formuły: [syntax=text]=SUMA.ILOCZYNÓW((D4=U38:AU3...
Jeżeli numery są pisane bez spacji i w wierszu jest tylko 1 numer złożony z 26 cyfr, to można zastosować taką formułę tablicową: [syntax=text]=INDEKS(FRAGMENT.TEKSTU(B2;...
:) ... sformatować ... bowiem to co widzisz jako format godzinowy w arkuszu, to tylko zwykła excelowa ściema. W komórce jest właśnie to, co ci się wyświetla w liście kombinowanej ... :) Np.: [syntax=vbscript]Option Explicit Private Sub UserForm_Initialize() Dim tbl(), indeks With Arkusz5 'tbl = .Range(Cells(10, 4), Cells(10, 15)).Value 'lub tbl = .Range("d10:o10").Value...
Na zasadzie przykładu załącz jeszcze przykładowy plik z układem danych, bo gdzieś te listy dzieci muszą się znajdować. Na obecną chwilę, to możesz poszukać w helpie: wyszukaj.pionowo, wyszukaj.poziomo, indeks, podaj.pozycję.
NA przykładzie Excela 2003 (ale w nowszych też raczej zadziała) W pasku narzędzi "Formularze" wybieramy "Pole Kombi" We właściwościach pola kombi podajemy dwie rzeczy: - zakres wejściowy = lista z inicjałami. Mogą to być pola R3 do R8 w Twoim arkuszu - łącze danych = komórka, która będzie wyświetlać wybraną pozycję (ale będzie wyświetlać jej numer kolejny)...
Nie wyjaśniłeś, co z tymi numerami działek w różnych miejscowościach. Wobec tego zakładam, że numer działki określa ją jednoznacznie i miejscowość nie jest istotna. Jeśli tak, to rodzaj tytułu prawnego można określić za pomocą funkcji WYSZUKAJ.PIONOWO w jej najbardziej typowym wariancie użycia: [syntax=text]=WYSZUKAJ.PIONOWO(C2;Dane_1...
Jesteś pewny że to excel? Jeżeli tak to co rozumiesz przez bazę w excelu? Co dokładnie (jakie, arkusze, tabele, komórki) chcesz porównywać? Można wykorzystać WYSZUKAJ.PIONOWO() lub WYSZUKAJ. POZIOMO() Może być też INDEKS() a może być też zwykłe JEŻELI()
Jeśli indeks arkusza, czyli jego nr położenia w zeszycie, to np. tak: [syntax=vba]Option Explicit Sub wstaw_nr_arkusza_w1() Dim ark As Worksheet For Each ark In ThisWorkbook.Worksheets ark.Range("a5").Value = ark.Index Next End Sub [/syntax] Można to powiązać np. z procedurą otwarcia zeszytu 'Workbook_Open': [syntax=vba]Private Sub Workbook_Open() Call...
Zwykłymi formułami to dość trudno uzyskać. Napisałem funkcję UDF o nazwie Podziel, której podaje się jako argument zakres danych albo nazwę tabeli. W wyniku otrzymuje się tablicę z wynikami. Można ją wyświetlić jako formułę tablicową, jak pokazałem w komórkach E10:G14 albo wprowadzić do tabeli Excela indywidualnie za pomocą funkcji INDEKS. Można to...
Jeżeli listę masz zorganizowaną jako "poprawność danych" to dana z ręki nie zostaje zaakceptowana. Niestety na kopiowanie danych poprawność danych nie pomoże. Jeżeli nie chcesz makr to może zamiast z poprawności danych skorzystaj z formantów formularza i pola kombinowanego, a dane do arkusza "przerzucaj" indeksem. Przy czym zablokuj komórki chroniąc...
To wejdź w debugger i pobadaj co masz w zmiennej plik. Stawiam na Nothing. Jeżeli tak to pobadaj dlaczego: co jest podane jako indeks Workbooks, czy taki plik masz aktualnie otwarty?
Tak już jest przy odwołaniach do innych arkuszy. Możesz wpisać formułę w G12 (poza obszarem sortowania) i po sortowaniu przeciągnąć ją w dół. Lub pokombinować z funkcją ADR.POŚR z argumentem WIERSZ(). Coś w rodzaju: =JEŻELI($F13=""; ""; INDEKS(Plantacje!$B$5:$J$104;POD... mag'!$F"&WIERSZ());Plan...
Po pierwsze, nie rozróżnisz w tabeli tylu kolorów, takie niuanse normalnie zaczną się zlewać w jedno. Po drugie, bez Visual Basic będzie chyba trudno, nie wyobrażam sobie w każdej wynikowej komórce warunku zagnieżdżonego trzydzieści razy (lub wiele razy powtórzonego warunku 'OR'). W przypadku kodu, możesz stworzyć tabelę, w pierwszej kolumnie wpisujesz...
Tam w tej komórce z FZ występuje numeracja pierwsze Fz to FZ1 ale nie wiem czy numer tutaj ma znaczenie. Ma o tyle, że do tej pory sprawdzałem, czy wartość komórki = FZ, teraz trzeba sprawdzić, czy w łańcuchu znaków, będącym wartością komórki, znajduje się fragment FZ. Dodatkowo w komórkach A pod fz znajdują się głównie cyfry bądź puste pole więc może...
Masz w formule w jednym miejscu zły zakres podany. Poza tym typ porównania jeszcze trzeba dołożyć w tym przypadku jako parametr. Ogólnie dla komórki AA3 wpisałbym tak: =INDEKS(AS$3:AS$28;PODAJ.POZYCJĘ($Z3;$AR... Z czego poprawiłem zakres na AS3:AS28 (miałeś AS1:AS26, czyli wybierałeś z pustych pól na początku), do tego na końcu formuły przybyło...
Można też tak: [syntax=text]=JEŻELI.BŁĄD(INDEKS({"CAP";...
Dzień dobry, Można spróbować dodać w Arkuszu1 kolumnę pomocniczą z kolejnymi numerami od 1, która zostanie posortowana wraz z całą tabelą, a w Arkuszu2 wyliczyć kategorie za pomocą funkcji INDEKS. Kolumnę z oryginalnymi kategoriami można ukryć.
Cześć W sumie miałeś dwa problemy: powtarzające się indeksy i brak sumowania (wpisałem ręcznie (popraw sobie) w "czerwonych" komórkach. Najłatwiej dodać/odjąć maleńki ułamek do sumy, wtedy indeksy będą różne. Minusem takiego rozwiązanie (jakiś musi być) są kolumny pomocnicze.
Jedynie odwołując się do indeksów arkuszy zamiast do nazw. Np po kolejności komórek w kolumnie. [syntax=vb]Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink) arg = Split(Target.SubAddress, "!") sh = Target.Parent.Row - 1 'link w 4 wierszu dot Sheets(3) adr = arg(1) With Sheets(sh) .Visible = True .Activate .Range(adr).Select End With End...
Nie wiem czy o to chodzi, a jeśli tak to pewnie da się ładniej/lepiej, ale na przykład można to zrobić tak: W drugim zestawie danych można zrobić dodatkową kolumnę pomocniczą (i nawet ją ukryć), w której będzie wydobywana nazwa po kropce. Mając tę kolumnę można operować funkcjami PODAJ.POZYCJĘ oraz INDEKS aby wydobyć szukane dane. Na moim przykładzie...
Dobry wieczór, A po co Panu dwie formuły, które wykonują to samo zadanie? Różnica jest tylko taka, że pierwszą formułę (z poprzedniego pliku i z kolumny B w tym pliku) wprowadza się do jednej komórki, a potem kopiuje w dół, a ta druga formuła obejmuje od razu cały zakres danych. W ogóle jak widzę takie formuły, to resztki włosów stają mi dęba. Ludzie,...
Takie coś mi wyszło w M2 i przeciągnij w dół [syntax=vbscript] =INDEKS(TEKST($A$1:$L$1;"rrrr-mm-dd");PO... do "&WYSZUKAJ(2;1/(A2:L2<>"");TEK...
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...
Najprościej użyć dodatkowy arkusz. Przy wykorzystaniu kolumny pomocniczej (w przykładzie "K") i formuły =JEŻELI(CZY.LICZBA(C4);MAX... od K4 w dół, obędzie się bez VBA. W arkuszu wynikowym odwołujesz się przez INDEKS, PODAJ.POZYCJĘ, WIERSZ
zastosowałem funkcję VLOOKUP. Jeśli kolumna pierwsza składa się ze scalonych komórek z pięciu wierszy i ma określoną treść, a kolumna druga ma pięć wierszy z określoną treścią, To jak zrobić, zakładając, że obie kolumny są zakresem tabeli, aby funkcja VLOOKUP pokazywała mi drugi wiersz z drugiej kolumny jeśli odniosę się do pierwszej kolumny ze scalonych...
Dzień dobry, Chciałem się włączyć do dyskusji, chociaż trudno zaproponować szybkie rozwiązanie przy tak dużej liczbie danych. Nie chcę proponować VBA, są pewnie lepsi od tego specjaliści, natomiast formuły Excela można na pewno zoptymalizować. Ale najpierw pytanie, czy w przykładzie kolumna I w arkuszu "wynik" zawiera spodziewany wynik? Warunek jest...
Ja bym wpisał w kolejności rosnącej np. w komórkach F29:F35 wartości "indeksów" {0*; 1,6; 1,7; 1,9; 2,1; 2,3; 3} i w komórkach G29:G35 wartości "indeksowane" {od 17 do 23}, a następnie zastosował formułę =WYSZUKAJ.PIONOWO(E29; F29:G35; 2; PRAWDA) *) Wartość zero do ewentualnego zastąpienia przez inną liczbę, która jest mniejsza od najmniejszej wartości...
Przypisanie komórkom wartości liczbowych z sąsiedniej komórki. Nie przepisuje w kolejności oraz wyrzuca błąd Przy wyborze z listy SYSTEM nie wyświetla poprawnie danych które sa przyporzadkowane do komórki SYSTEM przyporządkowany jest do WYMIARÓW Plik w załączniku XLSX http://obrazki.elektroda.pl/2071350900_1... =INDEKS(D9:D14;PODAJ.POZYCJĘ(...
Dostosuj sobie tylko indeks kolumny: [syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 16 Then 'Zmiana w kolumnie P w = Target.Row Cells(w, 14) = Cells(w, 12) + Cells(w, 13) Range(Cells(w, 8), Cells(w, 11)) = "" Cells(w, 13) = "" End If End Sub [/syntax] Dla wygody możesz też tak: [syntax=vb]Private Sub Worksheet_BeforeDoubleClick(ByVal...
w A8 =INDEKS($1:$4;WIERSZ()-6...
Istnieje kilka sposobów zapisu odwołań do zakresów komórek w różnych arkuszach. Odwołanie bezpośrednie w stylu Excela: [syntax=vbscript]Range("'Samochód części automatic (2)'!B2#")[/syntax]Nazwa arkusza jest fragmentem adresu zakresu. Nazwę arkusza umieszczamy w apostrofach jeśli zawiera spacje, znaki specjalne lub jest liczbą; oddzielamy od adresu...
Potrzebuję pomocy przy stworzeniu makra do kopiowania zakresu komórek z Arkusza1 do Arkusza 2. Wybieram np. komórkę Arkusz1:D7. Makro kopiuje komórki C7, D7,E7,F7,G7 i H7 i wkleja je do Arkusza2(C15, H15). Wybieram drugą komórkę np. Arkusz1:D25 i makro wkleja zaznaczony obszar do Arkusza2 w kolejny wiersz(C16, H16). Makro powinno działać tylko przy...
Jeśli lista to sprawdzanie poprawności, przy odpowiednim układzie kolumn w pliku źródłowym wystarczy zastosować WYSZUKAJ.PIONOWO. Jeśli lista to pole listy lub kombi (formularzowe) to INDEKS z parametrem komórki łączącej. W obu przypadkach plik zawierający dane musi być otwarty.
Funkcja WYSZUKAJ.PIONOWO działa w ten sposób, że szuka wartości zawsze w pierwszej kolumnie, a zwraca wynik z jednej z następnych kolumn. W sytuacji, gdy trzeba zwrócić wynik z kolumny wcześniejszej można posłużyć się kombinacją funkcji INDEKS i PODAJ.POZYCJĘ, chociaż w tym przypadku jeśli numeracja nazwisk jest kolejna, wystarczy funkcja PODAJ.POZYCJĘ....
Zastosuj sobie do tego prostą funkcję własną [syntax=vbscript]Function LiczKolor(zakres As Range, kolor As Integer) Dim kom As Range Dim suma As Double suma = 0 For Each kom In zakres If kom.Interior.ColorIndex = kolor Then suma = suma + 1 End If Next LiczKolor = suma End Function [/syntax] Podstawowe indeksy kolorów: czerwony - 3; zielony - 4 (ale...
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....
A w VBA to będzie coś takiego (tylko z indeksami kolorów i ewentualnie warunkami można trochę pokombinować): [syntax=vb]For Each kom In Range("A1:A23") If IsDate(kom) Then If kom >= Date - 2 And kom < Date Then kom.Interior.ColorIndex = 45 ElseIf kom >= Date - 7 And kom < Date Then kom.Interior.ColorIndex = 3 Else kom.Interior.Color = xlNone...
:arrow: adamas_nt Jak analizuje twoje kody to widzę że bardzo daleko mi jeszcze do pisania makr. Dzięki twojej wiedzy można było skrócić czas obliczeń (przynajmniej za pierwszym razem o parę sekund :) a nie milisekund,a drugie rozwiązanie też jest ciekawe) Adamas_nt 'owi należy się wielokrotne pomógł- a może nawet więcej] Ja już tylko skromnie dołożyłem...
Prawidłowo przenosi wartości wraz z datą i zmianą, jednak nie zwraca w komórkach D5 i E5 danych do formularza z którego zostały wpisane , gdzie miało pokazywać dla jakiej daty i jakiej zmiany został wyeksportowany ostatni raport - ma to na celu wyeliminowanie możliwości wprowadzania dwukrotnie tego samego zamówienia. Da radę to zrobić? I jeszcze przy...
Sposobów może być wiele, bo to dość typowe zadanie. Nie napisałeś, która wersja Excela, a to może być istotne, jeśli chodzi o szczegóły. Przykładowe rozwiązanie w załączniku. Formuła: [syntax=text]=INDEKS(C2:G5;;B1-2)[/synta... nowym Excelu (2021, 365) będzie to formuła rozlana - wpisujesz do pierwszej komórki, czyli do B2, zatwierdzasz Enter i otrzymujesz...
Ode mnie propozycja połączenia klasycznej formuły z funkcją UDF, która jest bardzo prostą adaptacją funkcji VBA Split: =JEŻELI.BŁĄD(WYSZUKAJ("żżż&... Jeżeli brak tekstu spełniającego...
Zaczne od tyłu: Wprowadziłem ci dwa "rozwiązania" active i inactive. Zwróć uwagę na różnice w formule (jaka wartość jest sprawdzana) i wybierz odpowiednią dla siebie. Dodałem wyszukiwanie nazwy z pierwszego arkusza za pomocą formuły "indeks" I najważniejsza rzecz: wstawiłem ci w formułę 1,03 (marża na sztywno a może uzależnić od innej komórki gdzie...
Aby odczytać ostatnią wartość w zakresie kolumnowym można użyć formuły: =INDEKS(z; MAX(JEŻELI(CZY.PUSTA(z); 0; WIERSZ(z))) – WIERSZ(z)+1) Jak poprzednio formułę można uprościć jeśli zakres zaczyna się od pierwszego wiersza: =INDEKS(z; MAX(JEŻELI(CZY.PUSTA(z); 0; WIERSZ(z)))) Twoja formuła nie podaje ostatniej wartości z kolumny tylko największą.
Tylko wyłączając sprawdzanie błędów nie zmienia to faktu że błąd nadal istnieje. W innym arkuszu "wyszukiwarce" wpisując =WYSZUKAJ.PIONOWO(A2; Cennik!A1:E7166; 2; FAŁSZ) wyskakiwał błąd #N/D! w komórkach z trójkątem. Okazało się że komórka A2 w której wpisywałem wyszukiwany indeks miała format ogólny, zmieniłem na tekstowy i działa wyszukiwanie. Mimo...
Witam, mam mały problem. Chciałbym wykonać pewną rzecz w Excelu (mam wersję 2010). Mianowicie, mam obliczone pewne wielkości dla 24 wariantów. Z tych wielkości wykonuje się wykres. Chciałbym zrobić tak, żeby po wybraniu jednego z wariantów z listy rozwijanej do stworzonej tabeli przypisało mi obliczone wartości do określonych komórek. Myślałem o funkcji...
Formuła[syntax=text]INDEKS(tablica_wynik... Jeśli rzeczywiście szukasz największej wartości, nie tej z wiersza 16, podstaw MAX(przeszukiwana_tablica) jako szukaną.
Podstawiamy jako drugi argument funkcji INDEKS. Odwołujemy się do pierwszego wiersza tablicy w trzecim wierszu kolumny wynikowej. WIERSZ()-2 w E3 zwróci wynik 1. Kopiując formułę w dół kolumny wartość argumentu (indeksu) rośnie automatycznie (nie trzeba ręcznie wprowadzać kolejnych liczb).
kolego Antidotum, a co w przypadku, gdy ilość wierszy z tym samym indeksem (kolumna A) jest zmienna? Poza tym komórki ze złączonym tekstem mają być scalone, jak autorka wątku chciała. Bez VBA nic nie zrobisz...
Witam, Moja propozycja rozwiązania problemu (formuła dla arkusza 3006, komórka C6): =INDEKS(Arkusz1!$A$1:$A$155;PODA... I oczywiście rozciągnąć przez cały zakres.
1. Skąd bierzesz listę dla pola kombi? 2. Czy komórki muszą być scalone? 2a. Możesz zmienić układ danych i grupować je w wierszach? 3. Gdybyś wrzucił plik (spakowany zip'em, forum nie akceptuje formatów E2007) nie byłoby tych pytań. Cóż, wszystko można: http://obrazki.elektroda.net/21_12895797... ale po co sobie komplikować... Z drugiej strony:...
Można wykorzystać ciekawą właściwość funkcji podaj.pozycję - jeśli typ wyszukiwania ustawimy równy 1 to będzie ona wyszukiwać najbliższego wyniku mniejszego niż szukany. Tak więc przy obecnym układzie można wypróbować coś takiego (dla komórki F2): =INDEKS($C$2:$C$4;PODAJ.POZYCJĘ&... I rozciągnąć w dół. Oczywiście...
No to wystarczy pięć pól kombi dla kierowców... http://obrazki.elektroda.net/63_12351391... W komórce pod polem kombi indeks z zakresu, we właściwościach pola odznacz 'drukowanie' i będzie ładnie w arkuszu i na wydruku.
Jeśli kilka komórek i kolejne liczby, to można sumować po indeksie: http://obrazki.elektroda.pl/7980251200_1...
Koniecznie makro? Wystarczy zastosować formatowanie warunkowe. Jeśli VBA to zainteresuj się funkcjami daty i czasu. Np [url=http://www.vb4all.pl/teoria/]Link, Funkcje>Funkcje daty i czasu>Weekday. "Podświetlenie" można zrealizować przez "pokolorowanie" tła komórki zakres.interior.colorindex=indeks koloru lub zakres.interior.color = RGB(red, green, blue)...
Dzień dobry, Zawsze w takich przypadkach należy dodawać załącznik z reprezentatywnymi danymi, bo tak to trzeba się domyślać. Rozumiem, że "ilość_1", "ilość_2" i "ilość_3" są to stałe teksty identyfikujące dane, a x, y, z oraz kg to zmienne. Nazwą oraz Datą nie zajmowałem się, rozumiem, że zostaną po prostu skopiowane. Moja propozycja to zastosować funkcje...
Mając imiona w kolumnie A (A3:A8), nazwiska w B (B3:B8) a listę z nazwiskami w komórce D3, może to być np. taka funkcja, wstawiona np. do E3: [syntax=vb]=INDEKS($A$3:$A$8;PODAJ.POZYC... --- Faktycznie, było przesuniecie w adresie. Poprawiłem.
Witam, mam podobny problem, Excel 2010 - w jednym arkuszu mam tabelę danych, chcę wyszukać komórki spełniające odpowiedni warunek, do tej pory w arkuszu 2 w komórce C18 miałem: [syntax=vb]=INDEKS(arkusz1!$A$4:$O$246; PODAJ.POZYCJĘ(arkusz2!$B18;arkusz1!$O$4:... i wszystko działa poprawnie dopóki w arkuszu 1 O4:O246 występuje tylko jeden...
To już nie jest takie proste. Tu już bym zastąpił wyszukaj.poziomo indeksem lub dodatkowym wierszem pomocniczym W obu przypadkach myślę o wykorzystaniu również formuły max.k() ale... Powiedz mi co ma być jak będzie trzy (lub jeszcze więcej) takie same rozwiązania? Ma się pojawić i trzecie (i kolejne)? Wynik w jednej komórce czy każde z rozwiązań osobno...
Przez COVIDA znalazłem się na zastępstwie i muszę przygotować temat inwentury w firmie. Będą ją robić ludzie, którzy nie znają dobrze asortymentu i chcę im ułatwić i przyspieszyć pracę. Szukałem takiego tematu na forum, ale nie znalazłem, a sam nie ogarnę tego niestety... Niestety jestem zielony w tworzeniu makr, a pilnie potrzebuję makra, które pozwolą...
Suma warunków tu się nie sprawdzi bo każda pozycja jest inna. Sprawdzanie poprawności wskazać listę i zaznaczyć kolumnę A:A W komórce poniżej indeks() z całą tabelą a jako wiersz podaj.pozycję() gdzie argumentem jest wybrana lokalizacja i zero jako ostatni parametr. dodane po chwili --------------------------------------- Poniżej przykład mojej propozycji...
Nie do końca zrozumiałem o co Panu właściwie chodzi, bo to sprowadza się w zasadzie do zamiany wierszy z kolumnami, ale jeśli zaproponowana formuła Pana w zasadzie zadowala, a problem jest tylko z pustymi komórkami, to proponuję coś do tych komórek wpisać np. "pusta". Można to zrobić formułą tablicową =jeżeli(czy.pusta(zakres); "pusta"; zakres) zatwierdzoną...
Spodobały mi się sugestie bota (bo na początku podobnie jak on "pomyślałem" o problemie) :) Rozwiązań twojego "problemu" jest naprawdę mnóstwo (pomijając makra). Np. z pomocą indeks() W załączeniu przykład. W kolumnach żółtych masz pomoc/wyjaśnienie w jaki sposób kopiując w dół komórki mamy "powtarzalne" liczby co jest wykorzystane w funkcji "głównej"....
Przetestuj w Excelu poniższe makro [syntax=vb]Sub x() Dim lOstRw& Dim lOstRwDst& Dim a$ With Application .ScreenUpdating = False .DisplayAlerts = False .Calculation = xlCalculationManual End With lOstRw = Cells(Rows.Count, 1).End(xlUp).Row With ActiveSheet .AutoFilterMode = False Range("B1:B" & lOstRw).AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Sheets(2).Range("A1"),...
indeks excel excel indeks excel funkcja indeks
honda civic centralny zamek centralka skoda fabia skoda spadek obrót
praca równoległa transformatorów philips senseo
Panasonic TX-L47ETW50 nie włącza się - możliwe przyczyny Brak posuwu drutu w spawarce MIG/MAG - przyczyny