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?
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...
Sprawdź, dostosuj. Zrezygnowałem z tablicy na rzecz prostego przypisania.
Można do tego wykorzystać makro zdarzeniowe, na przykład takie: [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) Dim cel As Range Application.EnableEvents = False For Each cel In Target If Len(cel) > 0 Then If Left(cel, 1) <> "'" Then cel.Value = "'" & cel.Value End If Next cel Application.EnableEvents = True End Sub...
HiFi-Man , powinieneś odróżniać makra (makroinstrukcje) od funkcji, bo Twoje pytanie jest przez to niezrozumiałe. Makro to działanie wykonywane jednorazowo, doraźnie. Po wykonaniu wynik ma najczęściej formę stałej (liczby lub tekstu). Makro można powiązać ze skrótem klawiaturowym i uruchamiać go za pomocą tego skrótu. Z kolei funkcja (lub w tym przypadku...
Zamalować wszystkie owale czarnym recznie. Dodano po 1 następnie makro wszystko zrobi
dla przycisku tak daj takie samo makro tylko zamień True na False
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.
Excel nie jest, i nikt w MS nie obiecywał, nie jest narzędziem do developmentu oprogramowania, np sieciowego
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ą...
Był błąd - chyba go poprawiłem. Zmieniłem trochę całość - eksportowałem jako moduł bas - dołącz do swojego projektu i użyj. Również zamieszczam arkusz testowy z importowanym modułem. Użycie jest proste - zaznaczasz zakres komórek, na którym chcesz przeprowadzić zmiany i w menu Narzędzia -> Makro -> Makra uruchamiasz jedyne makro, jakie jest - zrób_gwiazdki....
Tak, dokładnie o coś takiego chodziło. Tylko Skąd i Dokąd bym na dwie kolumny rozbił (zakładając że chcesz je mieć potem w raporcie). Nazwy mają się powtarzać. Teraz możesz np. zrobić tabelę przestawną jak w załączniku: http://obrazki.elektroda.pl/2261331300_1... popróbować z różnymi funkcjami czy nawet próbować jakieś makro napisać,...
A może być w dodatkowym arkuszu cała "baza" nazwisk i przypisanych im specjalności - i tam byś wpisywał nowych a w przedstawionym arkuszu wybierał byś tylko nazwisko. Czy jednak to ma działać ściśle tak jak napisałeś czyli jeżeli wcześniej wystąpiło nazwisko to ma się pojawić obok specjalność jak nie to czyste pole oczekujące na wpis. - jeżeli tylko...
Dzięki koledze adamas_nt i jego sugestii co do "automatycznego" pobrania numeru kolumny (i wiersza w domyśle) poprawiłem nieznacznie moje makro. Wystarczy teraz wkleić w arkusz "dane" gdziekolwiek twoją tabelę z danymi (jak by ona nie wyglądała). Nacisnąć wstaw kody i kody wewnętrzne zostaną wstawione bez względu na to gdzie znajduje się tabela z danymi...
Takie makro w gruncie rzeczy jest banalnie proste: [syntax=vb]Columns("F:F").ClearContents ost_w = Cells(Rows.Count, 1).End(xlUp).Row poz = 2 For i = 2 To ost_w For j = Cells(i, 2).Value To Cells(i, 3).Value Cells(poz, 6).Value = Cells(i, 1).Value & j poz = poz + 1 Next j Next i[/syntax]
A jaki windows? Bo to nie jest normalne - normalnie zostaje w tle. Jeśli okno z excelem znajduje się nad oknem programu fakturującego to normalnym jest to, że po przejściu do okna z programem fakturującym Excel schowa się pod spodem. Wydaje mi się, że autor po prostu pomylił minimalizowanie z zasadą "zawsze na wierzchu". (at)wojtas_73 - spróbuj do...
... 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...
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
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, 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, Dla usprawnienia pracy, chciałem stworzyć plik wydruku. Aktualnie po wykonaniu badań, wypisuje ręcznie WZ, a następnie w wolnej chwili przenoszę te dane do arkusza Excel. Arkusz jest podzielony na dno tygodnia i odpowiednio kolumny które posiadają dane z WZ. Posiadam wzór WZ w Wordzie i Excelu z pustymi miejscami na wypełnienie danymi. Usprawniając...
Witam, na chciałbym sobie ułatwić pracę w biurze, ale za bardzo nie znam się na makrach. Chciałbym zrobić takie makro: po otwarciu pliku excela, automatycznie wyświetla się okienko w którym wpisuje parę wartości (które kolejno wpisują się bo komórek B1,B2....B10- następnie klikam drukuj i plik się drukuje z całymi obliczeniami.
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...
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ć ??
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...
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ą...
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 :)
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...
Cześć Potrzebuje waszej pomocy. Obecne proste makro które mam: [syntax=vb] Sub Info() Sciezka = "Y:\BAZA INFO" Nazwa = Format(Now(), "yy.mm.dd.hh.mm") & ".xls" ActiveWorkbook.SaveAs Filename:=Sciezka & "\" & Nazwa ActiveWindow.Close End Sub [/syntax] zapisuje wypełniony plik w folderze BAZA INFO a dalej już musze sam przerzucać pliki do podfolderów...
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. 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, Chciałbym zautomatyzować sprawdzanie poprawności danych w excelu, oto przykład: W kolumnach znajdują się zdefiniowane przedziały grubości, szerokości, długości, symbol rodziny danych, itp. określony wiersz zbudowany z w/w parametrów daje ostatecznie prosty symbol "dane OK". Chciałbym żeby makro sprawdziło czy zdefiniowane w pierwszej tabeli "zakresy"...
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ć...
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
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ę...
Spróbuj np. tak - najpierw zaznaczasz dane w wybranej (pojedynczej) kolumnie, potem wykonujesz makro. [syntax=vb]Application.ScreenUpdating = False For w = Selection.Row To Selection.Row + Selection.Count - 1 Step 2 Cells(w + 1, Selection.Column).Value = Cells(w, Selection.Column).Value Next w Application.ScreenUpdating = True[/syntax] PS. Takie rzeczy...
Próbowałem w ten sposób ale opcja właściwości połączenia mam nieaktywne :/
Jak zmieniłeś nazwy arkuszów ("Arkusz1" to teraz "BAZA" a "Proszki" to "MAŁE") to w całym kodzie makra trzeba je zmienić, a nie tylko w jednej linii. Poza tym (nie chce mi się tego mocno analizować dlaczego) ale makro odczytuje ostatnią pustą komórkę w kolumnie B arkusza "Dane" jako "zapisaną". Nie wiem czego - może ktoś z kolegów wyjaśni. Dlatego dołożyłem...
paweliw i Maciej Gonet! Dziękuję za bardzo rzeczowe podpowiedzi. Jako początkujący takich porad potrzebuję. Wpadłem na to żeby użyć funkcję TEKST i działa. Nie zdążyłem napisać posta, że problem rozwiązałem - byliście szybsi. Jednak dalej dręczy mnie pytanie: Dlaczego zarejestrowane makro daje inny wynik niż rejestrowana procedura?
Witam Mam taki problem a mianowicie w katalogu mam zgromadzone 50 plików excela*xls które zawierają tabelę z wartościami i jeden zbiorczy który wszystkie sumuje za pomocą makra które załączam poniżej. Problem polega w tym że jak zmienię wartości w którejś z tabel to w zbiorczym mi sie nie aktualizuję. Próbowałem w opcjach wyłączać /włączać automatyczne...
Jeśli masz Excela 2010 lub nowszego to można to zrobić w Power Query bez makro
Witam ponownie. Ponownie potrzebuję pomocy mistrzów excela :) [syntax=vbscript]Sub Send_Range() ' zakres ActiveSheet.Range("A6:G6").Select ' envelope ActiveWorkbook.EnvelopeVisible = True ' opcje With ActiveSheet.MailEnvelope .Introduction = "This is a sample worksheet." .Item.To = "xxx(at)xx.pl" .Item.Subject = "AWARIA" .Item.Send End With End Sub[/syntax]...
Rzeczywiście autor nie ma talentu do przekazywania informacji. Wydaje mi się że o to mu chodziło (załącznik). Do autora topiku: Nie da się funkcjami wydrukować tylko wybranych stron. Można ukrywać widoczność ale wtedy ostatecznie będą białe/czyste strony drukowane. Pozostaje makro - w sumie proste ale ... w makrach położenie poszczególnych komórek jest...
Proponuję wykorzystać rejestrator makr. Bez większej znajomości VBA można doskonale sobie poradzić. Przykład: 1. Nagrywam makra wstawiania i kopiowania wiersza. Wychodzi coś takiego nagrane 'Ctrl+strzałka w dół'[syntax=vb]Sub Makro3() ' ' Makro3 Makro ' ' Selection.Find(What:="Odżywianie", After:=ActiveCell, LookIn:=xlFormulas _ , LookAt:=xlWhole, SearchOrder:=xlByRows,...
Witam. Potrzebuję pomocy z napisaniem makra, które będzie miało za zadanie automatyczne wstawienie nazwy urzedu po wpisaniu kodu mpk z podanych kolumn w Arkuszu2
Z tą aktualizacją to znowu jakieś nieporozumienie. Jeśli dane będą się często zmieniać, ale sposób ich obróbki będzie niezmienny, to należy stosować formuły i przeliczanie automatyczne. Wtedy sam Excel zadba o to, by wszystko było aktualne. Jeśli wpisujesz do komórek wartości, to w domyśle te dane nie powinny się zmieniać, albo na tyle rzadko, żeby...
Wygląda dobrze. Czy wyzwalacz nawet nie uruchamia Excela, czy też tylko mejla nie wysyła? P.S. Mejl trafia do skrzynki nadawczej. Zostanie wysłany po uruchomieniu Outlooka. Totalnie nic się nie dzieje, ani excel ani mail.
To proste, mam arkusz w którym dość często wprowadzam zmiany, ale w normalnym trybie w arkuszu działają różne makra które miedzy innymi ukrywają wedle potrzeby wiersze i kolumny. Kiedy potrzebuję wprowadzić w arkuszu zmiany to mam jeden przycisk którym w arkuszu odkrywam wszystkie wiersze i kolumny, ale w tej sytuacji muszę włączyć tryb projektowania...
No to tylko makro np: Sub Makro1() Dim x As Integer Cells.EntireRow.Hidden = False x = WorksheetFunction.Match("C"... Columns("J"), 0) Do While Cells(x + 1, 10).Value = "C" x = x + 1 Loop Rows(x + 1 & ":65536").Hidden = True End Sub Nie robiłem zabezpieczenia dotyczącego...
Dziękuję za pomoc. Najlepszym rozwiązaniem okazało się zrobienie makra, które kopiuje automatycznie zawartość pierwszych trzech kolumn do nowego arkusza. Dodano po 1 Nagrałem makro kopiujące potrzebne dane do nowego arkusza
Witam, Czy istnieje możliwość, aby zrobić makro, które uruchamia makro o konkretnej godzinie i konkretnego dnia? Przykładowo: Wpisuję w komórkę A1 - 31.01.2019 15:30 I aby to makro uruchomiło inne makro (przykładowo o nazwie "makro1" dokładnie o tej porze bez klikania, itd? Dodatkowo: jeżeli plik nie byłby włączony o 15:30 - to makro (przy pierwszym...
Witam, poszukuje makra które pozwoliłoby na automatyczne nadawanie nazw zapisywanym arkuszom excela na bazie jednego pliku, tak aby po każdym zapisaniu generował się kolejny numer i zapisywał jako plik w wybranym folderze. Z góry dziekuje za pomoc :)
będę chciał aby makro korzystało z outlooka :)
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]
Zamieść na forum swój przykładowy plik (bez wrażliwych danych :D ) lub prześlij oryginalny na pw - to wprowadzę Ci to makro do tego pliku :D
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.
Zerknij do załącznika. Plik zawiera makro.
[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,...
Jest jakiś trik by po nowym wpisie posortowała się z automatu? Można wykorzystać makro zdarzeniowe typu [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range)[/syntax] dla arkusza z danymi, które będzie sortowało po każdej zmianie w określonym zakresie :D . Poprzez trick z importem danych z jednego arkusza do drugiego można ustawić kwerendę...
takie tstr = Str(Target.Value) jest równoważne z Target. Jeśli używasz angielskiej wersji Excela, to prawie tak, jeśli polskiej - jak ja na ogół i jak pytający - to już zdecydowanie nie! Proponuję wykonać takie makro po wprowadzeniu do komórki liczby dziesiętnej. [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) MsgBox Target & "...
Kolega PRL proponuje makro do kopiowania, ale w nazwa4 tylko formuły
Prosiłem o plik Excela, a nie o obrazek. Pytałem, jak to ma działać? Czy to makro ma reagować każdorazowo jak zmieni się kolor (rozumiem, że sprawdzana ma być kolumna C), czy ma być wywoływane okresowo (np. przyciskiem) i ma sprawdzać całą kolumnę pod kątem pokolorowanych duplikatów? Czy może wystąpić taka sytuacja, że jakiś wpis ma już kolor i ten...
zapisz makro jak formatujesz komorke, potem tylko wystarczy odpalic to makro po wybraniu konkretnej wartosci z listy.
Cześć :) Nie wiem, czy tu jest istotny kod tego makra - mam zdaje się podobny problem. Uruchamiam makro i po drodze Excel generuje kilka pytań, na które odpowiedzi chciałbym zautomatyzować. W wielu miejscach znajduję instrukcję tworzenia MsgBoxów, ale nigdzie nie znalazłem jak zakodować w VBA automatyczne odpowiadanie na nie. I tak np. Excel zadaje...
Pytanie zawiera przeczenie (czy jak to się fachowo nazywa). W każdym razie są (co najmniej) dwa wyjścia: 1. Wykorzystując harmonogram zadań, który o określonej godzinie uruchomi plik Excela, gdzie przy otwarciu uruchamiane jest makro. 2. Wiszący plik, z uruchomionym makrem zerkającym na zegarek systemowy, metoda OnTime - opis w help'ie This example...
Moja propozycja wygląda tak - klikasz dowolną komórkę w rzędzie opisującym dane zlecenie, klikasz przycisk. Makro kopiuje wszystkie cztery pozycje z aktualnie wybranego rzędu do arkusza o nazwie formularz w odpowiednie miejsca.
Mam pytanie: czy jest możliwe w Excelu 2000 automatyczne uruchomienie makra po wpisaniu dowolnej wartości do danej komórki?
Proponuję makro zdarzeniowe BeforeDoubleClick: [syntax=vbscript]Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Intersect(Target, Columns("B:C")) Is Nothing Then Exit Sub Cancel = True If Len(Target) = 19 Then Exit Sub Target.Value = Format(Now, "yyyy-mm-dd hh-mm-ss") Target.Columns.AutoFit End Sub[/syntax]Makro...
makro excel automatyczne odświeżanie automatyczne makro excel automatyczne
obliczyc winisd schemat instalacji klimatyzacji astra przerwa przewód antenowy
zawór różnicowy poziomo zawór różnicowy poziomo
Silnik nie wchodzi na obroty - przyczyny i diagnostyka Renault Clio 2 - problem z otwieraniem po zamknięciu pilotem
