Koleżanka pisała o odświeżeniu wszystkich tabel w całym skoroszycie, więc makro będzie wyglądało tak: [syntax=vb]Sub Pivot_Refresh() Dim oSh As Excel.Worksheet Dim pvtTbl As PivotTable For Each oSh In ActiveWorkbook.Worksheets For Each pvtTbl In oSh.PivotTables pvtTbl.RefreshTable Next Next End Sub[/syntax]
Sądząc po nazwie ("Polewyboru") to nie ActiveX tylko formularzowe. Wykorzystaj wartość komórki wpisanej jako "łącze komórki"... P.S. Na końcu procedury włącz odświeżanie ekranu.
Nagraj to makro i przypisz do przycisku. Przycisk wiesz jak zrobić? Wiesz jak przypisać makro do przycisku? Makro powinno wyglądać mniej więcej tak: [syntax=vb]Sub aktualizuj() ' aktualizacja danych z zakresu A1 Range("A1").Select Selection.QueryTable.Refresh BackgroundQuery:=False End Sub [/syntax] .. ewentualnie we właściwościach danych zewnętrznych...
Witam. Zrobiłem nagrałem makro które automatycznie odświeża 3 tabele (co 5 minut). Chciałem dodać możliwość włączenia i wyłączenia na podstawie wartości komórki. Wynik: Sub start() If (Range("AC11") = "TAK") Then Application.OnTime Now + TimeValue("00:05:00&quo... "button3"...
Jak najbardziej popraw to makro, nie będzie cię "przerzucało" i będzie działać nawet jak ukryjesz arkusz 0dane0 (właściwość Visable arkusza ustaw na 0). To co zmieniłem zaznaczyłem. Rozumiem że musisz dodać pełny adres źródła (nie wiem po co wykasowałeś ale twoja wola). Nie potrzebny jest teraz wcześniejszy kod makra dane kod kurs_2 sam załatwia wszystko...
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ć...
Witam! Spróbuj najpierw wykorzystać we właściwościach połączenia ustawienia sterowania odświeżaniem :idea: :D
Poradziłem sobie. Makro odświeża dane w podanym zakresie. Sub pr() Application.Calculation = xlManual DoEvents For Each mycell In Sheets("Feuil1").Range("AP2").Cells mycell.Formula = mycell.Formula Next DoEvents Application.Calculation = xlAutomatic End Sub
Mam problem z jednym makrem excelowym. Potzebuje zbudowac liste, gdzie w kolumnie A będą ręcznie wpisywane nazwy. Na ich podstawie, w zależności co będzie w kolumnie A, w kolumnie B ma pojawić się konkretna wartość, kopiowana z Arkusza 2. Z kopiwaniem już sobie poradziłem, nie mogę dać sobie rady, żeby odświeżanie było w czasie rzeczywistym. tzn. przy...
http://obrazki.elektroda.pl/3025550100_1... Mając do dyspozycji jedną matrycę 8x8 czerwonych diod LED o boku 60,2mm oraz mikrokontroler ATtiny861 pozostałe po innych projektach postanowiłem zbudować to, co każdy elektronik chociaż raz w życiu zbudować musi: zegar ;). Ze względu na charakter wyświetlacza miał to być zegar binarny, ale...
Dzieki za podpowiedź z : Set xlApp = CreateObject("Excel.Application") xlApp.visible = true Faktycznie teraz odpalenie skryptu VBS uruchamia plik a.xlsm, jednak od razu po odpaleniu wykonuje się makro bez odświeżenia kwerendy, zapisuje po prostu plik w nowym miejscu pod nową nazwą ale z starymi danymi. Oczywiście 0 w VBS jest zamienione na 3. Odpalenie...
Cześć wszystkim, Stworzyłem makro do awizacji gości przychodzących do firmy. Mam okienko podglądu w tym pliku z makrem, gdzie mogę podejrzeć jakie wizyty są zaplanowane a jacy goście są w środku(plik1). Stworzyłem drugi plik o nazwie podgląd. Ma on tylko pobierać wartości komórek z pierwszego makra co minutę, by widzieć aktualną sytuację, powiedzmy...
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...
Wystarczy zmiana typu zmiennych na long. (at)wxyz1986 na początku makra wyłącz odświeżanie ekranu oraz automatyczne przeliczanie formuł (jeśli masz) a makro powinno przyspieszyć [syntax=vb]With Application .ScreenUpdating = False .Calculation = xlCalculationManual End With[/syntax] Na końcu kodu oczywiście nie zapomnij ponownie włączyć tych właściwości...
Hej, potrzebuję pomocy w przekształceniu makra, tak aby dzieliło mi wskazane arkusze wg klucza i zapisywało wszystko do nowego skoroszytu. De facto mam: 5 arkuszy o nazwach :dane1, dane2, dane3, dane4, dane 5 oraz 4 arkusze o nazwach: arkusz1, arkusz 2, arkusz3, arkusz 4 Potrzebuję makra które podzieli mi 5 arkuszy [dane1 ... dane2] wg klucza z arkusza...
Witam, A co to jest ThisCust? Moja uwaga: o ile nie jest to zamierzone, na końcu makra nie rób .screenUppdating = false, bo wtedy wyłączasz odświeżanie całego ekranu. Ja zawsze daję screenupdating=false na początku makra, a screenupdating=true na końcu - wtedy makro wykonuje się szybciej "w tle", nie odświeżając ekranu.
Witam, Podaję makro: Sub Logoeps() ' Logoeps Makro ' Option Explicit Dim x As Double Dim y As Double Dim obraz As String Dim kom As Range Dim fd As Object Set fd = Application.FileDialog(msoFileDialogOpen... With fd .InitialFileName = ActiveWorkbook.path & "\" & Range("M68") .AllowMultiSelect = False .Filters.Clear .Filters.Add "Picture Files", "*.png;...
To Makro działa super. Jakby jeszcze udało się zrobić, żeby działało automatyczne odświeżanie to byłoby idealnie :) Pozdrawiam
Temat zamykam.Rozwiązałem problem. Oczywiście kod adamas_nt oraz dołożyłem jeszcze odświeżanie arkusza i wszystko działa tak jak chciałem.
Jeżeli "drażni" cię to, że "widać" efekty pracy makra zanim nastąpi efekt końcowy możesz na czas pracy wyłączyć odświeżanie ekranu. Czyli na początku procedury (tuż pod Sub) pod przyciskiem OK okienka wpisz: Application.ScreenUpdating = False to wyłączy odświeżanie a przed End Sub tej samej procedury nie zapomnij wpisać: Application.ScreenUpdating =...
Jeżeli odświeżanie ekaranu jest wyłączone przed dokonaniem obliczeń i włączone po zakończeniu, to makro powinno wykonywać się szybko.
Oj, to był tylko przykład :) Jeśli już musisz na "selectach", to dopisz gałąź [syntax=vb]For Each ws In Worksheets If ws.Name <> "rowdata" And ws.Name <> "wynik" Then ws.Activate Range("M2:Q2").Select Range(Selection, Selection.End(xlDown)).Select If Selection.Rows.Count < 1001 Then Selection.Copy Sheets("rowdata").Select Range("a10000").End(xlUp).Offset(1,...
dziękuję za podpowiedź ale nie pomogło niestety, gdzieś znalazłem sugestię że with może powodować problem ale to też zły trop sprawdziłem ręcznie nagrywając makro, po kliknięciu w zakładce dane odśwież nagrało się makro i to zadziałało Dodano po 26 oj pośpieszyłem się [syntax=vb]ActiveWorkbook.RefreshAll[/sy... nie do końca rozwiązuje problem wyskakuje...
Witam, mam pytanie a propos załączonego kodu, zrobiłem makro, które zapisuje plik jako xlsb. Wg mnie ten format nie powinien już zawierać makr, a jednak każdorazowo, gdy uruchamiam plik zapisany przez makro - wykonuje ono ponowne połączenie z bazą Oracle i ponownie odświeża dane. Chciałbym , aby plik wynikowy był już plikiem, który zawiera wyłącznie...
>Czy przy FPS 23.976 nie powinno być odświeżania 24 ? Nie - ma być 23. Po prostu tak jest, że karty graficzne są "mądre" i wiedzą, że "23" to znaczy że chodzi o odświeżanie 23, 976 Hz. A z kolei "24" to znaczy dokładnie 24 Hz. Monitory (lub telewizory w funkcji monitora) też "wiedzą" że "23" w ich ustawieniach to tak naprawdę "23,976".
1. Umieść makro w pliku z pivotem. Przy zapisywaniu sprawdź, czy arkusz docelowy jest otwarty, jeśli nie, otwórz. 2. Wypróbuj takie rozwiązanie [syntax=vb]Sub bla() Dim g As String, d As Integer g = godzina If g = Empty Then d = 1 g = "9:30" Else d = 0 End If Application.OnTime Date + d + TimeValue(g), "bla" MsgBox "next: " & Date + d & " o...
Cześć, Mam plik z danymi, który zawiera 2 arkusze. Chce, aby makro: 1. w arkuszu 1 odfiltrowało unikatowe wartości z kolumny 4 i wartości z tablicy z kolumny 5 2. utworzyło nowe skoroszyty dla każdej unikatowej wartości z kolumny 4 i wkleiło tam dane i zapisało plik 3. przeszło do arkusza 2 4. odfiltrowało dane w arkuszu 2 po tych samych filtrach, co...
Przyznam że nie do końca wiem o co ci chodzi. Trochę inaczej pobierałbym dane z pliku baza-a. Bo w ten sposób po otwarciu pliku wykresy (bez otwierania pliku baza-a) są błędy. Ja to zrobiłem za pomocą "importuj dane zewnętrzne" z menu Dane (przy pierwszym tworzeniu kwerendy - potem tylko odświeżanie danych) w arkuszu Dane i do niego odwołałem formuły...
1. Ścieżki plików również jeszcze nie znam - to znaczy na pewno będzie ona zmieniana, dlatego chciałbym zastosować adresowanie bezwzględne - kojarzę z dawnych czasów, że w powerpoincie była taka możliwość, ale też nie jestem do końca pewien, bo być może po prostu plik był integrowany z prezentacją... Najlepiej by to wyszło w ten sposób, że jest folder...
A czy ktoś z Polaków próbował robić oświetlenie diodami LCD? Mnie nie przekonują te projekty, dopóki sam nie spróbuję i opiszę konkretnie co z czym i jak. Zdjęcia nie pokazują dokładnie efektu który można uzyskać bo każde zdjęcie może być idealne lub nie, zależy od chęci pokazania tego, co się chce. Jak wiemy dobrze, Polska to taki zacofany kraj w którym...
Zobacz z wcięciami [syntax=vbscript]Sub wstawianie_IL_z_załącznikami() 'te dane mają być w makrze pobierającym arkusze Dim fd As FileDialog Dim wkb1 As Workbook, wkb2 As Workbook Dim tblArkusze() Application.ScreenUpdating = False tblArkusze() = Array("I L", "II L", "III L", "IV L", "V L", "VI L", "VII L", "VIII L", "IX L") Set wkb1 = ThisWorkbook Set...
Witam wszystkich i przepraszam za odświeżanie tematu Mam taką sprawę, w pracy wykonuję zdjęcia 3D, do każdego zdjęcia potrzebuje obrobić 72 zdjęcia statyczne, nanoszę w photoshopie trochę poprawek ustawiam makro i leci, aby komputer mi je obrobił zajmuje mu to przeszło 30 minut. Jeśli to prosta obróbka, to po prostu zapuść wsadowo ImageMagicka: [url=http://www.imagemagick.org/script/i...
clubs: tak na pewno jest to dobra ścieżka wysypało się na: plik_1 = Workbooks("glowny_plik.xls").Sheets("dan... pisze, ż eplik = empty lanzul: masz rację, może przybliże trochę działanie maka, myślałem, ze nie będzi eto konieczne, ale jednak. Trochę pewnie teraz namieszam, bo pokaże całe główne makro, wiem, że nie jest idealnie napisane...
Wszystko zamieściłem w 1 pliku żeby było pod ręką. Nie wiem dlaczego przy wyświetlaniu cyfr 0 i 7 nie zaświeca mi się SEG_A, przy pozostałych cyfrach nie ma z tym problemu. Co do wyświetlania temperatury to powinno być już chyba dobrze, tylko jutro muszę to sprawdzić na LM35 bo na potencjometrze to co chwila skacze mi napięcie. [syntax=c]/* * main2.c...
Witam. Robię miernik częstotliwości na ATmega8 z wyświetlaniem na LCD HD44780 w trybie 4-bit (mam zrobiony prototyp). Opanowałem już wyświetlanie (z obsługą BF), ale teraz przystawiło mnie z pomiarem liczby impulsów zliczanych na wejściu T1 mikrokontrolera. Wynik co prawda jest wyświetlany, lecz jest on niestabilny w taki sposób, że skaczą 2 ostatnie...
Witam zobacz [syntax=vb]ActiveWorkbook.RefreshAll[/sy...
Pożądany efekt aktualizacji tabeli w arkuszu "3" 961000 można uzyskać poprzez makro aktualizujące (odświeżanie danych skrótem ctrl + a :D ) z zastosowanie pętli typu: 961004
Wyłącz odświeżanie ekranu przed pętlą (Application.Screenupdating=false) a za pętlą włącz ponownie (=true)
Jeszcze raz prosba o pomoc, jezeli cos niejasno napisałem to proszę o info a wyjasnie bardziej szczegółowo.
Witam. Czy jest możliść zignorowania błędu w makro w Excelu, w przypadku jeśli makro odświeża tabele która np. nie istnieje. Wystakuje wtedy okienko z błędem, można to ominąć i przejść do kolejnej komendy? Przykład: Sub refresh() ActiveSheet.PivotTables("Tabela przestawna5").PivotCache.refres... ActiveSheet.PivotTables("Tabela...
:) Wiesz co, szybciej wyjdzie tworzenie tego pliku i makra niż tłumaczenie. Masz. Pooglądaj gdzie i w jakim bloku jest umieszczone wywołanie makra "Wykonaj". Nie podpinałem do przycisku bo jakakolwiek zmiana w tabeli A i B (tak jak chciałeś) odświeża tabelę. Jest to trochę "upierdliwe" ale jak "klient" chce ... :)
Witam. W przypadku kwerendy więcej niż 2 linie, zaproponować, co następuje: 1. Makro, który odświeża dane pierwotnie ociera wszystkich wierszy w kwerendzie. 2. Makro organizujące dane okresowo sprawdza, czy drugi wiersz jest pusty. 3. Gdy kwerenda jest przygotowany, makro będzie kontynuować prace.
Nie bardzo rozumiem na czym polega istota problemu. Czy tylko na automatycznym odświeżeniu tabeli przestawnej? To można zrobić np. makrem przy każdorazowej aktywacji arkusza z tabelą. Przykład w załączniku. Analogicznie można bez tabeli przestawnej założyć tylko filtr i ten filtr odświeżać makrem. Można też formułami, ale to bardziej skomplikowane.
Dobry wieczór, Trudno mi wyciągnąć od Pana, o co naprawdę Panu chodzi, więc jeśli dobrze rozumiem intencje proponuję takie rozwiązanie: utworzyć tymczasową kopię oryginalnego zakresu w wolnym miejscu arkusza (ja użyłem zakresu I6:M12), skopiować tam zakres oryginalny, wyczyścić komórki zawierające zera lub liczby ujemne, wreszcie wyczyszczony zakres...
Skoro próbuje Kolega coś sam pokombinować, to trochę pomogę... ;) Nie wiem na ile dobrze zrozumiałem całą ideę, więc będziesz musiał trochę dostosować kod do swoich potrzeb. Zacznijmy od tego, żeby umieścić kod makra wewnątrz takiego fragmentu kodu (fragment dla makra umieszczonego w zdarzeniu kliknięcia przycisku): [syntax=vb]Private Sub CommandButton1_Click()...
Sprawa jest trochę skomplikowana, bo hiperłącza w Excelu nie lubią sortowania, a sortowanie nie przesuwa odpowiednio hiperłączy. Do tego jeszcze funkcja HIPERŁĄCZE nie obsługuje tablic, tylko pojedyncze komórki. Być może jest to do zrobienia z wykorzystaniem funkcji LAMBDA, nie próbowałem, ale obawiam się, że mogłoby to być dość powolne rozwiązanie....
Spróbuj wyłączyć odświeżanie: Application.ScreenUpdating=False za linią z Windows(rap).Activate. Włącz na końcu =True Jeśli nie zadziała można przerobić kod tak, żeby nie było potrzeby "biegania" po arkuszach (bez activate, select, etc)... Np fragment z sortowaniem (nie odwołuj się do okna instancji, tylko do konkretów). W przykładzie przypisanie i...
Tego typu filtrowanie danych możesz zrobić albo przy użyciu makra :idea: , albo przy użyciu kwerendy :spoko: W obu rozwiązaniach po dopisaniu nowych danych do arkusza Lista, konieczna będzie w zasadzie interakcja usera: uruchomienie makra lub ręczne odświeżanie danych. Makra przygotują Ci prawdopodobnie inni koledzy :D , ja zaś proponuję wykorzystanie...
A nie lepiej zamiast trzech przycisków w każdym arkuszu byłoby zrobić jeden przycisk w arkuszu "lista" uruchamiający mechanizm pobierania danych ze wszystkich pozostałych arkuszy? Druga kwestia, że do takiej operacji to nawet nie trzeba makra, wystarczy MSQuery i następująca kwerenda: [syntax=sql]SELECT * FROM [1$] UNION ALL SELECT * FROM [2$] UNION...
Na początku procedury wyłącz odświeżanie (1), na końcu włącz. Jeśli masz oprogramowane zdarzenia arkusza lub funkcje użytkownika w arkuszu, to wyłącz także zdarzenia (2). [syntax=vb]Application.ScreenUpdating = False '1 Application.EnableEvents = False '2 i = 1 Do ... Loop Application.EnableEvents = True Application.ScreenUpdating = True[/syntax]
Mam proste makro, które otwiera wskazany plik odświeża połączenia power Query, zapisuje i zamyka plik. Czy da się opóźnić zapisanie i zamknięcie pliki do zakończenia odświeżania połączeń power Query?
Ten sposób na "informatyzację" jaki piszesz, to jest domek z kart. Jedno dmuchnięcie (właśnie nastąpiło) i leży. Nikt ci nie powie, jak naprawić makro, jeśli go nie umieścisz.
Wydzielono z Witam serdecznie wszystkich użytkowników forum. Założyłem dziś konto na elektrodzie i mam do Was WIELKĄ prośbę, więc pozwoliłem sobie odkopać ten temat. Zaproponowane w wątku makro działa super, więc bardzo dziękuję twórcy. Chciałbym je jednak wzbogacić o dodatkową funkcjonalność. Chodzi o to by przy okazji odświeżania tabel przestawnych...
... gdyż naciskasz F9 idziesz zrobić kawę, wracasz i gotowe :D ... A mogę zapytać po co naciskasz F9? Masz wyłączone automatyczne odświeżanie? Odwołania cykliczne w formułach? Owszem F9 wymusza przeliczanie ale całego arkusza/skoroszytu a akurat "moje" rozwiązanie tego nie potrzebuje (pod warunkiem że masz włączony standardowo automat w opcjach) W...
Tu mam wrażenie że jest coś z synchronizacją pomiędzy zamykaniem pliku i kończeniem makra, tak jakby zamykanie pliku trwa a on już skończył makro i dlatego się widok nie odświeża a przycisk cały czas jest jakby wduszony - nie odciska się, i wtedy czegoś mu brakuje, szukam sposobu by je jakoś zatrzymać może jakiś pasek postępu
po dojsciu do polecenia "ActiveSheet.Paste" przechodzi automatycznie Spróbuj wcześniej Thisworkbook.Activate (przed sheets(mySto).select) Makro umieściłeś w module? Może właściwiej (dla copy-paste) będzie otwierać pliki w jednej instancji? Jeśli wyłączysz odświeżanie, nie będzie znowu tak bardzo rzucało się w oczy...
Po odkomentowaniu tego fragmentu na moim komputerze odświeżanie dalej działa (Excel 2007, Win7). Czyli problem musi być albo w Twojej konfiguracji Excela, albo w jakiś ustawieniach systemowych. Sprawdź na początku, czy w opcjach programu excel->centrum zaufania->ustawienia centrum zaufania masz ustawione odpowiednio niskie poziomy zabezpieczeń. Dodatkowo,...
Wyłącz odświeżanie ekranu (screenUpdating) na czas działania makra. Z drugiej strony... sheets(1).range("A1:X" & LastRow).copy sheets(2).Range("A1") i w pętli usunąć puste Może szybciej będzie. Jeszcze inna opcja: Odfiltrować puste i skopiować cały zakres ("zwykłe" Copy kopiuje tylko widoczne).
Cześć wszystkim. Nie wiem czy dobrze trafiłem, ale spróbuje. Mam taki zrobić arkusz excela jak na obrazku i nie wiem jakie makro mam przypisać do przycisku, żeby po naciśnięciu go odświeżało dane z kwerendy www w innym arkuszu tego skoroszytu. Może ktoś potrafi takie makro napisać? i pomoże. http://obrazki.elektroda.pl/9125140100_1...
Dzięki, napewno mi sie przyda jak go przeanalizuję do końca. Robiłem kiedyś coś podobnego, ale już nie pamiętam jak. Muszę porównać wady i zalety obu sposobów. Jest tu jedna ważna i dobra rada: warto wyłącznyć odświeżanie ekranu na czas działania makra: Application.ScreenUpdating = False. Oczywiście potem koniecznie to odkręcamy.
Witam Więc rozumiem, że Pan chce mieć 24 arkuszy w skoroszycie. Zależy jeszcze od tej godziny dzień aktualizacji danych. Niedobór powyżej określonego skryptu jest że to stale dodaje kwerendy, ale nie usunąć poprzedni jak i nazw, które są stale wzrosła w skoroszycie. Dodano po 5 Myślę, że lepiej makro tylko zmiana parametru "Connection" i zaktualizować...
Odświeżam tematy, ponieważ nie potrafię sobie poradzić z tym kodem do końca. W temacie poprosiłem o makro, które automatycznie włączy trub projektowania. Kolega (at)PRL dał link, w którym jets makro, które włącza ten tryb. Do tej pory było dla mnie to wystarczające, ale teraz próbuję to rozgryźć i nie potrafię, pewnie w linku jest na to odpowiedź, ale...
Odświeżam temat bo potrzebuję szkła. Przeznaczenie - makro. Wymagane parametry - duża skala odwzorowania, odległość ostrzenia "na motyle" 40 cm lub więcej, mocowanie m42, światło nieistotne 4 lub niżej, ogniskowa mało ważna najlepiej między 50 a 100. Co mam? Redukcję Canon - m42, pierścienie, DSLR FF w planach DSLR lub "bezlusterkowiec" APS + mieszek....
Blokuje odświeżanie ekranu. Kursor nie "lata" po ekranie i wszystkich arkuszach w czasie działania makra. Koniecznie na końcu należy ustawić na: true. Czego ja nie zrobiłem w powyższym przykładzie :) Już poprawiony...
Właśnie chodzi mi o jednorazowe wpisanie wyniku, niech to i trwa 10 minut, ale nie będzie mi się nic odświeżało przy filtrowaniu po numerze zamówienia. Czy dałbyś radę pomóc z takim makrem? Niestety z vba na codzień mi nie po drodze ;/
potrzebuję makro Taką funkcjonalność, że po zmianie któregokolwiek elementu z zakresu danych Twojego wykresu następuje "przeformatowanie" wszystkich etykiet dla poszczególnych kategorii - jak na zrzucie 1017446 można uzyskać poprzez makro typu Worksheet_Change :D 1017550 Ps. dopiero teraz po opublikowaniu dostrzegłem mankamenty mojego kodu (nie odświeża...
Witam, Napisałem proste makro, które to otwiera mi plik z SQL połączeniami. Po otwarciu odświeża mi połączenia i robi odpowiednie kalkulacje itd. Problem jest taki, że makro to robi mi kalkulacje szybciej niż system zapisze mi dane na odpowiedniej zakładce. Więc pytanie jest następujące - czy można (jak można) po odświeżeniu zakładki wstrzymać to makro...
W której linii? P.S. Na końcu należy włączyć odświeżanie, przydałby się filtr dla plików Excela, na czas działania makra wyłączyłbym zdarzenia i alarmy (pliki mogą zawierać makra, itp)...[syntax=vb]Sub Merge() Dim bookList As Workbook Dim MergeObj As Object, dirObj As Object, filesObj As Object, everyObj As Object Set MergeObj = CreateObject("Scripting.FileSystemObject...
Z tego, co piszesz, zupełnie nie widać, co to ma być. Co rozumiesz przez "makro" (czy np. jest określone, jaki interpreter ma je wykonywać)? Co ma zapoczątkować wykonanie takiej serii akcji, czy wykonywanie akcji, bądź pewnych jej elementów ma być warunkowe (zależeć od spełnienia pewnego warunku)? Co rozumiesz przez "odświeżanie" pliku? To może oznaczać...
Witam, mam następujący problem: Mam formularz (dzielony) na nim jest pole lista z którego wybieram wartość. Następnie chce przefiltrować rekordy wg. wcześniej wskazanej wartości. Zrobiłem przycisk z odpowiednią akcją ( przy kliknięciu/makro osadzone/zastosuj filtr ) i działa to tak: -uruchamiam formularz -wybieram wartość z listy -klikam na filtr -rekordy...
Przepraszam, że odświeżam tak stary temat ale mam podobny problem, a zasugerowane w wątku rozwiązanie nie jest skuteczne. Chodzi mi o to, że mam zakres danych, który chciałbym podawać do makra parametrem (makro umieszczone w komórce nad zakresem), a makro miałoby sortować zakres za każdym razem gdy ktoś wprowadzi do niego dane. Makro postaci: Function...
Próbowałem już coś "zdziałać" za pomocą korespondencji seryjnej, ale nie bardzo mi wyszło. Za to udało mi się rozwiązać mój problem za pomocą styli, ale jest to dosyć kłopotliwe i niewygodne (min. trzeba na koniec zaznaczyć cały tekst i odświeżać F9). W takim razie proszę jeszcze o wskazówki odnośnie korespondencji seryjnej (również oferuję punkty).
Musiałbyś zmienić licznik pętli zmiennej wiersza: For k = 1 To ostatnia komórka Range(wiele_kolumn).End przeszukuje tylko skrajną, lewą kolumnę. Wyszukuj od pojedynczej i najlepiej od dołu (jeśli zdarzają się "okienka"). Np ostWrs=Range("B65536")>End(xlup).row Inne sposoby ostW=ActiveSheet.UsedRange.Rows.Count ostW=Columns(2).Find("*", SearchOrder:=xlByRows,...
Rozwiązanie od zadania pierwszego z pierwszej kartki. 1. W 'A1' wpisać: =MROUND(RANDBETWEEN(0;100);5) jeśli pojawi się błąd-załadować dodatek Analysis ToolPak: # Narzędzia >> Dodatki >> Dostępne dodatki >> Analysis ToolPak >> OK 2. Przekopiować formułę do 'A50' 3. Zaznaczyć całość 4. Skopiować 5. Kliknąć na 'B1' Edycja >>...
Zdaje się, że szybciej byłoby zapisywać od razu do komórek, bez pośrednictwa tablicy. Oczywiście wyłączając odświeżanie. Np [syntax=vb]Option Explicit Sub makro() Dim i As Double Dim j As Double Dim n As Integer Dim liczbafaktur As Integer 'Dim tablica() As Variant liczbafaktur = Application.WorksheetFunction.CountA(Ran... - 2 n = 1 'bo zapis...
Witam Wszystkich Serdecznie, Jest to mój pierwszy post na elektroda więc proszę o wyrozumiałość. Opis sytuacji: 1. Pracuje na excelu i tworzę DashBoarda związnego z urlopami. 2. W danym excelu jest wyświetlana lista osób oraz kto ile ma urlopów; 3. Wyświetlany excel zaciąga dane z innego pliku za pomocą Query; 4. Tabela Query wyświetla wszystkie daty...
Pobierasz dane poprzez kwerendę (dane zewnętrzne) czy poprzez odwołanie do konkretnych komórek innego skoroszytu? W drugim przypadku nie powinieneś mieć kłopotu z komórkami chronionymi. W pierwszym przypadku excel nie pozwoli bo metoda z odświeżaniem danych polega na wprowadzeniu nowych danych do komórek a właśnie to jest chronione i następuje sprzeczność....
Cześć, Piszę do Was, bo może ktoś miałby pomysł jak rozwiązać pewne kwestie, nad którą się zatrzymałem robiąc makro. Sprawa wygląda tak, że jest arkusz 'umowy', gdzie są umowy, etapy ich realizacji i inne dane. Na ich podstawie makro obrabia dane i wprowadza je do zakładki 'faktury' i pojawia się pierwszy problem: - chciałem zrobić przycisk, pod które...
Ok, pomoc techniczna The Bata pomogła :) Częstsze odświeżanie katalogów można ustawić tutaj: https://obrazki.elektroda.pl/2091676000_... Miałem też drugi problem, z aliasami. Odpowiedź na maila który przyszedł na alias zawsze używała adresu głównego. I tu też support pomógł :) Udało się zrobić to tak: https://obrazki.elektroda.pl/6335788400_...
INTEGRA 1.18 (wydanie z dnia 2018-06-20) Dodano: zdarzenia nieudanego załączenia czuwania przez wejścia załączające czuwanie (typ reakcji 80 i 82) typ wejścia "97. Monitorowanie awarii centrali p.poż" (CID:200) obsługę INT-GSM zdarzenia nieudanego załączenia czuwania ze sterowania SMS (INT-GSM) zdarzenia ze stanem monitorowania testu stacji 1/2 A/B...
Oh... Zapomniałem odpisać :/ Wiesz co.. podłączyłem moduł i ustawiłem wszystko w terminalu RealTerm i ruszyło od zaraz ... połączyło się fajnie i nie ma żadnych problemów z przesyłaniem danych. Aż byłem zdziwiony że wystarczyło podłączyć i działa na tej samej zasadzie co kabel bez żadnej konfiguracji , tylko że bezprzewodowo :D . Masz rację co do modułu...
Dobry wieczór, W załączniku propozycja makra, która powinno spełniać założenia. Przyjąłem, że pomiędzy tekstem z kolumny A a liczbą z kolumny B może być 1 dowolny znak. Proszę sobie dopasować do swoich danych. W Arkuszu2 wzorce do zamiany zaczynają się w komórce A1 i dalej powinny wypełniać kolejne wiersze. Pusta komórka w kolumnie A kończy działanie...
Dzień dobry, mam raport płatności z SAP gdzie w kolumnach mam daty, w wierszach natomiast odbiorców i warunki płatności (dla 90 dni). Odświeżam Tabelę Przestawną "na piechotę", pomyślałam, że można przerobić to na bazę danych zamieniając to tak, aby data była w kolumnie, a odbiorcy w wierszach. Bardzo proszę o pomoc :) dopiero zaczynam przygodę z VBA...
Czy do takiego checkBox'a potrzebujemy jakąś komendę do odświeżania danych po jej użyciu? Nie odświeżają mi się wartości z sumy częściowej po odkryciu i zakryciu wierszy? Przycisk działa tylko na pierwszą kolumnę (która sumuje częściowo), w pozostałych kolumnach sumowanie nie działa ?? Dodam, że funkcja agreguj działa tak samo jak suma częściowa, czyli...
Arkusz nie ma być czyszczony, używany będzie przez cały miesiąc - będę tylko odświeżała dane. Moja wiedza jest bardzo uboga, wiem że należy zrobić pętlę które przejdzie przez wszystkie pliki xlsx. w folderze "PRODUKCJA" i zwróci nazwy zakładek, a do tego dane z tych zakładek.
Wydawało mi się że problemem jest jedynie kwestia złego konfigurowania układu. A jeśli chodzi o kod programu to uproszczę sprawę. Zrobiłem teraz następujący test: Na Atmedze i STM program wykonuje jedynie pętle while: [syntax=c]while(1) { LED_PORT |= LED; delay(100); LED_PORT &= ~LED; delay(100); }[/syntax] gdzie delay() zdefiniowano: [syntax=c]void...
Witam! odświeżam temat bo aktualnie też szukam aparatu do 300zł. Wiem że może czegoś super nie mam się co spodziewać, ale chciałabym aby zdjęcia wychodziły fajne, szczególnie w pomieszczeniach. Kolory aby były żywe. I dużym plusem by było gdyby nagrywał filmy w HD.
Za pomocą narzędzia Pobieranie i przekształcanie zaciągam do jednego skoroszytu Excel dane z wielu mniejszych skoroszytów. Tych małych skoroszytów przybywa codziennie kilkadziesiąt, a jeden zbiorczy ma służyć jako archiwum danych. Wszystko działa, zaciąga się poprawnie, natomiast mam obawy, że im więcej plików źródłowych, tym dłużej pobieranie danych...
Jestem laikiem jeżeli chodzi o VBA. Potrzebuję makro, które będzie sumowało komórki z danego zakresu względem kolorów jakie są w komórkach gdzie są wartości. Kod mam, ale po zmianie koloru komórki z zakresu automatycznie nie przelicza się, trzeba "odświeżyć". Jakieś pomysły jak to zrobić, żeby latało z automatu? Sub Makro1() Function SumujKolorowe(Zakres...
Jeszcze prościej , to buforować w RAM char-codes i ewentualnie definicje znaków, a jakaś tam procedurka, spoglądając na zegarek, cyklicznie odświeża LCD. A co kilkanaście sekund oraz po odpowiednim timeoucie flagi busy można jeszcze dorzucić reinicjalizację, co skutkuje odpornością na odłączenie wyświetlacza w czasie gdy µC jest w pracy lub inne...
Dzięki za zainteresowanie. Wiem że basic w OO jest inny. Wiem też że adresowanie i inne "indeksacje" zaczynają się od 0 Ale dziwi mnie to, że właśnie program działa - ale tylko po takich jak napisałem "czarach". Koledzy spróbujcie zrobić tak jak napisałem w pierwszym poście, czyli Po wyłączeniu projektowania, wciśnięciu pierwszego przycisku i po pojawieniu...
Super, wielkie dzięki. Brakuje mi tylko wisienki na torcie tzn: skoro już pobiera adres obrazu z komórki to po co wyświetla mi okno do wyboru pliku. Idealnie by było gdybym tylko włączył makro a ono wstawiło obrazek bez pytania skoro ścieżkę pliku ma podaną w komórce. Teraz wygląda to tak: " Sub Nieobudowany() ' ' Nieobudowany Makro ' Option Explicit...
Godzinę podałem przykładową gdyż dane będą zbierane tylko i wyłącznie do godziny około 22 zwykle wychodzi maksymalnie 21:45. I zostałem poproszony do stworzenia takiego projektu który właśnie miałbym się opierać na excelu gdzie z excela jestem czarna masa. Pozostaje mi jeszcze jeden problem a w zasadzie dwa: 1. Stworzenie makra które chwile po automatycznym...
Wypróbuj poniższy kod (zakładam, że obszar rRng jest taki sam jak w moim poprzednim makrze). Wklejam zawartość obszaru jako wartości z zachowaniem formatowania liczb, zamieniam 0 na puste komórki, a później już można wykonywać kod z poprzedniego mojego posta. [syntax=vb]rRng.Copy rRng.PasteSpecial (xlPasteValuesAndNumberFormats) Application.CutCopyMode...
D900i bije na łeb K800i Sry że odświeżam ale to aż razi w oczy. Miałem te dwa telefony w rękach i co do jakości zdjęć nawet nie ma co porównywać d900i do k800i... SE ma o wiele lepszą optykę, różne tryby i scenerie robienia zdjęć które jeszcze bardziej poprawiają jakość. W d900i nawet nie ma trybu makro... No i lampa błyskowa w k800i to ksenon i bardzo...
Nie czyścisz całego fragmentu (ceny), powinno być: [syntax=vb]wscel.Range("A2:E" & ost_wiersz_celu).ClearContents[/syntax] poza tym polecam wyłączyć odświeżanie ekranu. Jakaś obsługa błędów też by była na miejscu :), czyli: [syntax=vb]Private Sub CommandButton1_Click() Application.ScreenUpdating = False On Error GoTo myErr '.... kod .... Application.ScreenUpdating...
Potrzebuję linijkę kodu Masz już coś "napisane"? Mam makro które w momencie otwarcia pliku B w pliku A tworzyło odwołania za pomocą formuły = &scieżka&nazwapliku do konkretnych komórek. Dzięki temu w Pliku A miałem aktualne dane. Ale pojawia sie problem natury takiej że gdy plik będzie edytowany przez kilka osób naraz to wtedy nie jest w stanie sam...
Napisałem takie coś: [syntax=vbscript]Sub zmniejszdo1strony() obszarSZERpt = MillimetersToPoints(130) obszarWYSOpt = MillimetersToPoints(130) With Selection.PageSetup .RightMargin = .PageWidth - .LeftMargin - obszarSZERpt .BottomMargin = .PageHeight - .TopMargin - obszarWYSOpt End With Selection.WholeStory While (ActiveDocument.BuiltInDocumentPropertie...
Chciałbym poprosić o pomoc w związku z makrem które, muszę zbudować. Mianowicie chodzi mi o to że mam tysiąc komórek które wyglądają mniej więcej tak: dzbanek_02-01-2008_K20 W VBA możesz użyć czegoś takiego: Do moderacji: Wiem, że odświeżam temat, ale może ta krótka instrukcja się komuś przyda, bo autor pewnie już sobie poradził. Usuwajcie jeśli uznacie...
cześć, mam do Was pytanie odnośnie stworzenia przycisku z pewną funkcją. Mam plik bez makr który jak się otworzy to zaciąga dane z innych arkuszy. Jednak, gdy plik ten jest otwarty a ktoś na dysku sieciowym podmieni plik źródłowy to aby zobaczyć jego aktualizację to trzeba ponownie główny plik zamykać i otwierać. W związku z tym powstaje moje pytanie...
makro odświeżanie pliku makro plików odświeżanie makro excel odświeżanie
schemat instalacji elektrycznej simson apache htaccess drukarka laserowa kolorowa
electrolux ultraone sterownik zamykania rolet
Wiarygodność danych technicznych Tonsil Altus 380S Wymiary otworów montażowych Altus 200