Witam Przecież masz odp. w temacie [syntax=vbscript]UpdateLinks:=0[/syntax] [syntax=vbscript]Workbooks.Open Dane , 0[/syntax]
Tak nie idzie. Będę musiał jakoś inaczej pokombinować. Sądzę że jakoś to powinno być wciśnięte w wierszu: Set wbkSkoroszyt = Workbooks.Open(fold & "\" & dato & "\" & myvar(i)). Tylko nie wiem jeszcze jak dostawić operator "UpdateRemoteReferences = False" w linijkę powyżej. :) Dodano po 20 Najprostszych rozwiązań szuka się najdłużej. Wystarczy w wierszu...
Co zrobić żeby w przypadku gdy plik o danej nazwie już istnieje Jestem za tym, żeby sprawdzić obecność takiego pliku przez: If Dir(Thisworkbook.path & "\" & nazwa)<>"" then ... i podjąć dalsze działania (zapisać plik, podać komunikat, itp.)
Jak wyżej. Porównaj datę z systemową[syntax=vb]If Date < #7/17/2012# Then 'format USA: mm/dd/rrrr 'makro 'jeszcze tylko dziś Else MsgBox "komunikat" End If[/syntax]
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...
Podaj pelna nazwa tego chytrego pliku "1_19". jest to excel'owsky? Oprocz blad 400 jest komunikat? Jaky?
*marek003 nie musi byc, jednak nie myslalem, ze da sie to zrobic bez makra :) sprobuje. dzieki za pomysl w odopwiedzi na Twoje pytania: - kolumna F jest dla mnie istotna, ponieważ zeby sie nie "zapetlic" to wystarczy mi dzialanie, az do pierwszej pustej komorki w tej kolumnie. o ile w office 2003 gdzie wierszy jest stosunkowo malo za bardzo mnie to...
tak, chcę aby po wprowadzeniu dat lub zakresu komórek excel zrobił wykresy dla wszystkich walut
na komputerze z wersją 2003 poniższe makro działa bez problemu to samo makro na komputerze z excelem 2010 Chyba jest raczej odwrotnie, to na 2003 makro z ".Sort.SortFields" nie będzie działać. Excel 2003 obsługuje co najwyżej składnię ".Sort Key1:=, Order1:=, Key2:=, Order2:=, Key3:=, Order3:=, Header:= ..." Excel 2010 obsługuje zarówno powyższe ,...
Jaka wersje Excel ? Jaky komunikat?
Skoro czyści arkusz, to dochodzi do linii przed 'oExcel.Sheets(mySfrom).UsedRange.Copy'.... Wygląda na to, że nie znajduje arkusza i zgodnie z instrukcją "goni" do etykiety 'qInst'. Przejdź makro krokowo [F8], lub postaw apostrof przed 'On Error', uruchom i podaj treść komunikatu błędu.
Po kliknięciu w przycisk pojawia mi się taki komunikat :-|. https://obrazki.elektroda.pl/9066221600_...
W związku z pytaniem na pw. Utworzyłem sobie plik w c:\ o nazwie plik1.xlsx, w którym wpisałem tekst w komórki Od B34 w prawo. Następnie uruchomiłem makro (c:\ w InputBox'ie). Dane pięknie skopiowały się do "Arkusz2", komunikat: "skopiowano z 1 pliku". Możliwe przyczyny błędu: -podajesz złą lokalizację -lokalizacja jest dobra ale nie ma tam plików -nazwy...
Witam Zrobiłem troszeczkę inaczej. Myślę że lepiej ale jeżeli nie będzie ci pasowało - nie ma sprawy - poprawie dokładnie tak jak chcesz. Po wciśnięciu OK w okienku pojawia się komunikat czy chcesz wprowadzić kolejny dokument. Jeżeli tak data i numer pozostaną, jeżeli nie zamknie się całe okienko i jego ponowne otwarcie (z "głównego" przycisku) otworzy...
Formatowanie warunkowe - formula =DZIŚ()<wygaśnięcia (zielony) komunikat - makro do zdarzenia na otwarcie skoroszytu
U mnie działa (oprócz kopiowania wysokości komórki z tym że tego nie ma w kodzie). Możesz podać cały komunikat błędu? Jest możliwość wciśnięcia przycisku "debug" Jeżeli tak to którą linie kodu wskazuje żółta strzałka (zaznaczenie)? Przy każdym formacie wyrzuca błąd. Jak nie formatujesz inaczej to też? A możesz jeszcze podać jak sformatowałeś komórkę?
Źle się wyraziłem, nie wyskakuje żaden komunikat z błędem makra, pojawia sie komunikat że pojawił sie niespotykany błąd i excel zostanie zamknięty. Wiem że makro zbudowane jest w sposób co najmniej niewłaściwy dlatego jeżeli masz jakieś uwagi a wiem że masz bo znasz sie na tym, to proszę podziel się nimi.
Ten komunikat o błędzie nie dotyczy zmiany koloru.
(at)paweliw dokładnie formatowanie warunkowe miałem już ustawione i ładnie to śmiga ale tylko na jednym arkuszu, wpisałem formułę do sekcji wszystkich arkuszy lecz nadal działa tylko w pierwszym arkuszu (at)Zbych034 Nie mogę wstawić pliku ponieważ wyskakuje komunikat "... Niedozwolone rozszerzenie"
Brak załącznika to poważny mankament! Nie wiadomo, jakie dane są w kolumnie "O". W kodzie PRL jest sprawdzany warunek: [syntax=vbscript]Sheets(x).Cells(y, "O") >= -30[/syntax]Otóż warunek ten spełniają nie tylko liczby >= -30, ale również puste komórki, dowolne teksty, w tym teksty puste, wartości logiczne. A jeśli w komórce jest wartość błędu, to program...
Dziękuje za odpowiedź. Przyznam się, że niewiele z tego rozumiem ;) a przy próbie uruchomienia pojawia się komunikat Run-time error '9' Subscript out of range. Co może być przyczyną?
Dzięki wielkie, Miałem podobnie, ale ciągle podczas użycia skrótu wyskakuje taki błąd: Dlaczego on odwołuje się do dysku D:\ Gdy skopiowałem słowo w słowo jest ten sam komunikat. W zasadzie wyskakuje przy użyciu jakiegokolwiek skrótu użytego z ctrl.
Jedna zapomniana kropka a jaka różnica ;) :arrow: Aldrin punkty za spostrzegawczość! Do autora: polecenie SaveAs napotykając na plik z identyczną nazwą wyświetli standardowy komunikat. Można go pominąć wyłączając alerty, ale...
Wszystko byłoby fajnie, gdyby nie to, że ten komunikat "Sortowanie" mi działa, ale nie chce działać to prawdziwe sortowanie. Podaję przykład: Range("M7:V10").Select Selection.Sort Key1:=Range("V7"), Order1:=xlDescending, Key2:=Range( _ "U7"), Order2:=xlDescending, Key3:=Range("R7"), Order3:=xlDescending, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom...
http://obrazki.elektroda.pl/3903168900_1... Zrobilam wszystko tak jak Pan zalecil i wpisujac kod pojawia mi sie komunikat jak na zalaczonym zdjeciu. Dlaczego tak sie dzieje?
Dzięki clubs. Jak pisałem makro działa. To co pozostaje niewyjaśnione to załamanie excela przy ręcznym Ctrl+C i Ctrl+N. Nie wyświetla żadnego komunikatu ani dźwięku nie wydaje.
ok, działa dziękuję za pomoc. Jeszcze jedno pytanie, czy jest możliwość napisania makra które po załóżmy 30 uruchomieniach arkusza wyświetla komunikat "wykorzystałeś ilość uruchomień" i zamyka arkusz? Lub to samo robi na podstawie daty?Jak takie makro napisać?
Hej, a czy macie jakieś pomysły, jeśli nie mogę zmieniać kodu pliku B? Uruchamiam makrem z pliku A kolejno 24 pliki i w każdym uruchamiam jakieś makro. Makra tych plików wyrzucają komunikaty, które są nieistotne dla mnie np "odświeżono dane", a wstrzymują moje makro. Znacie sposób na pominiecie tych msgbox-ów?
Makro działa prawidłowo dopóki nie przeniosłem go do makr osobistym, z uwagi na to, że jest mi potrzebne do przenoszenia arkuszy z innych skoroszytów. Niestety, po przeniesieniu, pojawia się wcześniej pokazany komunikat i makro się zatrzymuje. Oczywiście, tak jak wskazujesz, w tych swoich skoroszytach mam dodany arkusz o nazwie "Ostatni".
Niestety nic nie działa. Prosze o wsparcie. Próbowałem formuł jak poniżej: Jak widzę takie kody to ... Dodaj sobie pętle sprawdzającą i jak coś będzie zablokowane to odblokuje. Coś ala [syntax=vbscript]For Each w In Application.ProtectedViewWindows w.Edit Next Windows("20230725_INT.xls").Activate Application.WindowState = xlNormal Range("A:L").Select...
Pewnie można, ale to już dłuższa historia... :) Najprościej - jeżeli plik-źródło jest w tej samej lokacji - wstawić kwerendę wybierającą dane (Dane->Importuj dane zewnętrzne->Nowa kwerenda bazy danych, wybrać Excel Files * i OK, wskazać plik-źródło (można zaznaczyć "Tylko do odczytu"), a dalej z kreatora" wybrać zakładkę, rozwinąć ją krzyżykiem, wybrać...
Nie wiem czemu nie mogę uruchomić makra z przycisku? Kurcze pierwsze chodziło od cjancik ale to ostatnie nie. Wyskakuje komunikat o ustawieniach osobistych, które mogą być usunięte. Czy to makro ustawia dane w pierwszy wolny wiersz?
Przeczytaj jeszcze raz (deklaracja zmiennej i odwołanie się do wektora): 3. Nie przypiszesz zakresu do zmiennej tablicowej w ten sposób. Można Np tak Teraz, jeśli[syntax=vb] Set XlApp = GetObject(, "Excel.Application") Tablica = XlApp.Worksheets(1).Range("O4:O36")[/syn... owszem, zadeklarowałeś obiekt, ale co ze skoroszytem Excela? Musisz się do...
Ad1) Zastosuj warunkowe zapisywanie (gałąź If-Else). Sprawdź stan/wartości kontrolek (w pętli wg nazwy typu, jeśli dużo) i jeśli spełniają warunki - zapisujesz, jeśli nie, wyświetlasz stosowny komunikat. Ad2) Wstaw licznik do pętli i wymuś wyjście, jeśli licznik=suma.
Co jest w Sheets("Parametry").Range("f1") ? Dodano po 3 makro nie chce iśc do przodu blokuje się Na jakiej linji? Jaky komunikat?
Podobnie jak wcześniej, czyli wyskakuje komunikat "Object doesn't support this property or method". A w kodzie podkreśla linie .ShowAllData
Czy możesz podpowiedzieć jak posortować wg trzech kluczy na pliku który wcześniej załączyłem ? Ale tak aby po wpisaniu 4 znakowego kodu wew. przez operatora pojawił się komunikat o tym, że jesli taki kod został wcześniej użyty dla indeksu takiego i takiego ?
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...
Podobny sposób do zablokowania kontrolki - dający efekt "wyszarzania", ale samego tekstu - można uzyskać ustawiając właściwość Enabled kontrolki na False. Excel faktycznie nie obsługuje wyszarzenia całej kontrolki, chyba że jej BackColor zmienisz ręcznie ;). witam ponownie czy moglbys mi powiedziec gdzie znalesc w jezyku polski opis kodow do VBA. jesli...
Bardzo dziękuję! :) Jeszcze mam ostatnie pytanie: czy jest możliwość aby makro sprawdzało te komórki w arkuszu 1 ale komunikat wyświetlało w arkuszu 2? (albo tym, który będzie w danej chwili aktywny). Bo z kolei to C11 i C10 zależą od wartości w innym arkuszu.
Witam nie jestem zbyt mocny w excelu a potrzebna mi formuła lub makro sprawdzające czy wpisywana wartość (tekst) już nie występuje w kolumnie, np. jeśli wpiszę "zeszyt" wyświetli się komunikat, że taki wpis już istnieje dzięki za pomoc
Super, dziękuję. Dodano po 8 Jeszcze jedno pytanko, czy jest możliwość żeby zamiast komunikatu "wybierz zakres", na stałe podać zakres do tworzenia arkuszy (dane w tym zakresie są zmienne, ale zakres z którego mają się tworzyć arkusze jest stały)?
Wielkie dzięki za kod. A czy rozbudowa tego kodu o większą liczbę wypełnianych w arkuszu 1 komórek (i zmian układu tabeli w arkuszy 2) to tylko kwestia ich dodania czy może trzeba coś więcej przerabiać. Próbowałem tak zrobić ale moje umiejętności w VBA sa mizerne i chyba coś namieszałem bo jakieś błędy teraz wywala. Końcowa ilość komórek i układ tabeli...
Witam stworzyłem makro które dane z arkusza instrukcja przyporządkowuje do odpowiedniej daty w innym arkuszu. Mógłby ktoś zerknąć na to makro i np je trochę skrócić, ponieważ nie mam pojęcia jaką można by zastosować pętle żeby to zrobić? Drugie pytanie jest takie czy da się zrobić żeby podczas działania makra nie skakał on tak między arkuszami a został...
Chcę wstawić proste makro odwołujące ikonę przycisku do komórki w innym arkuszu, tego samego pliku (skoroszytu). Dokładnie komórki (C4) w (Arkuszu2) Oto kod mojego makra: [syntax=vb]Sub Odwolanie() Worksheets("Arkusz2").Range ("C4") End Sub[/syntax] Coś jednak robię źle bo wywala mi komunikat o błędzie. Proszę o poradę... Nie wiem czy będzie potrzebny,...
Spróbuje wyjasnic jeszcze raz o co mi chodzi. Dodaje dwa pliki z excela(jeden z makrem drugi bez). Mam dużo większą ilość danych niż w przykladowych plikach i większy rozrzut wartości zakończonych gwiazdką(*). Potrzebuje pozbyć się gwiazdek do czego stworzyłem proste makro. Po jego wykonaniu gwiazdki znikają, lecz formatowanie tych komórek pozostaje...
musiałem to przeoczyć teraz działa idealnie :) ale mam jeszcze jedno zagadnienie, mianowicie chodzi o to, że po tym jak excel wykona te wszystkie czynności to plik z którego robiliśmy kopie zapisujemy jako (w nazwie podajemy dokładnie tą samą wartość co w pliku który makro tworzy samo, czyli ta sama komórka) i później link działa ale wyświetla komunikat...
dzięki działa. To może jeszcze pomarudzę. Właśnie zmieniły się zasady wyskakiwania komunikatu - szefostwo buuu Makro ma sprawdzać zakres komórek, przyjmijmy że od a1 do a5 a okienko ma reagować na każdą wybraną z listy pozycję. przepraszam.
Dziękuję za odpowiedzi, ale... chodzi mi o to, żeby tekst (nazwa dnia tygodnia) występujący w komórce A1 "Arkusz1" determinował do jakiego, wcześniej utworzonego w tym samym skoroszycie arkusza, będą zapisywały się dane umieszczone w tabeli, np. B2:F20 "Arkusz1". Dlatego też, wydaje mi się, że bliższą rozwiązania mego problemu jest odpowiedź otrzymana...
to, że jestem leniwy to wiem, jednak Twoje makro nie rozwiązuje problemu - usuwa kropkę, ale pozostawia w dalszym ciągu komórkę jako tekstową. Tak więc w dalszym ciągu nie ma oczekiwanego rezultatu. Oczywiście pojawia się z lewej strony komórki komunikat o możliwości przekonwertowania do postaci liczbowej, ale tej czynności makro nie rejestruje. Dzięki...
WItam, pomozcie, temat niby prosty, ale jednak nie moge sobie z nim poradzic. potrzebuje makra, ktore zapisywaloby dany arkusz excela (aktywny w danym momencie) w formacie pdf, nazwa tego pliku bylaby brana z dwoch komorek tego arkusza, np e1 I e5, a sam plik pdf zapisywalby sie na pulpicie w folderze PDF. po skonczonym dzialaniu wyskakuje komunikat...
Cześć, Mam dziwny problem. Stworzyłem makro - działa, kiedy uruchamiam je z menu, w którym widzę wszystkie moje makra. Super. Kiedy jednak uruchamiam je skrótem klawiszowym, to działa tylko do pewnego momentu, a potem jak gdyby nigdy nic przestaje działać i nie posuwa się do przodu. Nie pojawia się żaden komunikat błędu. Co może być przyczyną? Wydawało...
Witam. Z samej ciekawości pobrałem własny plik i stwierdziłem, że makro jest na swoim miejscu. Ja osobiście używam excel 2007 i nie mam problemu z uruchomieniem. Tak na wszelki wypadek to w kleje go tu. Sub CzyPowtorki() Dim Unik As New Collection Dim Tbl As Variant Dim Komunikat As String Dim OstW As Long Dim x As Long With ThisWorkbook.Worksheets("Arkusz...
jak napisać program obliczający sumę 1+1/2 + 1/3 +1/4.... +1/n dla n podanego w polu edycyjnym , wynik pokaż w msg box lub label . Program ma być napisany w języku VBA Oczywiście, poniżej znajdziesz przykładowy kod napisany w VBA, który oblicza sumę ciągu harmonijnego 1 + 1/2 + 1/3 + ... + 1/n, gdzie n jest liczbą podaną przez użytkownika. Kod ten...
Przejrzyj dobrze kod. Ostatnią funkcję masz "zaremowaną". [syntax=vb]'Call GetOnlyGoodValues(x1, x2, x3, x4, x5, x6, x7, x8, x9)[/syntax] Wewnątrz GetOnlyGoodValues wykonywane jest przeszukiwanie. Działa to dobrze bo sprawdzałem, ale generowanie czegokolwiek trwa baaaardzo długo. Zapis do komórek Excela mija się z celem o czym już pisałem. Właśnie dodałem...
Dzięki za próbę pomocy! Wiem, że to nie jest efektywny kod, ale to moje najmniejsze zmartwienie. Właściwe makro, w roboczym skoroszycie, ma być wykonywane raz na miesiąc. Oczywiście jest znacznie bardziej rozbudowane, ale i tak to bez znaczenia, czy będzie się wykonywało 1ms czy nawet 100 razy dłużej. Sens tego makro leży w automatyzacji czynności,...
Coś czarujesz! Gdzie Ty wpisywałeś to CutCopyMode? Powinieneś wpisać przed zamknięciem każdego pliku, czyli tu: [syntax=vbscript]Application.CutCopyMode = False Skor.Close False[/syntax]Sprawdzałem i u mnie komunikat się nie wyświetla.
Tu trzeba już więcej wiedzy z VBA i czasu (którego niestety na chwilą obecną nie mam - gdyż makra znam na poziomie podstawowym i trzeba by było szukać i nagrywać a później wnioskować i wykorzystywać to co potrzebne). Jednak przedstawię pewien tok który może ci pomoże (bo o większość rzeczy już się pytałeś na forum i powinieneś je znać - szczególnie...
Dobry wieczór, Ja w swoim poście odniosłem się tylko do cytowanej formuły i pokazałem, jak ją należy zapisać, aby działała dla zakresu. Natomiast co do załącznika, to w ogóle nie rozumiem jaki miałby być wynik działania formuł. Np. w kolumnie K poszukiwana jest fraza "Cena katalogowa". Ta fraza występuje tylko w wierszu 61. i tam formuła ją odnalazła....
A jak takie makro wykonać zależne ? Włącz nagrywanie makra, nagraj czynności które chcesz wykonać i prześlij na forum - poprawimy :) [url=http://support.microsoft.com/kb/213... makra po zmianie zawartości komórki lub zakresu komórek [syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) Dim KeyCells As Range ' jezeli makro maja...
Właśnie zależy mi na tym bo można było normalnie skopiować ctrl+c ctrl+v Rozwiązanie z wklejaniem specjalnym nie rozwiązuje problemu bo jak kopiuje dane z tej mojej tabelki i wklejam do nowego arkusza, to dane są wklejane co 5 kolumnę, a chciałbym aby były kolo siebie. Poza tym w drugą stronę (czyli kupując dane z innego arkusza do tego mojego) cały...
Makro nie rusza przy zapisywaniu- nie tworzy się kopia pliku we wskazanej lokalizacji. Wersja Excel Standard Edition 2003. Nie ma żadnych komunikatów. Przy pisaniu też nie ma żadnych błędów. Po prostu nie działa. W załączniku miejsce gdzie makro się znajduje. Poniżej jeszcze raz obecny kod Private Sub Workbook_BeforeSave(ByVal SaveAsUi As Boolean,...
Cześć Napisałem proste makro króre odświeża plik excela połączony kwerendami z accesem, a następinie zapisuje go. ActiveWorkbook.RefreshAll ActiveWorkbook.Save W trakcie odświeżania pliku wyskakuje komunikat :" To polecenie anuluje wykonywane polecienie Odśwież dane. Czy kontynuować? " Jeżeli wcisnę "tak" to przerwane zostaje odświeżanie i następuje...
po wpisaniu pozycji której nie ma na liście pokazuje się komunikat "nie ma tego na liście" i tak miało być ale po zamknięciu wyskakuje mi komunikat : "invalid property value" co moge z tym zrobić? i jeszcze jedno: po wpisaniu pozycji której nie ma na liście pokazuje się komunikat "nie ma tego na liście" udało mi się napisać makro które dodaje nową pozycję...
Hej! Mam problem z biblioteką Outlooka. Maile z poziomu Excela są wysyłane w wersji programu 2016, ale plik uzupełniany jest również w starszych wersjach Excela (tutaj jednak nie jest wykorzystywana opcja wysyłania maili). Problem polega na tym że w starszych wersjach Excela plik się psuje wyskakuje komunikat o nieprawidłowym ładowaniu biblioteki DDL,...
Cześć, mam problem, którego nie potrafię rozwiązać. Mianowicie potrzebuje narzędzia, które będzie wyszukiwać zakładki w pliku excel po jego nazwie. Powinno być to w formie MsgBox. Np. mamy plik jak w załaczniku i chciałbym, żeby odrazu po uruchomieniu wyskoczył MsgBox, gdzie możemy wpisać interesujacy nas arkusz i otwiera się on po potwierdzeniu komunikatu....
Witam! To mój pierwszy post w tej części forum. Natrafiłem na problem, znalazłem rozwiązanie, może komuś to się przyda. Zarejestrowałem proste makro, które w pierwszej części (tylko ta jest istotna) miało u dołu tabeli, ale przed wierszem podsumowania tworzyć dodatkowy wiersz będący kopią jednego z wierszy powyżej. Wydawało się, że sprawa jest prosta,...
Udało mi się dopasować pliki i przetestować. Za każdym razem pojawia mi się komunikat - w schowku jest duża ilość informacji, czy chcesz później wklejać je do innego programu. Może źle dopasowałem? nie mam wprawy w excel. Czy można wprost przenosić dane bez np formuł. Tzn w każdym pliku jest lista rozwijana z RM (wybór z kilkunastu opcji), czy też wyszukaj...
Dzień dobry, Muszę przygotować zestawienie w postaci dokumenty Worda na podstawie danych które mam w arkuszu Excela. Napisałem makro Excela, które uzupełnia przygotowany szablon w Wordzie danymi i wykresami z arkusza Excela (oba pliki w załšczaniu). Makro pobiera dane z arkusz i wkleja do pól szablonu Worda tam gdzie sš ustawione zakładki (bookmarks)...
Witaj. Można napisać makro, które będzie porównywać zawartość wprowadzoną w komórce ze wszystkimi innymi komórkami w danej kolumnie. W przypadku wykrycia duplikatu może wyświetlić komunikat, wyczyścić komórkę, albo zrobić obie akcje na raz (lub cokolwiek innego się zaprogramuje).
witam, chodzi o to aby dla każdego kolejnego wiersza zawsze komórka K była wypełniona , jeżeli dane w danym wierszy zostaną wpisane to w wierszu "x" w kolumnie K musi tez być wpis. Jeżeli dany user wpisze np 20 wierszy to w kolumnie K tez 20 x musi być jakiś wpis, jeżeli nie to brak możliwosci zapisu... A co w przypadku, gdy tych spełniających warunek...
Tworząc makro i umieszczając przycisk z przypisanym makro, które sprawdzi tabelę, a gdy pole będzie puste - zwróci komunikat zamiast wysłać wydruk do drukarki. Korzystanie z przycisku Drukuj w menu programu wymusi jednakże wydruk z pustym polem. Aby nauczyć się pisać makra - F1 - pomoc, hasła: Visual Basic, makro. Jest też obfita literatura na ten temat.
w testowym folderze mam trzy pliki docx, żadnego oczywiście nie otwieram, WOrd jest jest zamknięty. Po uruchomieniu Excela i makra w nim zawartego pojawia się ikona klepsydry i w arkuszu nic się nie dzieje. Kiedy podglądam Worda, jest komunikat, że pierwszy z trzech plików docx jest zablokowany do edycji przez użytkownika "inny użytkownik" i mam do...
Dane nie sa super wrazliwe. Gdyby wpadly w rece konkurencji to tez nic by sie nie stalo. chodzi o zbieranie danych z testu i wewnetrznych audytow produkcyjnych. Dane sa w postaci : - ktos cos zapomial albo wadliwie zamontowal, (sa numery czesci ( ale musial by ktos posiadac pelna dokumentacje, zeby zroozumiec numery w stylu BSAY-13865-001 ) - jakas...
Hej, chciałbym stworzyć makro, które umożliwi mi wykonanie następującej czynności: Mam pole "Staż pracy" i chciałbym stworzyć obok tego pola przycisk, po wciśnięciu którego wyskoczy komunikat a w nim informacje: a) 0-3 miesięcy b) 4-8 miesięcy c) 9-12 miesięcy d) powyżej 12 miesięcy i obok każdej z odpowiedzi kółko do wyboru. Po wciśnięciu kółka wyboru...
pozostałe które byłe wprowadzone wcześniej pozostaną na swoim miejscu w "przyrządach pomiarowych" I tak będzie dopóki nie zmienisz czegoś w zakresie "C5:I5" w arkuszu "Rejestracja przyrządów" tzn przypisywana (kopiowana) jest wartość, której nie zmieniłeś. Jeśli jednak komórki te chcesz zostawić puste a zachować wartości w drugim arkuszu musisz posłużyć...
Witam, zwracam się z prośbą odnośnie stworzenia makra. Mam napisać makropolecenie które pobiera z dwóch wskazanych komórek wyrażone w km3 ilości ścieków oczyszczonych i nieoczyszczonych. Następnie oblicza jaki procent ścieków stanowiły ścieki oczyszczone i wynik zwraca w formie komunikatu: Oczyszczono (wyliczony procent) % ścieków. [syntax=vb]Sub makro()...
Hej Testuję krótkie makro w VBA [syntax=text]Sub Sayhello() Msg = "Czy nazywasz się" & Application.UserName & "?" Ans = MsgBox(Msg, vbYesNo) If Ans - vbNo Then MsgBox "Nic się nie stało" Else MsgBox "Jestem Jasnowidzem!" End If End Sub [/syntax] I teraz jak je uruchamiam to pojęcia yes i no są odwrócone. Kiedy klikam Yes pojawia się komunikat "Nic się...
Witam, proszę o poradę jak zrobić, żeby makro sprawdzało mi czy jest któryś z checkboxów (są w kolumnie g6:g2000) zaznaczony i jeśli jest zaznaczony to kopiuje wartość z kolumny A (np. zaznaczony checkbox g20 to kopiuje a20 i wkleja do Arkusz2:A1 i wywołuje inne makro. Jeśli są 2 zaznaczone lub więcej ma wywalić komunikat że tylko jedno może być zaznaczone....
Zaraz, zaraz. Po woli i systematycznie. :D Łącza do innych plików to jedno a nie/działające makro to drugie. Pierwsze (łącza) powstaje w momencie gdy w pliku nazwijmy głównym użyjesz danych z innego pliku. Normalny objaw żeby niepotrzebnie nie powielać danych. U Ciebie na komputerze plik główny może otwierać się bez dodatkowego komunikatu ponieważ plik...
Witam, Czy istnieje możliwość napisania w MS Excel makra, które będzie działało zgodnie z poniższym schematem: 1. W skoroszycie istnieje arkusz Jacek oraz Placek 2. W arkuszu Placek w zakresie A1:K500 występują wartości całkowite, które mogą się powtarzać 3. W arkuszu Jacek w kolumnie "W" istnieją wartości całkowite unikatowe - nie powtarzające się...
Założenie było takie, żeby kopiował wszystkie wiersze w których w kolumnie F była wartość "tak" ale w takiej formie kopiuje wszystko niezależnie od "<>". Założenie było w miarę dobre. Z realizacją trochę gorzej. Makro działa tak jak je napisałeś tj. porównuje wartość komórki F1 z wartością zmiennej nazwanej przez Ciebie nie . Jeżeli chcesz aby...
i tak właśnie zrobiłem ale przy próbie zapisania wyświetla się komunikat http://obrazki.elektroda.pl/2747284400_1... a przy uruchomieniu chce tworzyć nowe makro a po utworzeniu nic się nie dzieje [/img]
Witajcie, mam prośbę o wsparcie dot. wprowadzenia w kodzie makra wysyłania maili treści zawartej w komórce dotyczącej znalezionego w tabeli błędu. Przykładowo mając tabelę A1:C3, excel znajduje błąd w komórce A3 która się zapala, obok w komórce B3 wyświetla się treść komunikatu jaki powinien być wysłany do użytkownika , jako część maila, a w komórce...
Z Accesem jeszcze nie pracowałem, trochę się obawiam, że musiałbym poznawać go od podstaw zanim coś w nim stworzę. Tworzę tą bazę już od dłuższego czasu i chciałbym ją wreszcie skończyć więc wolałbym się ograniczyć tylko do Excela, którego znam jako tako i lubię. Jestem skłonny zrezygnować z nadawania plikowi bazy atrybutu tylko do odczytu. W tej chwili...
jakos nadal nie działa pojawia się komunikat Application.defined or object-defined error Dodano po 7 Jeśli tak zrobię to faktycznie jest ok wksz.Activate MsgBox Range("status") Jeśli wksz.Range("status") to już błąd Ja chce kopiować komórki pomiędzy arkuszami wiec użyłem polecenia 'Cells(NextRow, 1) = wksz.Range("status") gdzie cells jest poleceniem...
Dzięki za szybką odpowiedź pomogło ale jest jeszcze jeden problem. Opiszę to dokładniej. Makro szukaj uruchamiane jest z komórki "B12" i przez InpudBOXa szuka podanej wartości. UserForm szukaj ładowany z makro szukaj w którym jest ta pętla ma 5 przycisków CommandButton z czego: szukaj_dalej ma przeszukiwać pętlę a pozostałe zakończyć makro szukaj i...
1. makro nie uruchamia się. 2. numer kolumny zmieniony na rzeczywisty. 3. wariant B to tylko przykład, w treści makra wpisałem właściwą treść wariantu. 4. używam listy ze sprawdzania poprawności. 5. makro wklejone do docelowego arkusza. 6. poziom zabezpieczeń - trudno mi to precyzyjnie określić, pracuję na służbowym kompie więc pewnie nie jest niski....
A nie użyłeś Option Explicit? Nie wiem gdzie ta opcja jest. Jak pisałem wyżej wyeksportowałem wszystkie okna i moduły i zaimportowałem do czystego skoroszytu, skopiowałem arkusze i na razie działa. Przy okazji: Jak wymusić zapis (nadpisanie) pliku tak, żeby nie było komunikatu że już taki plik istnieje? Po prostu żeby bez pytania zapisywał. ActiveWorkbook.SaveAs...
Gdzieś chyba jest błąd w kodzie bo zamiast liczyć to wstawia tekst formuły brakuje na początku formuły znaku "=". Natomiast gdy ręcznie wstawię to zlicza natomiast i tak wyskakuje komunikat "Łącza do pliku*xls' nie zostały uaktualnione, ponieważ plik xls*' nie został ponownie obliczony przed ostatnim zapisem". Imuszę ręcznie wciskać OK aby wartości...
W międzyczasie... ;) Marcin, nie mogę zainstalować makra, wyskakuje mi komunikat, że nie mam zainstalowanej funkcji False, nie kompiluje się 1. Makr się nie instaluje, 2. Nie ma funkcji False 3. Makra się nie kompilują w dosłownym tego słowa znaczeniu :) Chyba będzie prościej jak wrzucę gotowy plik - jak ten CI też nie będzei działał, to ustaw poziom...
U mnie nic nie skacze... Jedyny błąd jaki przeoczyłem to linia 'ActiveCell.Offset(-1, 1).Select' powinno być 'Target.Offset(0, 1).Select' (pod koniec makra) Komunikat pojawia się, bo... posiałeś gdzieś makro "ewidencja_ksiegowa" (Okienko1.Show), a które jest w pierwszym załączniku ;) U mnie po naciśnięciu przycisku [Kasowanie Roczne] pojawia się komunikat...
Ale gdzie mają być te dane? VBA sugeruje Excel (choć niekoniecznie), ale MySql raczej zewnętrzną bazę. To najpierw gdzie będą te dane, a potem co i jak z nimi zrobić. Jeżeli Rekord już jest to tylko komunikat i operator musi sobie poradzić? A może jednak makro/skrypt/program powinno coś z tym zrobić, np zsumować dane?
Nawet jak jest ten sam klient to go zastąpi. Wstawiłem makro do pliku - tu wszystko działa. Może autor nie wykasował wcześniejszego bloku kodu. edit ----------------------- A może jeszcze coś miesza. W pierwszym kodzie kolegi PRL było zabezpieczenie If Not SheetExists(Klient) Then Sheets.Add.Name = Klient Więc też nie powinien pojawić się ten komunikat....
No więc wpisałem coś takiego ale pojawia mi sie komunikat Run time error 424 - Object required :( [syntax=vbscript]Sub Zapis For Each ws In Worksheets If ws.Name <> Arkusz2.Name Then katalog = "C:\Users\KrzyszW1\Desktop\Dystrybucja V5\" & ws.Name ws.ExportAsFixedFormat Type:=xlTypePDF, Filename:=katalog & "\cennik.pdf", Quality:=xlQualityStandard,...
Chciałem utworzyć makro, które będzie: 1 Filtrowało po "Wiązka" (kolumna B) - wiązki mają różne nazwy, dlatego też pytanie - jak zrobić aby filtrowało od pierwszej wiązki do ostatniej (żeby nie było trzeba wpisywać za każdym razem H_M+ROMcA_001_001_A, ponieważ w tym miejscu może być inna nazwa np. H_M+ROMcC_001_001_A) 2. Tworzenie nowego arkusza i nazwanie...
Po zmianach w kodzie makro działa. Których zmianach ... deklaracji zmiennych: Przy 119 tysiącach wierszy i zakresie kolumn A:AI pojawia się komunikat "Run-time error '7': Out of memory" Spróbuj zmienić: [syntax=vba]Dim w As Long, k As Long, id_w As Long[/syntax] na [syntax=vba]Dim w As Double, k As Double, id_w As Double[/syntax] może się "poprawi"...
Witam Zastosowałem poniższy kod w arkuszu excela 2007, który automatycznie wstawia mi datę i godzinę . Jest ok. Jednak czy mógłby ktoś mi pomóc i tak zmodyfikował kod, aby komórki w których jest data i godzina, blokowane były przed edycją, np. hasłem. Kiedy próbowałem włączyć ochronę arkusza to wyskakuje komunikat Błąd !. Z góry dziękuję za pomoc. Private...
https://obrazki.elektroda.pl/1034843600_... Czyli mamy tak: 1) Okienko ze zmiennymi danymi. Są tutaj ograniczniki prędkości: RQ-250, LK-250, LK-200 itp. Po prostu wcześniej będzie się wybierało w projekcie dany element i w tym okienku będzie właściwa nazwa. 2) Mamy guzik kopiuj który po kliknięciu robi całą operację. 3) Kopiujemy po...
Witam. Proszę o pomoc w przerobieniu makra z Excela 2003 na makro pod Excel 2007. Wywala w linii z : Application.FileSearch ponieważ Excel 2007 nie obsługuje tej komendy. [syntax=vb] Sub OperacjeHurtowe() Dim wbkSkoroszyt As Workbook Dim i, wiersz As Long Dim sciezka As String dato = Range("B3") ' nazwa folderu z plikami do pobrania danych sciezka =...
excel makro komunikat zapisaniem makro komunikat komunikat excel
pilot zmiennym kodem kalibracja belki tensometrycznej hasło wygasa
pomiar indukcyjności pomiar indukcyjności
Przepustnica Sprinter 906 OM646 – funkcje, EGR, DPF, objawy usterki Sonel miernik – zabezpieczenie akumulatora, BMS, objawy i bezpieczna regeneracja