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?
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,...
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.
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]
Sprawdź, dostosuj. Zrezygnowałem z tablicy na rzecz prostego przypisania.
W VB używamy przecinka. Np Range("A1:A1200,B5:B10&...
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]
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ć...
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.
Jeśli nie miałeś do czynienia z formularzami, to najprościej zamknąć InputBox w pętli w Thisworkbook, przy zdarzeniu Open. Coś jak[syntax=vb]With Sheets("NazwaArkusza") For i = to 10 .Cells(i, 2)= Inputbox ("Wpisz wartość dla komórki B" & i) Next .activate End With[/syntax]Dograj sobie rejestratorem polecenie drukowania, lub po aktywowaniu arkusza naciśnij...
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ć.
Przetestuj makro z załącznika.
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...
Zamalować wszystkie owale czarnym recznie. Dodano po 1 następnie makro wszystko zrobi
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...
Sub drukowanie_pakowania() Dim wsh As Worksheet For Each wsh In ActiveWorkbook.Worksheets If wsh.Cells(1, 10) > 0 Then If wsh.Cells(1, 10) < 10000 Then If wsh.Name = "PRODUKCJA" Then GoTo dalej wsh.PrintView dalej: End If End If Next wsh End Sub
dla przycisku tak daj takie samo makro tylko zamień True na False
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...
A jak są nazwane pliki z ankietami? Gdzie je zapisujesz, jeżeli mają taką samą (mozliwe?) nazwę? Czy jest jakaś struktura katalogów? I Ile tych ankiet będzie mniej wiecej? Może nie warto zbytnio kombinować z monitorowaniem tylko wczytać wszystko dopiero jak będzie potrzebne? Makra działają dosyc szybko. Mam gdzieś gotowca łączącego pliki Excela. Sama...
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
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, serdecznie poszukuje pomocy odnośnie wykonanie Makra, które by czytało dane z tabeli, wstawiało dokładnie jedna dana w dokładnie jedno miejsce oraz drukowało tak przygotowany arkusz oraz numerowało strony od 1 . Chodzi o to by Makro wzięło z tabeli z pierwszego wiersza 3 dane, z każdej kolumny inna wstawiło do następnego arkusza oraz wydrukowało...
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...
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.
To zależy ile docelowo przewidujesz wierszy w tabelce. Jeśli nieokreśloną, to tylko VBA...
Wykorzystaj zdarzenie Worksheet_Activate . Najprościej[syntax=vb]Private Sub Worksheet_Activate() Call CommandButton1_Click End Sub[/syntax]
Witam Dziękuję bardzo za pomoc, makro działa bardzo dobrze
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.
Włącz 'zarejestruj makro', wykonaj to, co codziennie powtarzasz, zmodyfikuj makro pod Twoje potrzeby.
bardziej wskazane byłoby tu makro.
A po co do tego makro? Można to zrobić prostą formułą w kolumnie I: =if(isblank(h1);na();now()) Kolumnę formatujesz jako "czas" i tyle.
Cześć. Sprawdź, czy takie coś Ci pasuje: [syntax=vbscript]Sub Rep() Const RFrom = "A1" Const RTo = "H1" Const Src = 3138 Dim x As Long For x = Range(RFrom).Column To Range(RTo).Column Columns(x).Replace what:="#", replacement:=Cells(Src, x).Value, _ LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, _ SearchFormat:=False, ReplaceFormat:=False...
Najlepiej jest rejestrowanie makra w celu otwarcia pliku tekstowego programom Excel
Jeśli masz Excela 2010 lub nowszego to można to zrobić w Power Query bez makro
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...
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 :)
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...
Należy oprogramować zdarzenie SheetChange skoroszytu. Wykrywa ono równocześnie, w którym arkuszu i w której komórce nastąpiła zmiana. Kod: [syntax=text]Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If Target.Address <> "$F$6" Then Exit Sub If IsNumeric(Target) And Target > 0 Then Sh.Tab.Color = vbRed Else Sh.Tab.Color...
Witam Poszukuję pomocy ze stworzeniem makra dla zapisu plików w excelu. Mianowicie chodzi mi o to żeby plik excela który otwieram z pulpitu po jego wypełnieniu i kliknięciu w dyskietkę (zapisz), zapisywał się automatycznie z datą w docelowym folderze. Może ma ktoś już podobne makro które mógłbym wykorzystać ?
Zrobiłem w ten sposób: Sub startTimera() Application.OnTime Now + TimeValue("00:00:15"), "show" Application.OnTime Now + TimeValue("00:00:25"), "show1" End Sub Makro przechodzi mi między dwoma plikami excel, lecz robi to tylko raz. W jaki sposób to zapętlić? Problem jest też taki, że nie mogę tego prostego kodu zastosować do przejścia miedzy excel a...
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ą...
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
Witaj Trochę wątpliwości. Dlaczego jest to tak ważne, aby bez makr?
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ć,...
automatyczne nadawanie nazw plikom tak aby po zapisaniu bazowego pliku generował się jego kolejny numer (x+1)+nazwa z komórki a1
oczywiście, że tak. jednak nie rozwiąże to mojego kłopotu. Tym bardziej, że codziennie muszę wykonywać koło 1000 kopiuj/wklej. Dlatego potrzebowałbym rozwiązania bardziej automatycznego
Uwierz mi że tak nie nauczysz się pisać programów. Nakierowałem Ciebie na dobrą drogę, a teraz kombinuj. Masz tutaj http://dzono4.w.interia.pl/kurs/dodatki/... przykład procedury uruchamiającej się SAMOCZYNNIE podczas aktywacji arkusza. Oczywiście piszesz to jako makro.
będę chciał aby makro korzystało z outlooka :)
Hmm, wywołują mnie tu do tablicy :) Rozumiem, że już jakieś makro działa... Z tego wynika, o czym już kolega Tommy82 wspomniał, że należy do makra dopisać instrukcję warunkową. A właściwie umieścić Twoje makro w gałęzi Else. Schemat: If IsNumeric([A]) then [X]=[B].value Else tu Twoje makro End If Jesli makro jest w innym skoroszycie wywołujesz...
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
Po Next dodać [syntax=vb] .Cells(w,1).value = .Cells(w-1,1).value + 1[/syntax] Powinno działać. Pamiętaj tylko, że gdy w = 1 dostaniesz error, bo spróbujesz się odnieść do Row = 0. Oraz, jeśli ta komórka nad nie będzie liczbą(bądź pusta), a spróbujesz do niej dodać 1. Można temu zapobiec dodając kilka If'ów. Jednakże myślę, że nie jest to takie znów...
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....
To teraz jeszcze dopisz co w owym pliku nie działa. U mnie makro wykonuje się bez problemów.
sorry, ale nie bardzo rozumiem. Mam wpisać w makro otwierające plik czy w makro w otwieranym pliku? i co to zmieni?
nie chciał bym bawić się w makro Czy w Excelu mogą migać komórki? Te dwie rzeczy nie są zgodne... ale mogą migać np. http://www.goldenline.pl/grupy/Zainteres...
No to albo kolumna pomocnicza z filtrem (wtedy masz tylko jeden "klik"-wybierasz 0 ) albo makro. Ponizej z kolumną a makro za chwile podrzucę.
Próbowałem też bezpośrednio w kodzie makra wklejać lub wpisywać te znaki, ale nie chce przyjmować Ale przyjmie arkusz. Zrób tabelkę, do tego odpowiednie makro...
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...
Potrzebuję stworzyć taki algorytm/makro który będzie automatycznie dobierał zakres danych wykorzystanych do wykresu (każda taśma ma inna długość co ta tym idzie różną ilość zapisanych pomiarów) oraz tworzył wykres przebiegu walcowania. Jak to się ma do układu danych? Nie można zaimportować jedynie kolumn z danymi, a wykresy tylko aktualizować (zostawić...
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.
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?
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
Ustaw w oknie właściwości pola pozycję "Locked" na True. Automatycznie szarzeje zdaje się tylko w Accesie. Ustaw ręcznie lub warunkowo w kodzie formy.
zapisz makro jak formatujesz komorke, potem tylko wystarczy odpalic to makro po wybraniu konkretnej wartosci z listy.
Kolega PRL proponuje makro do kopiowania, ale w nazwa4 tylko formuły
Rozwiązanie dla Excela. (W czasie prób wyłącz drukarkę) Makro drukuje zadaną ilość stron, zmienia Nr i umieszcza napis "Oryginał" lub "Kopia". Ustawienia w arkuszu "Opcje".
Średnio się na tym znam. Nie wiem czy o to chodzi [url=http://akademia-vba.pl/excel-vba/sc...
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
Tak, zawsze wpisując do tych samych pól w arkuszu zostaje mi baza przyjęć towaru od klienta. Całość ma wyglądać w ten sposób mam pierwszą stronę w arkuszu wypełniam wyżej wymienione pola zawsze te same 1a 1b i 1c i klikam drukuj drukuje mi się potwierdzenie pobrania sprzętu do naprawy a wszystkie dane zostają zapisane w drugim arkuszu kolejno 1,2,3...
Z arkusza1 robię raporty w osobnych arkuszach Efekt taki jak na zrzucie 1041538 automatycznego kopiowania wyfiltrowanych danych z arkusza1 do kilku arkuszy :idea: (z nazwami arkuszy wg filtrowanych danych :D ) można zrealizować przykładowo tak jak w załączonym pliku. 1041541 Makro można uruchomić skrótem klawiaturowym ctrl+r :!: , dla dowolnej (jeśli...
Pozwoliłem sobie skorzystać z pliku kolegi szafarza jako wzoru danych. Nagrałem makro i trochę je podreperowałem aby było uniwersalne dla każdych danych (by uwzględnioało wszystkie dane i możliwości). Aby zobaczyć efekt w załączniku trzeba pozwolić na wykonywanie makr. Też nie wiem jak kolega szafarz doszedł do wyboru modeli dla kategorii A [usunął...
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...
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...
Ten sposób zadziała gdy dane mają się zaciągać z jednego pliku a mi chodzi o to by pobierał dane z 6 innych plików Nie widzę przeszkód. i żeby te dane nie nakładały się na siebie tylko grzecznie zapisywały się pod sobą No o tym kolega nie wspomniał. Tylko makro lub VBA (IMHO)!
Dodam swoje 3 grosze.
W komórce z formułą włącz zawijanie tekstu, a oprócz tego w module arkusza zdefiniuj sobie takie makro zdarzeniowe: [syntax=vbscript]Dim kom Private Sub Worksheet_Calculate() With Range("B8") If IsError(.Value) Then .Rows.AutoFit kom = 0 ElseIf .Value <> kom Then .Rows.AutoFit kom = .Value End If End With End Sub [/syntax]Alternatywnie możesz...
Najpierw musisz utworzyć marko które będzie się uruchamiała po zmianie tekstu w komórce. Przykład Cells.Find . Na końcu wyrażenia dajesz .Activate i komórki w których znaleziono daną wartość robią się aktywne. Na końcu używasz czegoś [url=http://java2s.com/Code/VBA-Excel-Ac... żeby przejść do właściwej komórki.
..Mam W kolumnie A 1600 wierszy np. z nawziskami i muszę w kolumnie B wstawić odpowiedni komentarz ( teskstowy ) będzie on zmienny .. Można to zrobić tak jak chcesz, za pomocą przycisków ale może są jakieś reguły wg. których dopisujesz ten komentarz? Wtedy lepiej by było napisać jakieś makro które robi to automatycznie.
Jeśli to wszystko jest w jednym skoroszycie, to możesz użyć też funkcji ADR.POŚR. Jej argument podaje się w formie tekstu, więc można go złożyć z kawałków. Ale użycie tego spowalnia trochę działanie funkcji, więc zależy ile masz tych danych do przeliczenia. Mogłoby to wyglądać np. tak: [syntax=text]=WYSZUKAJ.POZIOMO(D3;ADR.PO... " & A1 & "'!36:62");2;FAŁSZ)[/syntax]...
Próbowałem w ten sposób ale opcja właściwości połączenia mam nieaktywne :/
Najprościej wrzucić wszystko do jednego arkusza "Bazy". Można zrobić to formułami, patrz kolumna A i C w "Dane" + dynamiczna nazwa, patrz "Część_rys". Jeśli tych arkuszy jest więcej (niż powiedzmy 5), sugeruję napisać makro.
Witam (at)ll, proszę o pomoc w napisaniu makra. Mam plik excela, a w nim 31 arkuszy-zakładek (nazwa każdego z nich to kolejny dzień miesiąca od 1 do 31) i teraz muszę w komórkę A2 każdego arkusza wypełnić kolejną datą zaczynając od 01.02.2011 proszę o makro które zrobi to automatycznie
Np funkcja użytkownika w załączniku. Jeśli to jednorazowa operacja, to przerób na makro. Pierwsza wielka: Funkcja StrConv zwraca wartość typu String przekonwertowaną wg specyfikacji. Składnia funkcji StrConv: StrConv(Łańcuch, Konwersja) vbProperCase 3 Konwersja pierwszej litery każdego słowa na dużą
Jeśli to jest nowy Excel (365) No właśnie Autorka jest coś małomówna. ;) Nie mam 365 i nie wiedziałem, że takie udogodnienie w nim jest. Mam 2007 i 2021. Nawet w 2021 nie ma "Automatyczna konwersja danych"... Ale zawsze można napisać makro dla starszych wersji, żeby ułatwić pracę. W załączniku makro do wczytywania pliku CSV.
Problem rozwiązany pomogło automatyczne przeliczanie:) Dzięki! Temat uważam za zamkniety.
Dziękuję za pomoc. Spróbuję rozwiązać ten problem. Narazie robie tak ze przy skanowaniu zmieniam ręcznie nazwę na określony nr Zlecenia. Potem mam napisane makro gdzie automatycznie pliki .pdf powiela się z komorkami w excel o tej samej nazwie w bazie danych jako hiperłącza. .
Jeśli dostaniesz wynik w 53 arkuszu, to jaki problem przekleić to do nowego pliku? :) Może ktoś doradzi z jakąś formułą, ja obstawiam jednak na makro :)
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...
W takim razie załącz plik bez kodu, żeby można było dodać kod. P.S. Dlaczego kolumna A jest pusta? Skoro tak ma być, to prosimy o przykładowy plik...
Zapewne można napisać kolejne makro korzystając z worksheet_change, albo wstawić listę rozwijalną i z niej wybierać.
Dobry wieczór, Nie bardzo rozumiem o co chodzi. Cały zakres obejmuje kolumny od A do LH. Jeżeli to ma być zmienione należy wprowadzić poprawki w komórkach A16 i A17 oraz w definicjach wi i wj w Menedżerze nazw. Natomiast jeśli chodzi o ten węższy zakres to jest on rozpoznawany automatycznie, co widać w komórce A16 i w definicji wi. Czy coś nie działa...
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]
Mam pytanie: czy jest możliwe w Excelu 2000 automatyczne uruchomienie makra po wpisaniu dowolnej wartości do danej komórki?
Jest. Tworzysz nowy "arkusz" - okno dialogowe. Na nim umieszczasz pole edycyjne. Do przycisku OK, który jest domyślny przypisujesz makro, które wyszuka teraz pole w arkuszu z danymi o tym samym tekście i zmieni jego format oraz w kolumnie kolejnej wpisze aktualny czas. Kod ogarniesz praktycznie rejestratorem makr.
Ok, dziękuję spróbuję choć pliki do wydruków dostaję w pliku excela i pierwsze od tego zacząłem jak tu to zrobić. Choć nie wiem jak się do tego zabrać na kilka tysięcy rekordów jest co robić dlatego myślałem nad jakimś automatycznym rozwiązaniem.
Może się nie zrozumieliśmy. Ja zrozumiałem, że po wpisaniu/skanowaniu do komórki D, wybrana zostanie komórka A w wierszu poniżej i tak to działa w pliku, który przesłałem. Dodano po 2 Ah kumam w pliku nie mam makra Umieść to makro w module arkusza 'OXE SN'.
To Makro działa super. Jakby jeszcze udało się zrobić, żeby działało automatyczne odświeżanie to byłoby idealnie :) Pozdrawiam
A może być makro? Jeśli tak, to spróbuj odpalić taki kod: [syntax=vbscript] Option Explicit Sub Zakresy() Dim ark As Worksheet Dim i&, j&, w& Set ark = ThisWorkbook.ActiveSheet w = ark.UsedRange.Rows.Count + 1 i = 2 j = 2 Do While i < w If Cells(j, 4) <> "" Then Cells(i, 5) = "OK" End If j = j + 1 Do Until ark.Cells(j, 2) <>...
makro excel automatyczne obliczenia makro excel automatyczne odświeżanie automatyczne makro
amazon assistant siemens micromaster alkoholem izopropylowym
Filtr paliwa do piły Oleo-Mac 937: T3 czy oryginał? Wymiary blokad rozrządu dla VW Crafter 2.5 TDI