Witam, czy pomoże ktoś przerobić to makro Visual Basic na Apps Script w Arkuszach Google, to jest automatyczny zapis daty. Np. po wpisaniu tekstu w komórce A1 automatycznie przypisze się na stałe data w komórce B1 i godz. w C1: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Cells.Count > 1 Then Exit Sub If Not Intersect(Target, Range("A1:B1000"))...
Sprawdź, dostosuj. Zrezygnowałem z tablicy na rzecz prostego przypisania.
Kolega adams zapomniał o 1 - powinno być For i = 1 to 10
Najlepiej jest rejestrowanie makra w celu otwarcia pliku tekstowego programom Excel
Witam. Mam wielką prośbę. Dostałem w pracy zadanie utworzenia wizualizacji do procesu walcowania taśmy wraz z raportowaniem przebiegu.. Wizualizację (napisaną w In-Touch z wykorzystaniem SPC) połączyłem za pomocą DDE z arkuszem excel'a w którym ma być tworzony raport z walcowania taśmy. I tu zaczyna się mój problem. Samą wizualizację napisałem bez problemu...
Dzien dobry. Zalaczam plik Excel. Na gorze mamy automatyczny przycisk NEW LINE, i chodzi o to, ze wciskajac ten przycisk tworzyl sie nowy wiersz z zawartoscia formul. Czyli majac, np. 100 osob i klikajac kolejno na NEW LINE aby otwieral sie wiersz kolejny po juz istniejacym. Na dzien dzisiejszy mam tak ze otwiera sie zawsze wiersz "2", tak jak zreszta...
Szczerze mówiąc makro które zostało wklejone zrobił automatyczny generator makr, dlatego może być tutaj dużo "śmieci". Jak najbardziej zamiast całej komórki może być kopiowana sama wartość. Formuły w arkuszu generatora cen są tak skonstruowane że jedyną zmienną jest wartość w komórce B3 na podstawie której mogę wyciągnąć ceny czyli B26. Załączone makro...
W załączniku rozwiązanie. Nie wiem, czy to wszystko. zeby sie pojawialo zestawienie na najblizsze 3 miesiace Jesteś w stanie przygotować wzór tego zestawienia?
Rozumiem, że chcesz to zrobić całkowicie bezkosztowo, jeżeli te kilka stówek to za dużo. Ok, to jeszcze pytanie gdzie jest ten formularz do drukowania: Excel (najłatwiej), aplikacja webowa (trochę trudniej) czy instalowana (da się, ale trzeba powalczyć)? Jeżeli nie jest w Excelu, to czy da się go włożyć do Excela i zadziała? Ja bym spróbował zautomatyzować...
Zerknij do załącznika. Plik zawiera makro.
Witaj Trochę wątpliwości. Dlaczego jest to tak ważne, aby bez makr?
Chciałabym, aby odpowiednie komórki automatycznie uzupełnić odpowiednimi odniesieniami do sąsiedniego arkusza. VBA fajna rzecz - warto się poduczyć :D , lecz póki co dla Twoich celów wystarczy wykorzystać prostą funkcję :spoko: 897374 3 formuły jak na zrzucie możesz kopiować do następnych kart.
[syntax=vb] Sub InsSubtot() Dim bs As Range Dim r&, rp& For Each sh In ThisWorkbook.Sheets Set bs = sh.Cells ow = bs(Rows.Count, 8).End(xlUp).Row r = 2: rp = 2 While bs(r, 8) <> Empty r = r + 1 If bs(r, 8) <> bs(r - 1, 8) Then bs.Rows(r).Insert bs(r, 5) = "SUMA" bs(r, 6) = Application.Sum(Range(bs(rp, 6), bs(r - 1, 6))) bs(r, 5).Resize(1,...
W VB używamy przecinka. Np Range("A1:A1200,B5:B10&...
przy każdym zamknięciu w kodzie skoroszytu(zeszytu)[syntax=vb] Private Sub Workbook_BeforeClose(Cancel As Boolean) ThisWorkbook.SaveCopyAs "Z:\kopia " & Date & " " & Time 'tu lokalizacja, nazwa End Sub[/syntax]
Chyba chodzi tylko o podstawienie zakresu (pierwsza część makra), wtedy [syntax=vbscript]c = ActiveCell.Column r = ActiveCell.Row If c > 5 Then Range(Cells(r, c - 5), Cells(r, c - 1)).Select[/syntax]
Myslim, tylko makrem. Zalacz plik.
No fajnie, ale jakie jest pytanie?? ;) Chyba nie spodziewasz się, że ktoś Ci wrzuci gotowe rozwiązanie, to nie jest makro kolorujące wiersze naprzemiennie. A jeżeli to zlecenie za pieniądze, wypadało by to zaznaczyć. Przy takiej ilości rekordów, jeśli chcesz przechowywać i analizować dane przynajmniej za okres jednego miesiąca (a znając życie wkrótce...
dla przycisku tak daj takie samo makro tylko zamień True na False
W zasadzie ładnie algorytm już opisałeś, pozostaje tylko poszukać odpowiednich funkcji. Wg mnie, jeżeli nazwy w kolumnie A nie będą się powtarzały, to o wiele prostsza w użyciu będzie funkcja .match , np. [syntax=vb] Szukana_nazwa = Worksheets("Arkusz1").Cells(ActiveCell.R... 1).Value 'Wiersz aktywnej komórki, kolumna A czyli 1 Nr_wiersza = Application.WorksheetFunction.Match(Szuk...
Przetestuj makro z załącznika.
Sprawdź poniższe dwa warianty ... tak coś niby działa, ale sceptycznie podchodzę do takiego drukowania. W mojej ocenie, na teraz, drukarka będzie się przytykać - wstawiłem "opozniacz" (Const opozniacz), przy pomocy którego możesz sterować opóźnieniem nowego wydruku, gdzie: 0.5 = 0.5 s 1 =1 s itd. (opóźniacz pomysłu kolegi JRV ). Wariant nr 1 - drukuje...
Napisałem parę linijek kodu do drukowania etykiet. Zmieniłem nieco wygląd strony ZAMÓWIENIA, usunąłem niektóre kolumny i wiersze oraz wprowadziłem kolumnę do wpisania ilości kpl w paczce. Analogicznie można dopisać kod na 10x etykiety oraz dopisać do etykiet inne dane np. datę, wagę itp.
W nowszych wersjach jest zapewne "Ten skoroszyt". W załączniku jest już wklejone. Jeśli tylko 1-szy arkusz i tylko jeden warunek, to może filtrem go (w załączniku)? Jak już pisałem, przypisać dane z (jak wynika z opisu, ostatniego) wiersza, to żaden problem. Za to wzorów druków PZ jest w Internecie mnóstwo. A znając życie i tak będziesz musiał zrobić/dostosować...
Makro przygotowane w Excelu 2003 (ale powinno działać): Sub Makro1() For a = 3 To 8 'te arkusze bierze pod uwagę Sheets(a).Select If Range("J1") > 0 Then ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True End If Next End Sub
Witam Czy jest możliwość stworzenia makra, które powodowałoby, że przeliczanie automatyczne formuł następowałoby tylko w arkuszu roboczym, a w pozostałych arkuszach tego skoroszytu formuły byłyby przeliczane manualnie? Będę wdzięczny za wszelkie info
Ręce opadają :) To co Ty właściwie chcesz zrobić? ale jeśli dane są pobierane z internetu Dane z internetu wprowadzaj od razu do "z góry upatrzonego" zakresu. lub np z innej komórki Oprogramuj tą "inną komórkę"... Co to znaczy "z automatu"? Żeby coś się zmieniło w arkuszu, najpierw musi się coś wydarzyć.
Trzeba utworzyć klasę, w której publicznie zadeklarować obiekt ze zdarzeniami (np. Public WithEvents myXL As Application) Dodano po 34 http://www.swiatexcela.pl/2011/09/11/zda... http://training-course-material.com/trai... Szukaj - Zdarzenia na poziomie Aplikacji
Jeśli tylko ukryć wartości, to najprościej "zabielić" czcionkę za pomocą formatowania warunkowego. Jeśli wynik formuły, to warunek podobny do numerowania wyżej. Jeśli zablokować przed edycją, to jedynie makro w procedurze zdarzeniowej.
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"...
Witam, Potrzebuje Makro które będzie automatycznie drukować mi wybrane strony wybranego arkusza po czym będzie zaznaczać następną komórkę w wybranej kolumnie i będzie drukować te same strony aż następna z kolei komórka w kolumnie będzie pusta. Da się to zrobić poprzez makro?
Witam Może ktoś pomoże. W 2 excelach mam arkusz o tej samej nazwie PAGE W jednym z nich (nazwijmy-Analityczny), mam prócz PAGE dodatkowy arkusz z wygenerowaną tabelę przestawną, która wykonuje potrzebną, analityczną filtrację danych z PAGE. Chcę zrobić macro, które spowoduje następującą reakcję. Otwarty jest Excel Analityczny oraz druga kopia z Nowym...
Mam pytanie czy można utworzyć makro które będzie podmieniać się na makro o drugim działaniu np. drukuj., a następnie powracało do pierwszego działania makra. Pierwsze makro kopiuje dane a następie zamyka skoroszyt skopiowany, aby wykonać drugie działanie znów muszę kliknąć w obrazek z makrem. Mam na myśli działanie cos w rodzaju pętli z możliwością...
Dzień dobry Potrafię nagrać makro , ale chciałabym do całości już przerabianego pliku dodać taki oto usprawniacz. https://obrazki.elektroda.pl/3605950000_... Czy mógłby ktoś wyjaśnić jak to zrobić ??
witam Poszukuje jakiegos rozwiazania. Mianowicie potrzebuje jakies makro które by uzupełniało formuły. Tzn mam arkusz w którym mam duzo kolumn, gdzie w każdej kolumnie jest formuła. I problem w tym że cześto musze zmieniac kolejnosc rekordów co powoduje "rozsypanie" sie formuł. w zwiazku z tym z kazdej kolumnie musze przeciagnać formuly od nowa. Moje...
Witam, ponieważ od jakiegoś czasu męczę się ze zbieraniem i kopiowaniem danych z dużej ilości plików w excelu, szukam pomocy aby to zautomatyzować. Kombinowałem z formułami, ale domyślam się, że dużo łatwiej będzie zrobić makro-wiem że taki problem już się przewijał , niestety jestem zupełnie zielony w tym temacie i nie potrafię tego przerobić na swoję...
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ę...
Witam. Potrzebuję makra które pomoże mi w odświeżaniu plików. Mam następujące pliki: SUMA Tabela 1, Tabela 2, Tabela 3, i tak do Tabela 100 Zmienne 1, Zmienne 2, Zmienne 3, i tak do Zmienne 100 Potrzebuję makra które otworzy na stałe plik SUMA (w nim są dane wyjściowe i zbiera wyniki po obliczeniu w plikach Tabele i Zmienne) i następnie zestawy plików:...
Witam, mam problem. Na jednej ze stron znalazłem makro które działa w jednym arkuszu. Chciałbym je zastosować do kilku jednakowych arkuszy, nie mam doświadczenia z makrami i dlatego proszę o poradę jak to zrobić. Z góry dziękuje. Option Explicit Dim Zakres As Range Private Sub Workbook_Open() Call Ustal_zakres End Sub Private Sub Workbook_SheetChange(ByVal...
Mam trzy arkusze, w których rozliczam stany magazynwe. Pierwszy to dokument, gdzie w zależności od wyboru dokumentu PZ, bądź WZ zapisuję stany magazynowe do arkusza rejestr (wydania, bądź przyjęcia). Na podstawie drugiego tworzę rejestr wydań, i wszelakiego rodzaju bilanse. Chciałbym aby z arkusza dokument kopiowały mi się dane do arkusza rejestr (aby...
Witam, od razu mowie ze kompletnie nie znam sie na Makro, niestety musze cos zrobic, mam 2 problemy: 1) Skopiowac dane z kolum od E do AD od wiersza 18 do 113, wkleic do nowego 'Arkusza', otworzyc nowy plik dla nastepnego dnia i wykonac ta samom czynnosc wklejajac ponizej i tak w kolko (czyli 30 ewentualnie 31 razy to samo) 2) Potrzebne mi sa 5 wykresow...
Witam, Nie mogłem znaleźć nigdzie satysfakcjonującej odpowiedzi na dręczący mnie problem makra. Mianowicie, prowadzę magazyn za pomocą excel. Wprowadzamy dane skanerem, ale przy wydawaniu, wyszukujemy konkretny numer etykiety poprzez Ctrl + F a następnie zaznaczamy kolorem żeby potem zastosować filtrowanie przez kolor komórki. Teraz chciałbym zrobić...
Dzień dobry. Za pomocą Logo AcessToll pobieram wartość licznika do Excela. Udało mi się stworzyć arkusz, który generuje trend z ostatnich 100 próbek pobieranych co 60sec, czyli mam informację z ostatnich 100 minut. Aby mieć dane z całego dnia, potrzebuje makra lub formuły, która będzie przepisywała wartość komórki A3 w arkuszu do kolejnych wierszy w...
Potrzebuję napisać makro w Excelu, które: przy wyłączaniu Excela zapisze wszystkie otwarte dokumenty w jakichś plikach po włączaniu otworzy je.... Pomocy, potrzebuje to na wczoraj :)
W zakresie wierszy od 3 - 10 we wszystkich komórkach mam różne wyniki, które aktualizują się z zewnętrznej bazy automatycznie i są zmienne. Potrzebuje z tych odczytów zrobić historię w postaci listy i chciałbym aby co 5 min. wykonywany był zrzut tego zakresu wierszy w formie listy w 2 arkuszu w tym samym pliku Proszę o wsparcie
Cześć Od kilku dni rozkminiam makro, które pomoże mi zautomatyzować pracę. Co tydzień pobieram dane z różnych arkuszy kopiując do jednego arkusza. Żmudne i nudzące zajęcie. Nie jestem programistą, ale z pewnością da się to jakoś ogarnąć makrem. Dla zobrazowania pokazuję fragment pliku. To czego potrzebuję to: - w jednym arkuszu (w przykładzie jest to...
To Powershell + Inspekcja na folderze gdzie będą wrzucane. W momencie, kiedy coś się pojawi, to Powershellem dostawać się do pliku i sprawdzać co zostało uzupełnione i aktualizować główny plik z wynikami.
Spróbuj [syntax=vb] Sub mySplit() Dim bs As Range, mar() As String Dim r&, i&, n&, x$, xx$ Dim p&, pd&, ps&, pw&, lmi&, pn&, px&, pf&, pe&, sl& Const dig = "0123456789" Set bs = Sheets("dane").Range("b:g") r = 2 While bs(r, 1) <> vbNullString x = bs(r, 1): n = 0 If bs(r, 1).MergeCells Then n...
Da się... Właściwość "Formula" zwraca zawartość komórki w postaci String. Możesz z nim robić, co Ci się podoba (Left, Rigt, Mid, InStr). Dla zobrazowania: wpisz dowolne liczby w A1 i A2, dowolną formułę operującą na tych komórkach w B1, następnie uruchom[syntax=vb]Range("C1").Formula = Range("B1").Formula Range("D1").Formula = "=B1+C1"[/syntax]
Po prostu czy da się zrobić to tak że zapisze plik a po ponownym odpaleniu wszystko działa dalej tak jak przez zamknięciem? Plik zapisujesz z obsługą makr (*.xlsm)? Makra można kopiować pomiędzy plikami. Zobacz [url=http://www.cpearson.com/excel/vbe.a... Rozdział "Copy A Module From One Project To Another". Chyba, że chodzi o coś innego...
Jeśli w zakresie są formuły, to zmienia postać rzeczy. Spróbuj wykorzystać inne zdarzenie. [syntax=vb]Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim kom As Range For Each kom In Range("C13:G13") If kom.Value < 0 Then MsgBox "Błąd w " & kom.Address(False, False) Next End Sub[/syntax]Warto może ograniczyć Target.Range, bo zmiana...
początku dla $A$1 B2 z obrazka ELEKTRODA.jpg wynika, ze dla $A$1 C2 Poniewaz nie ma zalacznika, patrz przyklad(karta i baza w jednom skoroszycie) Wiersz dla druku - wartosc w C1(za ramami PrintArea) B1:B19 - funkcja tablicowa Ctrl+Shift+Enter
Witam. Owszem jest to do zrobienia...mało z tego całkiem prosto :D... Zacząć nalezy od makra, które tworzy nowy arkusz...nastepnie wklejane są dane i numer...nastepnie wydruk arkusza o numerze [ilosc arkuszy]...nastepnie zamkniecie arkusza o tym samym numerze... a wszystko w pętli aż do natrafienia na pusty wiersz - bez danych
Naprawdę nie chcesz pójść w tym kierunku? Zobacz w pliku - Arkusz1 komórka A2 - wybierasz użytkownika i resztę danych przenosi ci się samo. Szybko, prosto i bez makr.
Excel nie jest, i nikt w MS nie obiecywał, nie jest narzędziem do developmentu oprogramowania, np sieciowego
Jest. Mało tego, masz wybór: formuła w docelowej komórce, lub makro.
Witaj, Nie mam pomysłu na formułę, mam natomiast pomysł na proste makro, które mniej więcej robi to, co chcesz. Nie jestem najlepszym programistą VBA, ale w sumie na pierwszy rzut oka działa. [syntax=VB]Sub Makro1() ' ' Makro1 Makro ' Makro zarejestrowane 2011-04-16, autor Darek ' ' Kolumna A od wiersza 2 w dół zawiera działania ' W kolumnie B będą...
Coś muszę włączyć lub wyłączyć? Pogrzeb w opcjach bezpieczeństwa, centrum zaufania (zależy od wersji Excela). Włącz makra, zaptaszkuj: "ufaj dostępowi do modelu obiektowego VBA", lub tp.
Chciałbym żeby automatycznie kolorowały się komórki jak w załączonym pliku. Mianowicie jeżeli w wierszu występuje wyraz 'sob' lub 'ndz' automatycznie pokolorował całą kolumnę. Dorobiłem Ci makro. Znajdziesz go przez Alt + F11. Makro możesz edytować, jednak jego nazwa musi pozostać niezmienna.
To zależy ile docelowo przewidujesz wierszy w tabelce. Jeśli nieokreśloną, to tylko VBA...
bardziej wskazane byłoby tu makro.
Proponuje też zrobić zestawienie zbiorcze - tak jak na zrzucie 919992 a do automatycznego aktualizowania "indeksów" wykorzystać proste makro :spoko: w załączeniu zmodyfikowany plik z tym makrem :D 919993
Witam Dziękuję bardzo za pomoc, makro działa bardzo dobrze
Pytanie chyba niezbyt przemyślane, a propozycja rozwiązania prosta, ale dość ryzykowna. A co będzie jak użytkownik kliknie dwa lub trzy razy? Nie ma żadnego śladu, co było pierwotnie w komórce, ani możliwości cofnięcia operacji. Poza tym, czy w arkuszu będzie tylko jedna taka cena? Jeśli wiecej, to przy każdej będzie przycisk? Moim zdaniem lepszym rozwiązaniem...
To pobieranie danych za pomocą formuł a wydruk za pomocą makra.
Włącz 'zarejestruj makro', wykonaj to, co codziennie powtarzasz, zmodyfikuj makro pod Twoje potrzeby.
Zwracam się z prośbą o stworzenie makra, bądź doradzenie innego rozwiązanie Jeśli chciałbyś wykorzystać do zestawienia danych tabelę przestawną :idea: np. tak jak na zrzucie 1075895 to możesz wykorzystać makro VBA do automatycznego (uruchamianie klawiszami ctrl+o) tworzenia aktualnej tabeli przestawnej :spoko: 1075898
Jeśli masz Excela 2010 lub nowszego to można to zrobić w Power Query bez makro
excel makro automatyczny makro excel automatyczny odświeżać automatyczny makro
sprzedam metalową obudowę nokia 6303i pralka wyrzucać bezpiecznik
Telewizor Sharp 40FH7EA gaśnie po logo - co robić? Wybór oczyszczacza powietrza: Philips, Xiaomi, Sharp
