Zakładając, że makro uruchamiasz przy aktywnym arkuszu wynikowym, konstrukcja powinna wyglądać mniej więcej tak ostWrs = tu szukamy ostatniej niepustej komórki w arkuszu wynikowym For Each sht In ThisWorkbook.Worksheets If sht.Name <> "tu nazwa arkusza wynikowego" Then ostWrsArk = tu szukamy ostatniej niepustej komórki w arkuszu źródłowym...
Najlepiej by było gdybyś w załączniku podpiął twój przykładowy arkusz. Wtedy łatwiej będzie znaleźć ten błąd. I jeszcze jedno - na chwilę obecną to makro sprawdza wszystkie kolory z palety więc nie trzeba nic definiować. Wklej ten kod między Private Sub ...() a End Sub Dim kom As Range, i As Integer Application.ScreenUpdating = False Range("AB5:AC60")....
https://obrazki.elektroda.pl/5949275600_... (Miniaturka przedstawia zrzut ekranu z mojego prywatnego pliku Excela z projektami; zrealizowany jest on metodą którą opiszę poniżej) Witajcie moi drodzy Zapraszam do lektury mojego nietypowego tematu przeznaczonego dla elektroników amatorów i hobbystów wykonujących własne projekty. Przedstawię...
Te arkusze mają za każdym razem te same nazwy w jakiś powtarzalny sposób czy losowe? Tak,docelowo chciałbym,żeby nazwe zlecenia z komórki pobierało do nazwy arkusza + zawsze powtarzalna nazwa do danego arkusza.:) np. B2 + Obróbka_naczepa (czyli A/15684 Obróbka_naczepa.pdf)
W przedstawionej procedurze eksportujesz (czy raczej usiłujesz ? :D ) do PDF dwa pliki komputer.xlsx i porto.xlsx :?: Planujesz zmieniać nazwy tylko plików komputer ? poprzez wprowadzenie do nazwy daty eksportu - formatowanej właśnie w takim stylu "yy.mm.dd" :?: czy też koniecznie oznaczyć datą z komórki A1 arkusza z makrem ? Proszę o wyjaśnienie
Cześć, mam do napisania Makro, które będzie tworzyło nowy plik Excel i wstawialo w nim tabele, której elementami będa konkretne wartości z pierwszwgo excela oraz spis jego arkuszy, powiem szczerze,że makro wywala mi się na odwołaniach do oryginalnego Excela (nazwa "Zadania"). nie jestem niestety ekspertem VBA i chyba moja wiedza sie wyczerpała. dzieki...
...Niestety jestem zielony w tworzeniu makr ... Nie chcę by to zabrzmiało jakbym chciał Cie urazić/obrazić ale ... nie masz pojęcia, ani o makrach, ani o tym jak "działa" excel, ani nawet o podstawach programowania, więc nie wiem dlaczego podjąłeś się pomagać innym w czymś o czym nie masz zielonego pojęcia. Excel nie jest aż tak rozbudowany jak mózg...
Tak przy zapisie pobiera część nazwy z komórki np. dane październik 2014.xlsm i ta nazwa podkreślona by była zmienną, co do tych ukrytych arkuszy mogę użyć polecenia sheets(25) czy muszę podać nazwę arkusza?
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...
Jestem początkujacy. Moze ktos mi pomoze. w folderze "dane" mam wiele plików excelowych o róznych nazwach (np G12.xls,S-12 itd). W folderze "wzor" mam plik "wzór.xls". Potrzebuje aby makro skopiowało nazwe pliku z folderu "dane" pliku np G12.xls, kopiując plik "wzór.xls" zapisując w folderze docelowym "docel" z taka sama nazwa np G12.xls albo 2017-G12.xls....
Zarejestrowałem poniższe makro, które miało za zadanie tworzyć kopię arkusza "CZAS PRACY" i zapisanie go na "pulpicie", z tym że nazwa pliku pobierana jest z komórki (w tym wypadku AQ3). Makro działa dobrze z tym wyjątkiem że nazwa pliku jest przypisana na stałe. Jak należny zmodyfikować kod, aby nazwa pliku była aktualizowana zgodnie z zawartością...
Nie no... tak to się nie da. Aby zrobić mniej więcej to co chcesz trzeba jednak zaprząść jakieś makro. Poza tym trzeba by było zrobić jakaś systematykę w danych. Chodzi o to że opis jednego stropu masz w ok 50 wierszach a w innym przypadku wystarczy 10. Poza tym fotki. Tu trzeba inaczej podejść do problemu. Jak znajdę chwilę to może coś wymyślę (ale...
Być może masz rację. Chociaż tutaj na tym forum reakcja była błyskawiczna :-). OK - podzielmy: Problem numer jeden - czy ktoś może zaproponować makro , które na podstawie arkusza "target" (plik w załączniku w pierwszym poście) utworzy nowe skoroszyty z nazwą taką jak nazwa kolumny począwszy od komórki B1 , a które będą zawierały kolumny : "A" z arkusza...
W ty, nowym pliku xls przydałoby się podmienić nazwę (obecnie kopiuje z pierwotnego xlsx) na np "Arkusz1" a mógłby kopiować tylko to co jest aktywne (bez tego co ukrywaję filtry) Trzeba kopiować tylko widoczne komórki i wklejać je potem jako wartości i formaty. Wymaga to jednak zmiany sposobu tworzenia nowego arkusza. Przy okazji czemu: Worksheets("Nazwa...
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;...
Trochę czasu wolnego się trafiło, poczytałem toiowo, i znalazłem może niezbyt eleganckie ale dosyć satysfakcjonujące rozwiązanie mojego problemu. Tylko brak mu automatyzacji i całościowego podejścia jeszcze. Są dwie kolumny, w jednej nazwa towaru po polsku (A), w drugiej ma być po angielsku (B). Część drugiej jest już przetłumaczona, więc niektóre komórki...
Moje poszukiwania w Googlach nie dały rezultatu. Na tym forum również nie znalazłem odpowiedzi pomimo że są tematy zbliżone do mojego problemu. Co ciekawe na innych forach również nikt nie wie jak to zrobić. Chciałbym Was tu prosić o pomoc jak to można zrobić. Chodzi mi o zbudowanie makra do zliczania z komórek znajdujących się w innych plikach. Założenia...
Witam. Przeglądałem kilka tematów tu na forum które dotyczyły mojego problemu niestety żaden nie tyczył dokładnie tego co mnie interesuje. Pracuje jako specjalista ds. transportu w niewielkiej sieci marketów i tworząc plan transportowy dla samochodów musze po skończeniu wpisać tzw zwroty (puste palety, kartony, kosze z butelkami etc). Sklepy zgłaszają...
To makro będzie w miarę proste, wystarczy w pętli sprawdzać kolejne komórki w pogrupowanej kolumnie, a jak dwie kolejne się różnią - skopiować zakres od...do: [syntax=vb]Private Sub CommandButton1_Click() On Error GoTo myErr Application.ScreenUpdating = False Set wsdane = ThisWorkbook.Worksheets("dane") 'nazwa arkusza z danymi ost_wiersz = wsdane.Cells(Rows.Count,...
Witam. Znów mam problem z Excelem. Mianowicie w firmie gdzie pracuje człowiek człowiekowi wilkiem przy wysyłaniu zbiorczego planu dostaw przewoźnicy się burzą że jeden ma lepiej drugi gorzej. Że ktoś jest bardziej faworyzowany inny mniej. Wpadłem na pomysł żeby skombinować makro, które dzieli plan dostaw na oddzielne pliki, takie, w których przewoźnik...
'zdefiniowanie ostatniego wiersza w arkuszu "Inne" OstatniWiersz = Sheets("Inne").Range("D65535").End(xlUp)... a właściwie Range D65535 definiuje mi maxymalny zasięg kolumny D ? , a 65535 jest to maxymalana ilość wierszy jaką potrafi "przetrawić" excel ? Range("A2:B5") - z tej podpowiedzi wnioskuję że można stosować zapis excela w makrach "excelowych"...
Mały arkusz przykładowy masz w załączniku - wykorzystuje proste kopiowanie wierszy w pętli z arkusza źródłowego do docelowego. W pełni zgadzam się z przedmówcą, że tych przycisków coś za dużo - ba, sama idea kopiowania obrazków nie bardzo mi się podoba - wszak masz potem ten sam obrazek w dwóch miejscach... A znając tendencję niektórych ludzi do wklejania...
Cześć, Proszę o pomoc ponieważ nie potrafię sobie z tym poradzić, a nie jestem biegły w temacie makr. Otóż pilnie potrzebuję skonstruować plik, który pełniłby rolę programu do generowania prostych faktur. Plik zrobiony według rzeczywistych potrzeb, miał zostać jedynie zautomatyzowany tak, by po kliknięciu w przycisk "Generuj wydruki" odbywał się zapis...
[syntax=vbscript]nazwa = ActiveCell.Value With ThisWorkbook .Sheets("wzor rodzinne").Copy ActiveWorkbook.SaveAs .Path & "\rodzinne\" & _ nazwa & ".xls" ActiveWorkbook.Close End With[/syntax]
Pomogę w ten sposób: Tak przypisujesz nazwę z danej komórki Nazwa_z_komorki = Worksheets("KON").Cell... 1).Value i podobnie ilość Ilosc_z_komorki = Worksheets("KON").Cell... 2).Value Do powyższego cells(nr wiersza,nr kolumny) dodanie arkusza: Sheets.Add Nadanie nazwy arkuszowi: ActiveSheet.Name...
Ale nie rozumiem jak jest z zapisem liczby z kalkulatora do jakieś komórki w arkuszu Jak można nie rozumieć, że ty sam napisałes? To znaczy: Z pierwszego arusza "Sheets(1)" odczytaj komórkę A1 i dodaj do niej liczbę z TextBox1 ("TextBox1.Value" = przekształć tekst na liczbę). Wynik zapisz do pierwszego arkusza "Sheets(1)" do komórki A1 = "Range("A1")...
szablon.SaveAs Filename:=sciezka Proponuję użyć SaveCopyAs. Ale nie wiadomo, czy makro (jego nazwa sugeruje tworzenie arkuszy), czy też ma tworzyć nowe pliki.
Czyli ustawiasz kursor w którymś z wierszy, naciskasz przycisk i ma się dodać wg wartości w tym wierszu? Oj, żebyś żonie nie uprzykrzył ;) Nie rozsądniej byłoby zrobić to za pośrednictwem formularza? Wybierasz z pól kombi (stan w podglądzie) i dodajesz pod przyciskiem. Update 7:50 Coś jak w załączniku. W ostateczności wykorzystaj makra...
Po kliknięciu komórki np. C16 ma się utworzyć arkusz o tej nazwie tj. "C16"? Czy raczej arkusz z nazwą projektu? Jeżeli to drugie, to zamiast używać tabeli przestawnej proponuje: 1. utworzyć arkusz z polem/formantem kombi dla którego źródłem danych będzie pole (kolumna) "nazwa" z arkusza Dane. Po wybraniu elementu z listy zwraca się pozycję tego elementu...
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.
Odwołaj się w pętli do arkusza źródłowego/docelowego przez Worksheets("nazwa_arkusza"), a po kropce do konkretnej komórki: albo w postaci .Range("E" & i) albo w postaci .Cells(i, 5), gdzie i - nr wiersza źródła (ew. jeżeli zrobisz w pętli for each c in ...., to możęsz użyć c.Row). Do tego druga zmienna np. j dla wiersza arkusza-celu, czyli: j = 1 for...
makro które z wybranego folderu pobiera jpg i wkleja w odpowiednią komórką Dlaczego to samo makro nie wkleja to zdjęcie do dwóch innych arkuszy? Zalacz to pierwsze makro. Dodano po 8 Od razu po wklejani Selection.Name = "To_co_Chcesz"
Witam ,chociaż już po Świetach to życzę zdrówka wszystkim. A co do problemu z jakim się zwracam to potrzebuję do pliku załączonego aby dołożył ktoś makro lub formułe, w zależności czym będzie lepiej uzyskać efekt ,który przydałby mi się na co dzień. Mianowicie w skoroszycie mam kilka arkuszy z nazwą powtarzającą się w kolumnach "B". Po otwarciu skoroszytu...
Proponuję, żeby Kolega (zakładając, że nie ma Kolega pojęciu o VBA) zaczął od zarejestrowania makro, w którym doda sobie Kolega arkusz, określi jego nazwę i kliknie sobie w dwie komórki po sobie. Potem może sobie Kolega obejrzeć kod makro, które zostało nagrane i wszystko powinno być jasne. Jeśli będzie miał Kolega problem z jakimś fragmentem kodu -...
Post pod postem, ale jakoś chcę zwrócić uwagę autora :) Tak z niedzielnych nudów zacząłem kombinować z tymi pętlami. A jak już jest (prawie) gotowe, to wrzucam. Może się przyda... Warunkiem jest umieszczenie pracowników w odpowiednich wierszach zgodnych z Nr ewidencyjnym i Lp. tzn jeśli Pani Monika ma NrEw. 2 i jest w 4 wierszu (Lp 3), to tak musi być...
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]...
Użyłem tego makra we wszystkich od 01.YY do 13.YY i tylko pierwszy skopiował dane. W załączniku przesyłam cały plik, może będzie łatwiej rozwiązać zagadkę Już z tego miejsca pragnę bardzo podziękować za pomoc, ale chciałbym sprawę doprowadzić do końca. tak czy siak nie we wszystkich skoroszytach ci to zadziała musisz trzymać się jednej nazwy arkuszy...
Załączam przykładowe rozwiązanie z użyciem makr. Raczej jako ciekawostkę. Koder ze mnie marny, ale działa jak chciałem. Plusy: - sprawdzanie poprawności nazwy pokoju - sprawdzanie, czy przydzielona liczba osób zmieści się w pokoju - można przydzielić dwa nazwiska do jednego pokoju - makro działa na dowolnej liczbie pokoi zdefiniowanej w arkuszu (max...
Powinieneś załączyć przykładowy plik Excela, bo za dużo jest niejasności w tym, co napisałeś. Przykładowy kod, który działa wg Twojego opisu: [syntax=vbscript]Sub AddSheets() ' zakładamy, że nazwy nowych arkuszy ' są w komórkach od B5 w dół Dim ostw As Long, w As Long ostw = Arkusz1.Cells(5, 2).End(xlDown).Row For w = 5 To ostw Sheets.Add(After:=Sheets(Sheets.Count))....
Jeżeli chodzi o przenoszenie formatowania to excel właściwie nie ma żadnych funkcji. Można to zrobić jedynie poprzez makro (VBA) lub "pisaniną" poprzez formatowanie warunkowe i to w excelu 2007 i powyżej, bo niższe mogą mieć tylko max 3 warunki. Ten kto zna jako-tako programowanie w VAB może sobie poradzić. Ten kto nie ma pojęcia na początku upadnie,...
W takim razie w arkuszu z tą komórką wstaw taki fragment: [syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$B$9" Then Call myCopy End If End Sub[/syntax] Nazwa makra - copy() - nie jest zbyt fortunna, bo pokrywa się z poleceniem VBA o takim samym tytule. Lepiej zmień ją np. na myCopy
Dobry wieczór, Nie wiem, ile jest tych wzorów i czy będą w nich w danej chwili identyczne ścieżki czy różne. Ale można spróbować tak. W edytorze Visual Basica wpisać sobie proste makro wstawiające do aktywnej komórki albo do komórki o określonym adresie formułę z funkcją WYSZUKAJ.PIONOWO. [syntax=vb]Sub WstawWzor() ActiveCell.FormulaLocal = _ "=WYSZUKAJ.PIONOWO(J6;'C:\Users\user\Des...
to makro do "zabawy" Dodano po 2 jeszcze dwie wersje.... Pierwsza ile_wierszy, to może być niemal dowolna liczba sprawdzonych wierszy , można wpisać nawet tyle ile wierszy ma cała kolumna (zależy od wersji Excela) Chodzi o to by nie sprawdzać całej kolumny bo to może potrwać.... Skopiowane zostaną tylko niepuste komórki. [syntax=vba] Sub copy_cells()...
próbowałem najpierw wkleić kod Gdzie próbowałeś wkleić kod? Zobacz w projekcie makra, że kod jest "bezpośrednio" w arkuszu a nie w module. U mnie działa: Nowy arkusz, wstawiam wykres, kopiuje kod makra do arkusza (nie do modułu) i zmieniam wartość w tabeli ... tatam. Na marginesie jeżeli już masz "coś" w tym arkuszu w którym chcesz ten kod wykorzystać:...
Jedynie odwołując się do indeksów arkuszy zamiast do nazw. Np po kolejności komórek w kolumnie. [syntax=vb]Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink) arg = Split(Target.SubAddress, "!") sh = Target.Parent.Row - 1 'link w 4 wierszu dot Sheets(3) adr = arg(1) With Sheets(sh) .Visible = True .Activate .Range(adr).Select End With End...
Funkcji nie ma ale proste makro może to załatwić. Powiedzmy, że w A1 wpiszesz datę (zgodnie z formatem daty excela) 2010-05-05 Pod przycisk (z formularzy) podepnij poniższy kod i już. Drukuj tylko za pomocą tego przycisku, inaczej data się nie zmieni. Ewentualnie w kodzie dostosuj do swoich potrzeb nazwę komórki z datą (A1) i nazwę arkusza (Arkusz1)....
Ja chce kopiować komórki pomiędzy arkuszami Umieść kod w module (nie w kodzie arkusza)...
Wszystko to chyba jest dość proste, tylko przedstawione w jakiś dziwnie zagmatwany sposób. Po pierwsze nadal nie jest jasne czy masz jeden plik czy dwa pliki. W pierwszym pliku jest Makro1. Wywołujesz to makro w kodzie, który nie ma nazwy, bo nie pokazałeś całego makra, tylko kawałki. I teraz czy ten kod bez nazwy jest w osobnym pliku, ale z takimi...
Wstaw na początku makra [syntax=vb]Application.ScreenUpdating = False[/syntax]a na końcu, przed wiadomością: [syntax=vb]Application.ScreenUpdating = True[/syntax]Dzięki temu unikniesz przeskakiwania między arkuszami. Druga sprawa: cały taki przykładowy fragment: [syntax=vb]Sheets("instrukcja").Select Range("b11").Select Selection.Copy Sheets("czas pracy").Select...
Korzystam z podobnego rozwiązania ale potrzebne jest też formatowanie warunkowe (aby zaznaczać tylko zakres wiersza). Zaznaczanie aktywnego wiersza za pomocą formatowania warunkowego i VBA 1. Zaznaczanie aktywnego wiersza Definiujemy nazwę: AktywnyWiersz=0 Wpisujemy formułę w VBA w sekcji Worksheet - SelectionChange Private Sub Worksheet_SelectionChange(ByVal...
W przyszłości nie trzeba pisać skoroszyt zamiast arkusz(z określonymi numerami) Skoroszyt to jest plik(w każdym razie tak to było do tej pory). Ponieważ nie wiadomo, czy te same struktury arkuszy, liczbę wierszy i kolumn, kopiowanie, możesz zrobić tak: [syntax=vb] Sub kopie() 'makro w pliku(skoroszycie) A, plik B jest otwarty 'kolejne 3 linie dopasuj...
Nazwy obiektów są typu String , więc wystarczy "poskładać" Np makrem: Range("C3")=Workbooks("Zeszyt_Nr" & zmienna & ".xls").Sheets("Arkusz1").Range("A1") Plik musi być otwarty. Lub formułą w arkuszu: =ADR.POŚR(ZŁĄCZ.TEKSTY("'[!Zeszyt_Nr";C1... Gdzie Nr wpisany jest w komórce C1 (tu również plik musi być otwarty). Możesz dodać łacza...
Witam, potrzebuję funkcję, która będzie zliczać teks (z tym problemu nie ma CZY.TEKST) w arkusz, którego nazwa będzie zapisane w pewnej komórce. Przykład W Aruszu1 komórce A1 zostaje zapisana nazwa nowo utworzonego Arkusza np 10 o nazwie np "GŁÓWNY". W arkuszu tym będą zapisywane nazwy różnych podzespołów. Chciałbym by funkcja odnalazła Arkusz po nazwie...
Poniżej rozwiązanie z wykorzystaniem VBA Kliknij prawym przyciskiem na nazwie arkusza, z menu kontekstowego wybierz "wyświetl kod". W edytorze VBA wpisz: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then If Target.Value = "x" Then Range("C1") = Range("B1") Else Range("C1") = "" End If End If End Sub Zapisz plik w formacie...
Dlatego się "nie zmienia" bo wszystko masz powiązane z jedną komórką celu. Ale to i tak by nic nie dało gdyż obliczenia na "karta" dotyczą tylko jednego pracownika na raz (czyli tylko jednej listy rozwijalnej), więc nie zobaczyłbyś nic więcej (byś musiał pod każdą listę robić oddzielny arkusz "dublujący" arkusz "Karta"). Wydaje mi się że nie do końca...
Witam, Czy ktoś jest w stanie pomóc mi w napisaniu makra które tworzyło by nowe arkusze w pliku każdemu z nich nadając nazwę z kolejnej komórki kolumny istniejacego arkusza (kolumna G dane zaczynąją się od G4). Z samym wstawieniem odpowiedniej ilości arkuszy byłbym wstanie sobie poradzić ale nadawanie nazw mnie przerosło. z góry dzięki. pozdrawiam,
1. 1. Nie kasuje komórek z zakresu Kod: br.Sheets(s).Range("39:56,97:100,141:144... To jest mój błĄd, miało być o 9 wierszy mniej, poniewaz kopie z a10 do a1 na sbiorczym t.j. range("30:47, 88:91, ... itd. teraz makro usuwa wiersze z dane, nie te z 'Note: 1. All tests (VT, PT, MT, UT, RT) were carried...
Cześć, prośba o pomoc przy VBA dla sytuacji: w pliku "Dane" znajdują się arkusze A, B, C, D - potrzebuję utworzyć jeden pdf z arkuszy C i D, zapisać go pod nazwą "Nazwa Klienta z komórki A1_Wynik" w folderze, w którym jest plik excel dla pojedynczego arkusza korzystam z takiego makra: With ActiveSheet .ExportAsFixedFormat Type:=xlTypePDF, _ Filename:=.Parent.Path...
Oczywiście makra mogą (prawie) wszystko. :) Ja czegoś takiego raczej bym wolał nie robić. Przemyśl jeszcze raz czego naprawdę potrzebujesz. Może pomogą Ci w tym poniższe uwagi. Nie lubię niczego uruchamiać "wejściem" w komórkę, działa "topornie". Robię to tylko jeżeli nie ma innego (prostszego) wyjścia. Zwykle lepiej działa normalny przycisk uruchamiający...
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...
Poczekaj na specjalistów albo sam nagraj makro i spróbuj je zmodyfikować.
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...
Co prawda to twoja praca domowa, niemniej: Excel działa na danych dynamicznie. Bez makra "zapisywanie" do komórki "stałej" danej z jednej nie da się zrobić * . Ja widzę to tak (dwa sposoby): 1. Tabela. W trzech wersach pierwszej kolumny trzy (czy więcej) urządzeń. W nagłówkach kolumn tej tabeli od razu wpisane kolejne daty z kalendarza. Wpisujesz czas...
Tak na szybko masz tu makro, które chyba robi to co chciałeś. założenia - pliki są w katalogu C:\dane - pobierasz nazwę do szukania z komórki B3 - szukasz takiego produktu w kolumnie B - w obu plikach arkusze nazywają się Dane - zakres poszukiwania w kolumnie B jest ograniczony do 30 - wartość dotycząca szukanego produktu jest pobierana z komórki sąsiedniej...
1. Najprościej wyłączyć obsługę błędów For Each element in kolekcja . Np [syntax=vb]zakres = Array([a2], [c3], [d5]) For Each kom In zakres If kom = "" Then kom.Value = "-" Next[/syntax]
Powiedzmy że działa - potestuj. Trochę info o pliku: Podstawa: Makro sprawdza w nagłówku (w wierszu drugim) gdzie jest tekst "Zadanie" i "Grupa interwencyjna" jak również w wierszu trzecim szuka ostatniej niepustej komórki. (po tym rozpoznaje ile jest poszczególnych kolumn. Jeżeli zmienisz nazwy dodawać dowolną ilość kolumn do zadania i do pracowników....
Cześć potrzebuję pomocy. Mam napisane krótkie makro polegające na tym, że przed wydrukowaniem program automatycznie zapisuje plik excel pod nazwą wskazaną w konkretnej komórce w arkuszu. W danym skoroszycie mam 30 takich arkuszy i celem jest aby w zależności od tego w jakim arkuszu jestem pobierało wartość komórki z danego arkusza. Poniżej dotychczasowy...
Nie wiem czy to zadziała na Excelu 2002, ale możesz sprawdzić przykład z załącznika. Oparty na "zwykłych" formantach formularza - checkboxach. Jak klikniesz prawym -> Formatuj formant to we właściwościach masz Łącze Komórki, gdzie możesz ustawić powiązanie formantu z komórką - to ta pierwsza część. Druga - do checkboxa można przypisać makro, które zaznaczy...
Jeśli makro zdarzeniowe ma działać w konkretnym arkuszu, to powinno być zdefiniowane w module kodu tego arkusza. Jeśli takie samo makro ma działać w kilku arkuszach, to można alternatywnie zdefiniować makro skoroszytu w module Ten_skoroszyt (ThisWorkbook). Te makra mają trochę inne nazwy, trzeba wybrać odpowiednie makro z listy.
Dzień dobry, Wydaje mi się, że niepotrzebnie się Pan obraża, bo moje pytanie chyba jednak było zasadne - w nowej wersji usunął Pan to godzinowe formatowanie i teraz wiadomo, że chodziło Panu o liczby całkowite. Lepiej wyjaśnić wątpliwości zawczasu aniżeli zrobić coś nie tak i później poprawiać. Pana problem wcale nie jest banalny i pewnie dlatego nikt...
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....
można zrobić i funkcie któras będzie działała jak inne funkcje excela (np suma() z tym że za każdym razem przy wejściu do takiego pliku excela będzie monit o makro. Przyznam że nie jestem za dobry w makrach ale poprzez logiczne myślenie :) coś takiego stworzyłem Function KOMENTARZ(a As Integer, b As Integer) As String KOMENTARZ = Cells(a, b).Comment.Text...
W pierwszej kolejności ustawiłbym na arkuszach obszar wydruku (metoda dowolna ręcznie/makrem) [syntax=vbscript]wybrany_arkusz.PageSetu... = "zakres"[/syntax] Następnie w pętli np. For .. Next sprawdziłbym czy w zakresie komórek C3:C10 jest "PRAWDA". Jeżeli tak, to korzystając z instrukcji warunkowej If .. Then zainicjowałbym wydruk [syntax=vbscript]Sheets("nazwa_arkusza")...
Jaką regułę zastosować, żeby w programie Excel dane z jednego arkusza kopiowały się do drugiego arkusza automatycznie ? Aby skopiować dane z jednego arkusza do drugiego w programie Excel w sposób automatyczny, możesz skorzystać z kilku różnych metod, w zależności od tego, jakiej funkcjonalności oczekujesz. Oto kilka przykładów: 1. Formuła odwołująca...
Witam, Jak przekazać wyniki filtrowania do makra? W arkuszu jest tabela z danymi z włączonym filtrowaniem kolumn. Chcę w makrze uzyskać dostęp do wyników filtrowania, tj. adresów komórek, które są widoczne po włączeniu filtra lub ewentualnie po prostu zawartości tych komórek. Czy jest wbudowana jakaś zmienna lub funkcja do tego? Nie mogę znaleźć, proszę...
Fajne by było makro, które po wywołaniu uzupełni komórkę linkiem. Pewnie jest do zrobienia. Niestety nie mogę teraz testować.. :(
Witam, Potrzebuję pomocy w napisaniu makra, zapisującego wybrane komórki z arkusza do pliku .txt. Mam Arkusz1 i chciał bym aby z komórek od A7 do komórki A30 pobrało dane i zapisało je do pliku .txt jako kolejne rekordy. Zapisany plik miał by mieć nazwę pobraną z Arkusza1 z komórki B2. Na koniec jeszcze rozszerzenie pliku miało by się zmienić na .dxf....
Napisz to jaśniej i załącz przykładowy plik. Jeśli plik źródłowy jest otwarty (w tej samej instancji Excela), to nie jest potrzebna ścieżka, wystarczy nazwa pliku. Co to znaczy: "Wprowadzenie odwołania do innego (otwartego pliku)"? Gdzie ma być wprowadzone to odwołanie? Do komórki arkusza? Do jakiegoś okna dialogowego wyświetlonego przez makro? Czy...
No, w takiej formie to można już coś tam pokombinować... Zobacz pliki z załączników. Po kliknięciu przycisku "Import order" możesz wybrać plik z zamówieniem - ważne, żeby miał taki układ danych, jak w testowym zamówieniu. Plus wszystkie rzeczy, o których wcześniej mówiłem - wyjątkiem jest lista klientów w pliku produkcyjnym - jednak nie musi być taka...
Poprawiony kod, zmienne masz opisane, więc pozostaje przypisać do nich odpowiednie wartości (makro nie sprawdza czy arkusze o zadanych nazwach istnieją w skoroszycie): [syntax=vb]Sub kody_RegEXP() Dim sShSrc$ 'nazwa arkusza źródłowego Dim lRowSrc& 'od którego wiersza sprawdzać dane wejściowe Dim sCol$ 'kolumna z danymi wejściowymi Dim sShDest$ 'nazwa...
Komórki z nazwami nie muszą być warunkowe. Wystarczy =Menu!C10, =Menu!C12, itd. lub wpisz "z palca". Nazwę zakresu też już masz. Skopiuj makro "Druknij" i zmień: .PrintOut Copies:=1 na .PrintPreview Dla przykładu najpierw podmień sobie w "Druknij" i zobacz efekt.
automatyczne nadawanie nazw plikom tak aby po zapisaniu bazowego pliku generował się jego kolejny numer (x+1)+nazwa z komórki a1
Wydaje się, że masz problem z odkryciem arkuszy oznaczonych jako “very hidden” w Excelu przy użyciu funkcji komórek (cells). Oto kilka wskazówek, które mogą Ci pomóc: Użyj stałej xlVeryHidden: W makrach VBA możesz użyć właściwości Visible, aby ukryć lub odkryć arkusz. Wartość xlVeryHidden ukrywa arkusz i uniemożliwia jego wyświetlanie w oknie Excela....
Witam. Potrzebuję rozwiązać dwa problemy. 1. W skoroszycie, pierwszym arkuszem o nazwie "lista" jest lista nazwisk umieszczona pionowo w kolumnie "A". W kolejnym arkuszu o nazwie "001" muszę wczytać zawartość komórki A1 z arkusza "lista", w kolejnym arkuszu o nazwie "002" wczytać ma się zawartość komórki A2 z arkusza "lista" itd. 2. Z uwagi na fakt,...
Witam Panowie potrzebuję pomocy przy stworzeniu makra które: Będzie wyszukiwało Komórkę w drugim arkuszu o takiej samej nazwie jak w komórce B18 w pierwszym arkuszu i dodawało do komórki przesuniętej o dwie kolumny w drugim arkuszu wartość komórki K18. Ktoś pomoże? Pozdrawiam
Witam, potrzebuję utworzyć makro w Excelu tworzące pliki na podstawie listy znajdującej się w innym pliku Excel, Skoroszyt docelowy zawiera kilka arkuszy o różnej budowie i określonych nazwach, chciałbym te nazwy również importować z pliku zawierającego listę. Dodatkowo chciałbym aby była możliwość wstawienia z listy określonych wartości w konkretnej...
Cześć, oglądam tutorialu o VBA, próbuje coś napisać, ale programowanie zawsze mnie przerastało. Proszę o pomoc przy stworzeniu makro. Posiadam plik Excel z 6 arkuszami (nazwy od A do F). W każdym z arkuszy 3 górne wiersze są zajęte przez nagłówki kolumn (dane zaczynają się od 4 wiersza). Chciałbym aby makro w pierwszej kolejności czyściło arkusz A w...
Tu trzeba już więcej wiedzy z VBA i czasu (którego niestety na chwilą obecną nie mam - gdyż makra znam na poziomie podstawowym i trzeba by było szukać i nagrywać a później wnioskować i wykorzystywać to co potrzebne). Jednak przedstawię pewien tok który może ci pomoże (bo o większość rzeczy już się pytałeś na forum i powinieneś je znać - szczególnie...
Witam Chodzi o to podam przykład działania makra Z Arkusza kraje1 program kopiuje nazwę jednego kraju z listy- pierwszego i wstawia nazwę tego kraju w komórkę J1 w arkuszu Dane1, następnie kopiuje dane do 2 arkuszy , następnie przechodzi do następnego kraju z listy drugiego i wstawia nazwę w komórkę J1 (kasując poprzednia) dane się przeliczają dla drugiego...
Private Sub KategorieWydatków_Click() Range("C2") = KategorieWydatków.Value End Sub I niestety jak uruchomiłem pierwsze makro wyświetla listę ale jak klikam na wartość z listy niestety nie wstawia się ona w komórkę C2. Witam KategorieWydatków.Show tak masz nazwany userform a listbox też ma taką samą nazwę?
Witam serdecznie. Potrzebuję stworzyć makro które pozwoli mi seryjnie szukać wyniku za pomocą goal.seek kodem VBA Wiec Tak mam arkusz o nazwie "Brudnopis" zakres komórek od A5 do AT 330 Wynik które chcę zmienić jest w kolumnie K (wynik formuł) (niebieski) Parametr zmieniany - Kolumna J (żółty) Wynik który chcę uzyskać - Kolumna L (szary) Problemem jest...
JRV, Twoje rozwiązanie nie zadziała, bo działa na 'wirtualnej komórce c'. Ja również na początku napisałem taki sam kod, jak Ty.:) Niech Autor doda sobie nazwę arkusza.
o ile samo makro po wprowadzeniu w zmiany udaje mi się uruchomić to nie potrafię wykombinować jak wyszukać nazwę(kolumna A) z arkusza nr 1 w arkuszu nr 3 i wrzucić w odpowiednie miejsce skopiowaną wartość komórki "Data"
1. #N/D! - da się wyeliminować przez dodanie na zewnątrz formuły JEŻELI.ND albo JEŻELI.BŁĄD. Obie działają podobnie do funkcji JEŻELI, więc nie powinieneś mieć z nimi kłopotów 2. Da radę przeszukać kilka arkuszy jednocześnie - wystarczy w zakresie podać adresy zakresów w poszczególnych arkuszach rozdzielone średnikami, np. Arkusz1!C1:C3;Arkusz2!B1:B3,...
po kliknięciu nazwy obrazka w komórce A1 Tam będzie kilka takich nazww? Jeśli tylko jedna w A1, to nie ma znaczenia, czy jest nazwa, obrazek będzie tylko jedyn. p.s. Obrazek może być na pierwszym arkuszu, tylko nie widoczne.
Witam Mam plik " Wzor" i z niego muszę dokonać drukowania określonych arkuszy. Makro ma zadanie wydrukować najpierw arkusz o nazwie "AAA"; potem arkusz "BBB". Drukowanie jest wysyłane na domyślną drukarkę i drukowanie dwustronne. :idea: Jak ja to bym widziała :D : W arkuszu "MENU" w komórce "F5" makro wstawia liczbę "1". Wtedy zadziałają funkcje Excel...
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.
Witam, jestem całkiem zielony w arkuszach kalkulacyjny jeśli chodzi o makra i potrzebuję pomocy. Utworzyłem skoroszyt w którym są trzy arkusze. Pierwszy to tabela przestawna, drugi to arkusz zbiorczy a trzeci to raport o nazwie '01'. Potrzebuję napisać następujące makro po włączeniu którego wartości z komórek od AS5 do BU5 z raportu będą kopiowane do...
Witam serdecznie, chciałbym napisać makro do excela, może ktoś mi pomoże z tematem A mianowicie: gotowy arkusz z uzupełnionymi danymi chciałbym zapisać w nowym pliku (sam chce wpisywać nazwę tego pliku. Nowy plik a arkuszem powinien wyglądać tak samo z tym, że kilka komórek ma być skopiowanych w inne miejsca a część usunięta do nowej edycji. Być może...
Dziękuję za odpowiedzi ale uszczegóławiam pytanie. Stworzyłem skoroszyt, w którym niektóre dane muszą być niewidoczne dla osób z niego korzystających. Wszystkie zastosowane przeze mnie ograniczenia i blokady nie wykluczają sytuacji, w której znając nazwę ukrytego arkusza mogę odczytać z niego komórkę po komórce z poziomu innego arkusza, albo z poziomu...
nazwa arkusza excel komórki excel makro nazwa arkusza makro nazwa arkusza excel
plyta glowna fujitsu czujnik tlenku węgla czadu electrolux blokady transportowe
chevrolet captiva radio chevrolet captiva radio
Zgodność faz w instalacji fotowoltaicznej z licznikiem Spadek jakości oleju w silniku Opel Corsa 1.4E
