Z tego co wiem, to Excel ma tablice stworzone wcześniej z których korzysta. http://support.microsoft.com/kb/q86523 http://support.microsoft.com/kb/q828795
Czy ktoś wie jak skonstruować taką funkcję? Akurat wiem jak transponować... ale tablice danych :sm9: 866748 z wykorzystaniem funkcji tablicowych i nazwanych zakresów komórek - jak w załączniku. :spoko: 866750
Bez VBA chyba się nie obędzie. Spróbuj: 1) wpisać do tablic zawartość komórek rozdzielając ciągi Split (tekst, chr(10)) 2) porównać tablice każdy rekord z każdym, jeśli porównanie da wynik negatywny przepisujesz wartość do trzeciej tablicy lub bezpośrednio do komórki wynikowej. Ale: w A2 jest "STOP_RAPORT CTX_CARDMAN" spacja zamiast AltEntera. Takie...
Prawie to samo chciałem zaproponować (różnica w znaku ";" zamiast "*" - łatwiej zauważyć że tu warunki a tu mnożona tablica =SUMA.ILOCZYNÓW((A1:A56000=F... Funkcji suma.iloczynów nie trzeba "zamykać" klamrami. Ona się zachowuje jak tablicowa bez wymuszania obliczeń tablicowych. Jednak jak...
Gdzieś widziałem przykład wykorzystujący funkcję API SendMessage . Ale jak to z API na różnych maszynach może być różnie. Popatrz na taki przykład Dim temp1 As String Dim temp2 As String Sub Makro() temp1 = Cells(1, 1).Value ' zapamiętanie starej wartości dla Undo Cells(1, 1) = "coś" ' wpisanie nowej wartości do komórki...
Jaką regułę zastosować, żeby w programie Excel dane z jednego arkusza kopiowały się do drugiego arkusza automatycznie ? Aby skopiować dane z jednego arkusza do drugiego w programie Excel w sposób automatyczny, możesz skorzystać z kilku różnych metod, w zależności od tego, jakiej funkcjonalności oczekujesz. Oto kilka przykładów: 1. Formuła odwołująca...
20 par 'Date' i 'Price' dla różnych akcji) Trza było tak od razu :) :arrow: Marek003 Spróbowałem po Twojemu. Swoją drogą: dlaczego obrabianie pojedynczej kolumny trwa sekundę a tej samej kolumny, tym samym makrem z zapisanymi 39 innymi kolumnami trwa siedem razy dłużej? Być może jest to problem z jakimś obszarem pamięci lub http://obrazki.elektroda.net/25_12784384...
Poprzednio pisałeś: Oczekiwany wynik dla funkcji działającej na b5 i na kolumnie F i G to np "1" lub "prawda" lub inna cyfra, jeśli np słowo "czerwona" wystąpiłaby w kolumnie F więcej niż 1 raz. (Raczej to będzie niemożliwe) a teraz w Twoim przykładzie jest zupełnie co innego. Teraz to np. tak: [syntax=text]=JEŻELI(ILE.LICZB(SZUKAJ.TE...
usuwam wiersz z tym punktem z tabeli i od nowa wczytuje tablice zaczynam od punktu który był wcześniej najkrótszą odległością Spróbuj to inaczej rozwiązać. Dlaczego kasujesz wiersze? Czy ja dobrze zrozumiałem, że w arkuszu 'Baza' szukamy najbliższego punktu dla punktu wyjściowego 'C27'?
Witam Proszę o cierpliwość i pomoc :) w napisaniu kodu VBA Excel oraz wskazanie, jak w tablicach wskazać zakres np. cały wiersz a nie poszczególne komórki. Problem: 3 tablice z danymi liczbowymi: tablica 12A (i , j) tablica 12B (i , j) tablica 12C (i , j) tablica HHH (i , j) - tablica do której należy wpisać wartości z tablic jw.. Zadanie: napisz kod...
W skoroszycie Wyszukiwarka zrobiłem tablice w arkuszach pomocniczych i formuły a odwołaniem do plików z danymi które mi potrzebne.Pliki/Skoroszyty są w tej samej lokalizacji co wyszukiwarka lecz tylko działa jeżeli są wszystkie otwarte.Jeżeli zamknę któryś skoroszyt w komórce gdzie jest formuła z jego adresem wyświetla #ADR!
Mam wrażenie, że tych tablic jest za dużo. Public MojaTablica() as Double ReDim Tablica (1 to 10, 1 to 10) Dim Tablica2(1 to 10, 1 to 10) Za to poza deklaracją nigdzie nie widać odwołania do tablicy o nazwie "MojaTablica". Wypełniania jest zupełnie inna tablica - wcale nie publiczna (taka literówka). Po korekcie powinno być dobrze. Tablice w VBA jak...
Z tą aktualizacją to znowu jakieś nieporozumienie. Jeśli dane będą się często zmieniać, ale sposób ich obróbki będzie niezmienny, to należy stosować formuły i przeliczanie automatyczne. Wtedy sam Excel zadba o to, by wszystko było aktualne. Jeśli wpisujesz do komórek wartości, to w domyśle te dane nie powinny się zmieniać, albo na tyle rzadko, żeby...
Niestety nie opisałeś tego zbyt dokładnie, albo to ja nie potrafię tego zrozumieć. Proponuję więc uniwersalną metodę: zapytania SQL. Umieszczasz tabele w kolejnych arkuszach i piszesz zapytanie. Wynik możesz zapisać gdzie chcesz. W "czystym" też to można zrobić VBA. Żeby uniknąć problemów z wydajnością warto posortować obie tablice względem wspólnego...
Widzę że droga na łatwiznę mi nie wyjdzie xD no nic, trzeba było spróbować :P to może po kolei, czy jest ktoś w stanie pomóc mi stworzyć tablice której liczba wierszy to liczba niepustych komórek a liczba kolumn jest równa 5? na moje oko to będzie tak: [syntax=vb] Dim wiersz As Byte Dim ws As Worksheet Dim tablica(1 To wiersz, 1 To 5) As Double Set...
Tak prawie. Nie musi zliczać wierszy i podawać liczby porządkowej kolejno, a skopiowane tablice powinny być wklejone jako wartości.
Witam serdecznie. Na formularzu umieściłem kilka ComboBoxów które zostały podzielone na grupy. Piony określają rodzaje linii i dodatkowe reaktory, poziomo określane są grupy stanowiące linię produkcyjną. Podczas aktywacji nowej linii aktywowane jest jednocześnie kilka ComboBoxów. Dopóki stosowałem proste wczytywanie .RowSource osobno dla każdego z formantów...
Na razie zastosowałem tą tablice znaków i działa , tylko że najpierw muszę to u siebie przerabiać , ale jak tylko nam magazyny po stanie wyjątkowym w firmie odblokują to mają wymienić sprzęt na nowy i aktualizacje office zrobić więc problem zostanie zażegnany. Dziękuję za zainteresowanie i wsparcie :D.
Nie analizowałeś :) Masz 4 kolekcje (dla każdej kolumny osobno), jedna z nich wyświetlana jest w MsgBox. Trzeba to tylko dopracować i przypisać do komórek tabeli (od końca). Sortowanie jest konieczne, żeby dane "poukładały się" wg godzin. Zmyliło cię pewnie włączenie odświeżania dopiero przy końcu makra. Edit: Jeszcze jedno: W pierwszej kolejności godziny...
Nie rozumiemy sie. Podałem Kod makra które działało na plikach tekstowych i chcialem go wykorzystac do pobierania danych z plików excel. Dowiedziałem się od Ciebie że tak się nie da, wiec bede kombinował inaczej. Może doprecyzuje dokładnie co chce osiągnąć. Chce połączyć pliki excelowe w jeden plik Excel. Moje pliki z których chce kopiować dane wygladają...
Dzień dobry Na początku pozdrawiam wszystkich forumowiczów. Zwracam się do mądrzejszych ode mnie. Excel ciągle się uczę i co nie co już wiem, niestety nie mogę ogarnąć jednej formuły. Mam tabelę z produktami i wyliczone w czasie zmiany procentowe. Z tabeli przy pomocy formuł MIN.K i MAX.K wybrałem kilka największych zmian na plus i na minus. Mój problem...
no dobra :) sprawdź ten kod 'Option Base 1 Sub sprawdz() Dim jest As Boolean Dim TabData() As Date Dim TabSp() As String Dim w_pierwszy As Integer Dim k As Integer Dim kD As Integer Dim kSp As Integer Set ark1 = Sheets("arkusz1") Set ark2 = Sheets("arkusz2") Set ark3 = Sheets("arkusz3")...
Dzień dobry, Excel nie jest dobrym narzędziem do przetwarzania tak dużej liczby danych w sposób złożony. Próbowałem zmodyfikować te formuły, tak aby możliwe było wielokrotne szukanie tych samych danych, ale to rozwiązanie jest mało efektywne, bo działa na wszystkie rekordy, a nie tylko te zwielokrotnione. Poza tym nie wiem ile może być tych powtórzeń....
Zadeklarowałaś tablice 7-elementową (od 0 do 6 - bynajmniej w kodzie nie ma deklaracji option base 1), pomijając to, że w wpisujesz dane do tablicy od elementu 2 to w kodzie w linijce: [syntax=vb]If c.Value = MyLocation(i + 1) Then[/syntax] dla i = 6 odwołujesz się do elementu tablicy o indeksie 7, który nie istnieje i dlatego makro zwraca błąd.
Obawiam się tu tego zapisu w pomocy do tej funkcji: Argumenty tablic muszą mieć takie same wymiary. Jeśli tak nie jest, funkcja SUMA.ILOCZYNÓW zwraca wartość błędu #ARG!. Zgadza się, ale tablica nie musi być wypełniona. :arrow: marekk003 Spróbuj przy tej postaci formuły usunąć połowę kodów z arkusza "A"... Można dopasować rozmiary w zapisie funkcji...
Dzieki kolego Redss307, jutro sprawdze jak dziala. Co do kolegi medicb to kopie w tym forum dużo i mam setki informacji na temat przestrajania radyjek bo to nie pierwsze które robie.... a co do przepisu to nie zawsze jest on taki sam... Radyjko Stabo zupelnie inaczej przestrajalem wpinajac dlawik szeregowo i dziala teraz elegancko. mam jeszcze do zrobienia...
witam mam problem z zaznaczaniem wybranych arkuszy, potrzebuje zaznaczyc wszystkie arkusze oprocz 3 mi znanych te 3 arkusze nie wystepuja po kolei wiec nie moge posluzyc sie indexem, jedyna stala dla tych arkusz to ich nazwa kodowa znalazlem kawalem kodu autorstwa chyba tajana, działa mi gdy porownuje z 1 nazwa kodowa, ale nie potrafie go przerobic...
chcę znaleźć wiersze w których data jest ta sama i godziny w nakładają się na siebie Trzeba chyba zmienić podejście do zadania. W Excelu trudno porównywać i znajdować "pokrywanie się wielu zakresów" :cry: Dlatego proponuję zrobić pomocnicze tablice czasu pracy instruktorów (podział z dokładnością np do 10 min) i wtedy łatwo wychwycić powtarzające się...
Jakub_30 , Range to grupa komórek excela a ty masz tablice wartości pojedynczych. Jak by ci to prościej wytłumaczyć ... może: - Z g...a bata nie ukręcisz . Może przerób tą liczjeżeli tak aby przyjmowała tablice dwuwymiarową wtedy będzie można Range sprowadzić do tablicy aby wywołać z zewnątrz. Jako alternatywa ... w makro5(): - zapamiętaj aktualny...
Problem losowego pobierania próbek z jakiś populacji często występuje przy badaniach statystycznych czy metrologii technicznej. Pamiętam sprzed epoki komputerów :D , że były stosowane specjalne tablice liczb losowych (podobne do powszechniej znanych tablic logarytmicznych) do ustalenia numerów próbek do badania. Teraz w Excelu wartości funkcji losowej...
Funkcja WYST.NAJCZĘŚCIEJ nie zna historii arkusza i nie bierze pod uwagę kolejności wprowadzania danych, tylko ich kolejność na liście argumentów przy wywołaniu funkcji, przy czym jeśli argumentami są tablice dwuwymiarowe lub zakresy dwuwymiarowe, to są one odczytywane wierszami. Funkcja pomija puste komórki i wartości nieliczbowe, ale jeśli na danych...
Ja nie jestem ekspertem z VB poznałem go troszkę przy okazji i tak staram sie korzystając poszerzyć wiedzę. Jeszcze zastanawiam sie jak by zrobić by macro najpierw sprawdziło gdzie jest odpowiednia wartość, zapisało w tablice i potem mrygało tło z danymi z tablicy tylko podczas filtrowania komórek wg innego kryterium znów trzeba by odczytać wartoscie...
r = Val(komorka) zwrot wartosci calkowitej, jakie to proste a ja na rozne sposoby probowalem przekonwertowac stringa na long Workbooks(plik1).Worksheets(arku2).Range... & 7 + 3 * i).Resize(1, 26).Copy Workbooks("PE caly.xlsm").Worksheets("rozliczenie").Ra... & 7 + r + i * 37).PasteSpecial Paste:=xlPasteValues i po co tworzylem tablice zmiennych...
Cześć Ad 1. Czy dobrze rozumiem, że ten problem nie występuje na nowo zainstalowanym komputerze? (sam system operacyjny)? Ad 2. JAkiej używasz wersji językowej - ustawienia regionalne? co separuje Ci średnikami - kolumny czy dane w formułach 1. Win 98 + Office2000 + Zone Alarm + AVG to pierwsze instalowane programy czasem młodsi doinstalowywują jakieś...
Skorzystaj z funkcji Suma.Warunków W tym przypadku będzie to: =SUMA.WARUNKÓW(D2:D25;A2:A25;"dostępne";...
Znalazłem coś takiego: [syntax=vb] Function losowanie(k As Integer, max As Integer) As Variant Dim wynik() As Variant If k > max Then MsgBox "Błedne argumenty funkcji losującej" End End If ReDim wynik(1 To k) Randomize For i = 1 To k Do los = Int((max * Rnd) + 1) Loop While IsError(Application.Match(los, wynik, 0)) = False wynik(i) = los Next losowanie...
Mam nadzieję, że nie zamęczam. Musiałem niestety odrobinę przemodelować tę tabelę stąd też pytanie - Co w poniższym kodzie, trzeba zmienić żeby zamiast kol. B,C,H przerzucał kol. B,C,V z arkusza "kontrole" (kolumny od R stanowią tablice pomocnicze - w zał. plik)? [syntax=vbscript] Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column...
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...
Jeśli plik jest otwarty to makro pomija wykonanie otwarcia arkusza "baza". a jak jest otwarty to wykonuje dalsze instrukcje: kopiowanie potrzebnych wierszy. Pomija cała instrukcje czyli nic nie robi. czemu przed for each muszę dać otwarty=false a potem odnosić się do otwarty jako true Generalnie nie musisz dać na początku 'otwarty=false' bo zmienna...
marek003 Brakuje jeszcze czterech "pojedynczych" kombinacji. Każdy sort może ważyć tyle co koszyk zmieści. Przynajmniej w teorii... Jak wracałem do domu to też sobie to uświadomiłem ale dopiero teraz mogłem przysiąść przy kompie. Potwierdza to jednak fakt że łatwo się można w zestawieniu wszystkich możliwości obliczeń przy większej ilości danych pogubić....
Och, o to należy zapytać Walkenbacha ;) Tak naprawdę nie przeszukujemy tablicy, a szukamy dzielnika. "2" to zawsze będzie pozycja ostatniej "1" w tablicy.
AAAA... tablicówka. ok. Czyli dodaj tylko adr.pośr() i "zamknij" w tablicy.
Ok doszedłem do ładu z tematem i po kilku dniach pierwszego kontaktu z VBA wypłodziłem z pomocą elektrody kilka skryptów, może się komuś przyda więc wkleję. kolumna B - zakres ulic poprawnych C - ulice poprawne G - ulice do poprawienia H - błędy sprawdzania Kolejność C koniecznie Z->A Obliczenie zakresów Private Sub zakres_Click() Dim i As...
Jedną formułą? Musiałaby być jakaś karkołomna-tablicowa. Zrobiłbym to tak (załącznik).
Jak można zrobić to inaczej ? Jak możeszcz to sobie postaw darmową bazę danych (np. postgress lub mySQL ...) przerzuć dane do bazki i problem załatwi baza danych i nie będziesz musiał parsować swojego pliku za każdym uruchomieniem strony. Zresztą jest to bardziej "profesjonalne" podejście do problemu. Jak przerobic plik tekstowy na wpisy w bazie ?...
Strzelam :) Czyli przeszukujemy zakres (tu zapisany w tablicy) [syntax=vb]Dim XlApp As Object Dim Tablica() As Variant Dim WymZloz As Long On Error Resume Next Set XlApp = GetObject(, "Excel.Application") Tablica = XlApp.Worksheets(1).Range("C5:C30") For i = 0 To UBound(Tablica) If WymZloz = Tablica(i) Then knyps = True Exit For Next If knyps And WymZloz...
Spróbuj przeciągnąć taką formułę: =HIPERŁĄCZE("#'TABLICA'!A" & WIERSZ();WIERSZ())
Dość skomplikowana mi wyszła ta formułka, bo nie wszystkie numery występują w tabeli. Mam nadzieję, że to będzie działać w Excelu 2007 lub późniejszym, ze względu na funkcję JEŻELI.BŁĄD. Formuły są tablicowe, trzeba zatwierdzać przez Ctrl+Shift+Enter.
Dlaczego tylko Variant? Przecież tak też można: [syntax=vbscript]Function A() As Integer() Dim T%(2) T(0) = 3 T(1) = 5 T(2) = 8 A = T End Function [/syntax]
Sprawdź, dostosuj. Zrezygnowałem z tablicy na rzecz prostego przypisania.
excel tablice wyniki tymczasowe tablice tablice jednowymiarowe
wymiana regulator napiąć serwo hamulec peugeot zapala dioda protect
Rozregulowane zawory w motocyklu: skutki i objawy Czas działania jonów srebra w wentylacji