A skąd kolego masz ten pik z makrami "Skoroszyt.xlsm" ? Odpowiedz na pytanie Excela - czy masz go z zaufanego źródła ? :?: Zaufane źródła - z reguły nie ukrywają żadnych makr ani arkuszy typu "sheet8.xml" :D Otwórz sobie jakiś nowy skoroszyt, wprowadź jakieś dane i zapisz go raz jako zwykły skoroszyt(1) xlsx, a potem zapisz ten sam skoroszyt(2) jako...
Plik jest istotny, tylko Ty zdaje się sprawy nie potraktowałeś zbyt poważnie, a to przecież Twój interes, nie nasz. W ramach drobnej złośliwości podrzuciłeś nam plik o "wadze" prawie 8 MB. Na innym forum to by nie przeszło. Czy Twój plik faktycznie tak wygląda? W kolumnie wyników są tylko zera, teksty albo błędy zamienione na "Brak"? Po co wobec tego...
>10000));"błąd";"ok") Masz błąd w nawiasach. Ten podwójny po 10000 powinien być pojedynczy czyli ...">10000);"błąd""....
Ta wersja firmware to chyba Bridge. Czyli przejście między starymi a nowymi softami. Powinieneś dograć do tego najnowszy firmware 57.73.92 wydany 10/03/2023 Nie wiem czy to rozwiąże Twój problem ale warto spróbować. Dziwne że serwisant nie zaktualizował softu. Maszyna w umowie?
Sformatowałeś dane jako tabela, nazwy w nagłówku tabeli muszą być unikalne...
Zakres docelowy musi zawierać zakres źródłowy. Tak, jak gdybyś to robił "ręcznie" przez Ctrl+d. Wg Twojego opisu powinno być [syntax=vb]Range("c99:g99").AutoFill Destination:=Range("c99:g1200"), Type:=xlFillDefault[/syntax]Jeśli rzeczywiście do końca arkusza [syntax=vb]Range("c99:g99").AutoFill Destination:=Range("c99:g" & rows.count), Type:=xlFillDefault[/syntax]
Jaka wersje Excel ? Jaky komunikat?
Jakie wersje Office na tych komputerach? Sprawdź (w komputerze "w pracy") w referencjach (Tools>References), czy któraś nie jest "missing". Jeśli tak, odznacz.
Czyżby taki prosty błąd?[syntax=vb] For i = 3 To ostWrs If (InStr(1, etat, "| " & .Cells(i, 5) & " |") > 0 Or .Cells(i, 5) Like etat) And _ (InStr(1, firma, "| " & .Cells(i, 9) & " |") > 0 Or .Cells(i, 9) Like firma) And _ (InStr(1, szef, "| " & .Cells(i, 10) & " |") > 0 Or .Cells(i, 10) Like szef) And _ (InStr(1, kopalnia, "| " & .Cells(i, 11) & "...
W przykładzie, gdzie Wziąłes formuła, została funkcja zdefiniowana przez użytkownika(Suma_Koloru), przepisz je do Twojego skoroszytu
Kod z załączonego pliku ma błąd logiczny, bo po przejściu przez wybór zmienna pk_select_case ma wartość, która nigdzie dalej nie jest wykorzystana. P.S. Mój kod działa, ale jest bez sensu właśnie ze względu, który opisałem. Powinno być tak, jak napisałeś [syntax=vbscript]this.Cells(i, 9) = "SEC"[/syntax]
Suma jest prawidłowa tylko trzebaby było "odsłonić" dni. Jeżeli mają być tylko godziny zmień format komórki na niestandardowy: [g]:mm
[syntax=vbscript]Formula1:="=OFFSET($D$2...
sprawdź teraz
Jeśli pod przyciskiem, to je połącz, a nie wpisuj formułę...[syntax=vb][d1] = [a1] & " " & [b1] & " " & [c1][/syntax]A dokładniej[syntax=vb]For i = 1 To zasieg Cells(i, 4) = Trim(Cells(i, 1) & " " & Cells(i, 2) & " " & Cells(i, 3)) Next[/syntax] Edit: Odwrotnie :) poprawiłem...
Podmień na [syntax=vbscript]Sheets("TEST_2").ListOb... colStart), Cells(row, colEnd)).Value = Sheets("DoPowołania").Range("L1").Value[... lub [syntax=vbscript]Sheets("TEST_2").ListOb... colStart).Resize(, colEnd).Value = Sheets("DoPowołania").Range("L1").Value[...
...ListView, który jest inną kontrolką niż ListBox (ma inne właściwości i inaczej się do niego ładuje dane). Ten sposób ListView2.ListItems = "'BAAN 3'!G8:K97" ładowania danych NIE JEST poprawny dla ListView, zapomnij o nim. To działa tylko z ListBox'em. USUŃ z formy wszystkie ListBoxy które tam miałeś... Zamiast nich wstaw i skonfiguruj...
Z jakiegoś powodu masz dziwnymi arytmetycznych - Sqr - pierwiastek kwadratowy z 2=1,41 30/1,41=21,28 co jest =>20 i <24 Być może trzeba z=x/y^2
Innymi słowy nazwy plików jak i nazwy arkuszy w "" a poprawnie jest wokbooks a nie workbook
Weż dla pustego arkusza zastosuj: Dodano po 6 Reusso: Kolega sugerował użycie innej nazwy dla zmiennej, która przechowuje pierwszy wolny wiersz. Jeśli skasowałeś +1 to kolejne kopiowania będą nadpisywać ostatni wiersz. Nieprawda. Sugerowałem inny sposób znajdowania indeksu ostatniego używanego wiersza. A to, że się przyczepiłem, że LastRow + 1 jest...
... Kiedy nie miałem filtrowania poprzez przycisk z makrem vba ukrywanie oraz chronienie komórki pomagało, lecz kiedy ma m filtrowanie z przycisku, to VBA wyrzuca błąd iż arkusz jest chroniony A czy w kodzie vba jest gdzieś taka linia (?): True , to po zablokowaniu arkusza dana czynność jest dozwolona. Tam gdzie jest False , jest ona zabroniona. ......
Sam arkusz trochę dziwnie zaprojektowałeś. Przetestuj załączone rozwiązanie.
Jeśli używasz słowa kluczowego preserve, można zmienić rozmiar tylko ostatni wymiar tablicy i nie można zmienić liczby wymiarów. Dodano po 1 np.[syntax=vb]ReDim X(10, 10, 10) '. . . ReDim Preserve X(10, 10, 15) [/syntax]
Jak już wspomniałem, funkcje w Twoim arkuszu muszą działać na liczbach. Data w Excelu (wpisana jako data w formacie systemowym) też jest liczbą. Znając tą zasadę, przy odrobinie "inwencji twórczej", jesteś w stanie dokończyć zadanie samodzielnie. Obliczenia (odejmowanie dat) wykonuj w komórkach pomocniczych. Komórki zawierające wartości tekstowe będą...
Jeżeli obsługuje tylko 7 zagnieżdżeń. Ale można inaczej: Spróbuj: =WARTOŚĆ(JEŻELI(H11<600;0,145... & JEŻELI(ORAZ(H11>600;H11<69... & JEŻELI(ORAZ(H11>699,9;H11<... & JEŻELI(ORAZ(H11>799,9;H11<... I tak dalej, nie chciało mi się...
Jest przypisanie, jest wyszukiwanie wolnego wiersza, brakuje tylko instrukcji warunkowej. Napisz najpierw samą instrukcję, następnie podstaw wyszukiwanie i przypisanie. Przeanalizuj: [syntax=vb]If usfdiplomaden.ComboBoxprefix3.Value = "Frau" Then MsgBox "Kobieta, czyli ""in""" 'sprawdzimy czy dobrze. Później linię usuniemy 'wyszukanie1 'przypisanie1...
Przeciez masz komunikat ze jest tam Project VB Nie mam 2013, zrob zrzut ekranu VBA edytora
[syntax=vb]ListaArray = Array(RodzajLiniiLista, RodzajDodReaktLista)[/syntax] Elementy tej tablicy są typu variant, którym nie nadano wcześniej wartości, stąd mają wartość null. Kolega pewnie googla i wkleja, prawda?
Dzięki za linka.:)
Wcześniej znalazłem komendę którą wpisywało się do do okienka uruchom, która aktywowało plik vba6.dll Pewnie chodzi o rejestrację biblioteki w systemie - sęk w tym, że rejestrujesz w ten sposób jakąś starszą wersję biblioteki, która nie istnieje/lub nie jest zarejestrowana/ w systemie. Pisząc makro od początku w nowym pliku nie powinieneś mieć żadnych...
Zastąp [syntax=vb]iRow = ws.Cells.Find(What:="*", SearchOrder:=xlRows, _ SearchDirection:=xlPrevious, LookIn:=xlValues).Row + 1[/syntax]poleceniem:[syntax=vb]iRow = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row + 1[/syntax]
Prawdopodobnie ta linijka powinna wyglądać tak: [syntax=vb]Cells(b + 2, 1).Formula = "=IRR(A1:" & Cells(b + 1, 1).Address & ")"[/syntax]
Proszę bardzo. :)
Oj, kolega coś chyba dzisiaj niewyspany Nie spałem dziś dobrze.. :) To fakt. Dla potomnych :wink: - błędne okazały się argumenty funkcji COVAR(), które nie mogą być kolumnami, a muszą być z zakresu Range Nigdy jej nie używałem, ale miło się dowiedzieć :)
Dobry wieczór, Zastosowana funkcja ILE.NIEPUSTYCH (COUNTA) pomija przy zliczaniu tylko komórki faktycznie puste, a te które zawierają formułę już nie są puste (nawet jeśli formuła zwraca pusty tekst). Inaczej zachowuje się funkcja LICZ.PUSTE (COUNTBLANK), która zlicza nie tylko komórki faktycznie puste, ale również te, które zawierają puste teksty....
W drugim (UserForm1) formularzu pod przyciskiem bo próbuję i nie wychodzi.. Napisz co nie wychodzi. Jakiś komunikat o błędzie? Dane lądują nie tam gdzie trzeba?
Napisałeś pętlę nieskończoną. Nie do końca łapię co chcesz zrobić. Może wystarczy licznik pętli przesunąć poza gałąź If Do Until ActiveSheet.Range("A" & i) = "" Or ActiveSheet.Range("A" & i + 1) = "" If Range("A" & i).Value = 37258 Then Range("A" & i + 1).EntireRow.Insert...
Użyj prostszego polecenia i się nie męcz: [syntax=sql]select ... from table1 A,table2 B where A.Id=B.Id[/syntax]
Nadal przy otwieraniu wyskakuje błąd: Compile error.
Jaki błąd wyskakuje?
Zaraz zerknę. Dodano po 1 Faktycznie, był błąd - literówka w kodzie. Przepraszam. Poprawiłam i dołożyłam nowy arkusz grupujący wszystko. Zobacz teraz. Sprawdź, bo muszę wyjść na chwilę i nie mam czasu dokładnie sprawdzić. Jakby co - to pisz.
Witam! A czemu nie załączyłeś "takiego" nietypowego pliku :?: :cry: IMHO - możliwości są co najmniej dwie :D : błąd pliku (np uszkodzony szablon nowego pliku), albo błąd aplikacji Excel :?:
moze ktos ma pomysł jak to prosto ogarnąć Obawiam się, że przy pomocy Excela i VBA trudno to będzie funkcjonalnie zrealizować ;-) tym bardziej, że jak widać mamy tu do czynienia z jakimiś produktami spożywczymi i każdy błąd kodu może mieć poważne konsekwencje. Jak sam piszesz: przy uruchomieniu excel aktualizuje baze z zewnatrz to dlaczego nie wykorzystać...
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ć.
Spróbowałbym otworzyć plik i skopiować wszystkie jego elementy do nowego pliku.
Nie ma formuły więc sie nie liczy "sama". Albo po dodaniu nazwiska najnormalniej kopiuj komórkę z formułą średnią z komórki wyżej (Stajesz myszką na komórce do skopiowania łapiesz za prawy dolny róg komórki - wskaźnik myszy zmieni się na plusik - i przeciągasz w dół). Lub zamiast samej formuły średnia() wpisz we wszystkich komórkach średniej warunek...
jak napisać regułę, która by podczas sumowania pomijała te komórki w których jest: #DZIEL/0! Możesz przechwycić/obsłużyć błąd korzystając z funkcji Czy.błąd - zwraca Prawda/Fałsz, które można ładnie związać z funkcją Jeżeli. W wersjach Excela od 2007 jest funkcja Jeżeli.błąd, która robi to "od razu". Wtedy bez względu co było wcześniej liczone i jakim...
zużycie paliwa w jakich jednostkach? L/100 km ? formuły musi wypełnić w werszach, po pierwszym "P" ale istnieje błąd w przypadku N po P
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...
Arkusz zbiera bezpośrednio dane pomiarowe z urządzenia. Zbieranie danych w programie zewnetrzym i export do excela jest rozwiązaniem mniej korzystnym, niż wstawienie danych do konkretnej komórki wskazanej przez użytkownika.
Witajcie, Przy otwartym pliku wynikowym otwieram plik źródłowy (znajduje się w tej samej lokalizacji) i dane w pliku wynikowym zmieniają się w błąd #ADR! a w samej ścieżce informacja o nazwie arkusza w pliku źródłowym zmienia się na #ADR!. Przy otwarciu plików w odwrotnej kolejności błąd nie występuje. Spotkaliście się z czymś podobnym?
Witam, Mam pewien problem. Od razu mówię, że nie jestem zbyt biegły od technicznej strony excel'a. A więc tak: Mam takie oto narzędzie do pracy: http://art30a.ucoz.pl/news/narzedzia_ana... Przy próbie wygenerowania 'plików gromadzenia danych" pojawia się błąd: "Microsoft Visual Basic. Run-time error '1004'. Method 'Open'...
Witam, czy możecie mi powiedzieć dlaczego jak wykonuję poniższy kod to pojawia się błąd. Wykonanie kodu dla pliku o nazwie: 13012012.rpt przebiega poprawnie a jak wczytuję plik 14012012.rpt to pojawia się problem. Oba pliki załączyłem. [syntax=vb] Sub Czytaj() Dim PLU As String, Temp As String, J As Double, FullFileName FullFileName = Application.GetOpenFilename("Raport...
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Ę(...
Witam, mam problem gdy kopiuję tabelkę z formułami z jednego pliku i chcę wkleić do innego pliku pojawia się komunikat o błędzie i wklejają się tylko wartości. Adresy komórek nie są zabezpieczone, ale w każdym dokumencie są te same, wersje excela są te same, tryby chronione są wyłączone, nie za bardzo wiem co się dzieje.
Przy zamykaniu pliku MS Excel, zawiesza się wyskakuje błąd "Microsoft Excel has stopped working" 1045, zamraża ekran i trzeba wyrzucać z TaskMangera, itp. Dzieje się to bez względu na liczbę otwartych plików w 1 instancji. 1045 to b trudny w analizie błąd, korzystam z dodatku podobnie jak inne pliki, ale tylko ten wywala... :( Pomóżcie prosze.
Chciałbym prosić o pomoc w poradzeniu sobie z błędem jak w temacie. Pracuje nad excelowym makrem w którym wykorzystuję metodę „AfterUpdate()” , w trakcie wykonywania makra pojawia się czasem powyższy błąd czego efektem, najczęściej jest zawieszenie się excela i ekran odzyskiwania dokumentu. Przyczyną błędu wydaje mi się, że wiem co jest....
Witam, Jestem w trakcie pisania pierwszego w życiu kodu w VBA i napotkałem pewien problem. Generalnie w programie chodzi o to, aby po naciśnięciu przycisku dane z formularza zamówienia dodawały się do historii zamówień na innym arkuszu, a następnie aby formularz zamówienia się drukował. Dokładnie co drugie wciśnięcie guzika robi to co zamierzone a w...
[Początkujący] Dzień Dobry, Problem mam taki, że jak kopiuje komórkę wynikową to w docelowej komórce otrzymuje błąd #ADR!. mój kodzik na samo kopiowanie: Sub kopiuj() Range("J6").Select Selection.Copy Range("A36").Select ActiveSheet.Paste Application.CutCopyMode = False End Sub Z góry dziękuję za informację jak można pozbyć się problemu związanego z...
Witam poproszę o pomoc w następującej sprawie pracuje na arkuszu Excel, który znajduje się na dysku wspólnym i dane do niego wprowadzają jeszcze inne osoby z różnych lokalizacji, osoby te wprowadzaja dane często kopiując je z jeszcze innego arkusza excel i co jakiś czas pojawia sie w arkuszu komunikat: " W skoroszycie istnieje zawartość, która powoduje...
Zrobiłem funkcję, która wyszukuje wartość "150" i jeśli znajdzie taką wartość, to zapisuje dane do tablicy dwuwymiarowej w zakresie st do kc. Podczas uruchamiania wywala mi błąd Run-time error "9" w linii [syntax=vbscript] tablica(7, k) = wart[/syntax]. Jak zrobię mniejszy zakres pętli to jest ok. [syntax=vbscript] Sub Tace2() ' liczy tace Dim tablica(1...
Witam, Proszę o pomoc potrzebuję utworzyć plik excel który będzie zawierał dane z innego pliku excel. Problem w tym że firma korzysta z dysku wspólnego którym jest dropbox. Oba plik są na nim zamieszczone. Dotychczas korzystałam z funkcji: =JEŻELI([test 1.xlsx]Arkusz1'!$B1=0;" ";[test 1.xlsx]Arkusz1'!$B1) Niestety teraz dane się nie aktualizują i za...
Witam. Przyznam, że to dla mnie błąd fundamentalny Excela. Czy koś zna sposób jak to naprawić? To o co mi chodzi pokazałem w filmiku. Ogólnie chce do liczby wyżej dodać stałą wartość 0,01 no i wyniki zaczynają być dziwne po pewnej i-tercji. https://youtu.be/QEsad_1_pCo Z góry dziękuje z pomoc:)
Witam Nie wiem czemu, dlaczego obsługa błędu: [syntax=vb]On Error GoTo ErrTrap[/syntax] Nie przechwytuje mi błędów. Procedura która pobiera wartości z komórek w momencie gdy napotka wartość "Null" powinna przeskoczyć do obsługi błędu lecz tak sie nie dzieje. wyskakuje mi błąd "94". Czy jest to spowodowane brakiem biblioteki .DLL? Proszę o pomoc Poniżej...
Witam, Nagrałem makro w którym wyszukiwane są dane z innego pliku za pomocy funkcji wyszukaj pionowo. Podczas nagrywania funkcja znalazła dane i wstawiła do innego pliku, po zapisania makra i ponownym uruchomieniu formuła zwraca zupełnie inne wartości. Może ktoś sprawdzić kod i powiedzieć co jest źle? Poniżej przesyłam kod: [syntax=vb]Windows("1.xls").Activate...
Witam. Mam w/w błąd gdy próbuję odpalić ten oto kod. Proszę o szybką odpowiedź.
Witam serdecznie! Mam napisane pewne Makro które ma za zadanie co godzinę odświeżać dane w prezentacji PP, która zaciąga dane z Excela. Problem pojawia się w momencie gdy któryś plik excel zostanie przypadkowo otwarty. Wtedy na prezentacji wywali błąd "plik tylko do odczytu". Czy jest możliwość przekształcenia mojego makra w taki sposób aby nie wywalało...
Na działających kilkunastu plikach od lat, w jednej chwili podczas aktualizacji wyskakuje ten sam błąd: Run-time error '3704': Operacja nie jest dopuszczalna gdy obiekt jest zamknięty.. cały system pobierania danych w jednej chwili padł. Proszę o pomoc, domyślam się, że może problem tkwi z sterownikami, zewnętrzną bazą danych. Nikt z pracowników nie...
excel błąd excel błąd pomiarowy excel formatować błąd
podział instalacji elektrycznych atmega16 wyświetlacz graficzny stare puszki elektryczne
urmet cyfral chromowanie natryskowe
Behringer PMP1280S - Diagnostyka i Naprawa Wpływ nierównomiernego oświetlenia na panele fotowoltaiczne w połączeniu równoległym