excel makro aktywny arkusz

[VBA][Excel] - Makro na aktywowanie arkusza z poziomu już aktywnego

[syntax=vbscript] On Error GoTo SubStop For Each Sheet In Worksheets Sheet.Test Next Sheet SubStop: On Error GoTo 0[/syntax]

Excel-makro-kopiuj i wklej do nowo utorzonego arkusza jeśli suma >20

Po pierwsze - ustaw breakpoint'y i zobacz, w którym miejscu Cie "wyrzuca". Po drugie - po osiągnięciu sumy >20 przechodzisz do nowego arkusza, coś tam wklejasz po czym nie wracasz do pierwotnego arkusza - a Twój kod pracuje na arkuszu w tym momencie aktywnym.

Nie znalazłeś odpowiedzi? Zadaj pytanie Sztucznej Inteligencji

EXCEL - Makro do usuwania przeterminowanych dat w kolumnie 'AI'

If k <= Date Then Cells(k.Row, k.Column) = "" A jeżeli zakres nie jest w aktywnym arkuszu?

VBA EXCEL - Makro do kopiowania arkusza Day jako Next Day1, Next Day2

Nagraj makro (kopiuj arkusz i zmiana nazwy) i pod nazwę podstaw 8 od lewej & 1 od prawej + 1 nazwy aktywnego.

Excel - jak zastosować makro do wielu arkuszy w jednym pliku?

1. Umieść makro w module standardowym (jeśli jest w kodzie arkusza). 2. Odszukaj i podmień wszystkie odwołania do arkusza Np Worksheets("Arkusz1") na ActiveSheet . Można dla ułatwienia przypisać skrót klawiszowy i teraz wystarczy uruchomić makro w dowolnym, aktywnym arkuszu.

Excel VBA: Parametry dla Find i Replace do wyszukiwania danych w skoroszycie lub arkuszu

Witam, Jaki parametr należy wpisać do Find i Replace by makro wyszukiwało /zamieniało/ dane w zależności od potrzeb w całym skoroszycie lub tylko w aktywnym arkuszu.

Excel - Makro do usuwania formatowań warunkowych ze wszystkich arkuszy

Witam. Jak makrem usunąć wszystkie formatowania warunkowe, wszystkie znaczy ze wszystkich arkuszy pliku? Mam taki kod jak poniżej ale on usuwa tylko formatowania z aktywnego arkusza: [syntax=vbnet]Cells.FormatConditions.Del...

Jak zmodyfikować makro Excel dla wielu arkuszy - podświetlanie wiersza

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...

Excel - Makro wysyłające maile na podstawie numeru sklepu i bazy adresów

Najpierw musisz przygotować dane które chcesz wysłać, czyli jakiś raport. Możesz to zapisać do pliku, albo umieścić w roboczym arkuszu (to bym zalecał, bo szybsze). Następnie możesz wysłać plik lub aktywny (zawsze możesz go uaktywnić) arkusz.

VBA- przeszukiwanie wielu arkuszy i wypisywanie wierszy - EXCEL

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...

[EXCEL] Jak uruchomić makro w tle w Excelu bez przerywania pracy?

Spróbuj wyłączyć odświeżanie: Application.ScreenUpdating=False za linią z Windows(rap).Activate. Włącz na końcu =True Jeśli nie zadziała można przerobić kod tak, żeby nie było potrzeby "biegania" po arkuszach (bez activate, select, etc)... Np fragment z sortowaniem (nie odwołuj się do okna instancji, tylko do konkretów). W przykładzie przypisanie i...

Excel VBA - makro sprawdzające wartości ujemne w Arkuszu1, automatyczne uruchamianie

Bardzo dziękuję! :) Jeszcze mam ostatnie pytanie: czy jest możliwość aby makro sprawdzało te komórki w arkuszu 1 ale komunikat wyświetlało w arkuszu 2? (albo tym, który będzie w danej chwili aktywny). Bo z kolei to C11 i C10 zależą od wartości w innym arkuszu.

VBA EXCEL - Makro po wypełnieniu komórki tworzy nowy arkusz i dodaje hiperłącze

same zwykłe litery, czy jest możliwość aby makro brało aktywną komórkę z formularza wzór a nie z formularza set?

Excel - Jak automatycznie oddzielić tekst na kolumny przy wklejaniu danych?

Makro umieść w kodzie arkusza, prawy pm i wybierz "Wyświetl kod" lub wklej przez edytor. Równie dobrze można wrzucić do modułu, wtedy makro (jeśli nie sprecyzujesz) będzie działać w aktywnym arkuszu.

Excel - Wyciągnięcie daty z tekstu wpisanego w komórkę

W tym przypadku to przejdzie, ale nie zawsze Jak nie będzie takiego przypadku szczególnego :D to proponuję Ci makro "wyszukajdaty", które uruchamiane skrótem ctrl+w wypisze w aktywnym arkuszu w jednej kolumnie pierwsze daty, a w drugiej - drugie daty :spoko: - tak jak na zrzucie i w załączonym pliku. 1054371 1054372

Jak stworzyć makro drukujące Arkusz 2 w Excel 2007?

Metoda PrintOut z klasy workshet nie powiodła się Uruchamiasz makro z aktywnego arkusza "formularz" :!: a drukujesz inny arkusz "oswiadczenie" :idea: Twój wcześniejszy kod jest jednoznaczny :D tj. ActiveWindow. Selected Sheets

EXCEL VBA - Makro wstawiające dodatkowe nagłówki do tabel

Używałem tej opcji ale tylko dla "zwykłych tabel" czyli komórek obramowanych itp. Jak w Excel mam wstawione table przez "wstaw tabele" to nie ma możliwości wykonywania operacji na więcej niż jednym arkuszu w obszarze tabeli (opcja wstaw kolumny jest nie aktywna).

Excel (VBA) - wyszukiwanie komórki w tabeli przestawnej

W arkuszu "raport" zaznaczam jako aktywną komórkę E5. Naciskam przycisk "pokaż szczegóły" do którego podpięte jest makro i otrzymuję to co znajduje się w arkuszu "wynik kliknięcia".

Excel-vba - kopiowanie w petli, problem z podaniem zakresu cells

Prawdopodobnie uruchamiasz makro z aktywnym arkuszem innym niż "z". Każdy pojedynczy zakres w tym przypadku musi być precyzyjny, nawet jako argument. Path.Range(Path.Cells(), Path.Cells()) Masz do wyboru (zwróć uwagi na kropki przed Cells): [syntax=vb]with mainwkb.Worksheets("z") .Range(.Cells(i, 1), .Cells(i, 3)).copy 'itd End with 'co jest tym samym...

Excel - Makro do automatycznego wydruku tabeli z dostawami na koniec dnia

Szablon PZ musiałbyś najpierw utworzyć w dodatkowym arkuszu. Umieszczenie w nim danych i wydruk, to już tylko "chwila" Odn. zegara Wklej do modułu [syntax=vbscript]Option Private Module Sub Zegar() If Time > "23:49:00" And Time < "23:59:00" Then Druknij End If NextTick = Now + TimeValue("00:10:00") Application.OnTime NextTick, "UpdateClock" End...

Excel - Jak zastosować makro do dzielenia komórek w 25 tys. arkuszy?

Pojawia mi się błąd next without for a bez next a stosuje tylko do aktywnego arkusza

Excel - jak automatycznie sortować komórki z wartościami różnymi od 0?

Nagraj makro sortowania i umieść je w kodzie arkusza przy zdarzeniu Worksheet_Change. Możesz ograniczyć aktywny zakres do jednej kolumny.

Jak usunąć makro z arkusza skopiowanego do nowego pliku Excel?

Oczywiście to co kolega (at)PRL zaproponował to jedna z możliwości, możesz również przesłać kod z aktywnego skoroszytu do innego bez "zewnętrznego" pliku.

Excel VBA - wywoływanie User Form aktywną komórką

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.

Excel: Jak stworzyć makro do weryfikacji numerów seryjnych?

No to już tylko makro. Np takie Sub Wpisz_Jest() Columns("A:A").Sel... On Error Resume Next wiersz = Selection.Find(What:=Range(&... After:=ActiveCell, LookAt:=xlWhole).Row Cells(wiersz, 3) = "Jest" Cells(1, 2).Select End Sub Możesz je umieścić w kodzie arkusza...

VBA,EXCEL - podwójna pętla do kopiowania/segregowania danych

Co do twojego kodu, .Range/.Cells - odwołuje się do aktywnego arkusza? Chodzi mi o te kropki na początku. Nie, odwołuje się do obiektu - w tym wypadku arkusza - użytego w otaczającej klauzuli With... To taki skrótowiec, którzy przed kropką wstawia to, co jest w With, czyli zamiast powtarzać: Przy próbie tworzenia kolejnego arkusza wywala błąd 1004...

{Excel, VBA} Jak stworzyć makro z goal.seek z pominięciem komórek dla których nie szukam wyniku?

Ja w "międzyczasie" napisałem coś takiego: [syntax=vbscript]Sub GoalSeekinRange() Dim i As Long, RngForm As Range, wks As Worksheet Dim RngGoal As Range, Rngx As Range Set wks = Worksheets("Brudnopis") Set RngGoal = wks.Range("L5:L9") Set Rngx = wks.Range("J5:J9") Set RngForm = wks.Range("K5:K9") For i = 1 To RngGoal.Count If IsNumeric(RngGoal(i)) And...

Excel VBA – makro kopiujące arkusz „xyz” do nowego pliku o nazwie z B3 z formatowaniem

Witam, No to jeszcze jedno pytanko. W moim pliku "1" dołożyłem drugi przycisk "CommandButton1", który zapisuje mi dane i zamyka skoroszyt. Chciałbym zrobić tak, że gdy "aktywny" jest pierwszy przycisk to ten mój (do zapisywania) jest nieaktywny. I na odwrót. Jak to zrobić??

Jak zmodyfikować makro w Excel 2010, aby drukowało dwustronnie?

Nie zaznaczam zbiorczo wszystkich arkuszy i tak drukuje. Sytuacja ma miejsce jeśli wybiorę ręcznie jakieś określone arkusze i dam drukuj aktywne arkusze to drukuje dwustronnie. W moim makro nie ma aktywnych arkuszy więc może to jest przyczyną wydruku pojedynczego. Jutro wypróbuję twoje makro i się odezwę. Dodano po 15 Niestety makro "zbiorczo" nie działa....

Makro w Excelu: Kopiowanie danych z aktywnego wiersza do końca arkusza

No jak chcesz koniecznie kopować: Sub Kopio_aktyw_wiersza() ' ' Kopiowanie danych z aktywnego wiersza kol. A do D ' aktywny = Selection.Row kolumna = 1 ostatnia = Cells(Rows.Count, kolumna).End(xlUp).Row ' bez selekcji od razu kopiowanie wybranych komórek : Range(Cells(aktywny, 1), Cells(aktywny, 4)).Copy 'kopiowanie danych z aktywnego wiersza zakres...

MS Excel: Makro zmieniające kolor kształtów na innym arkuszu

Zrozum swoje makro a będzie ci łatwiej Sheets(1).Select 'Zaznacz arkusz pierwszy (to nie do końca "Arkusz1") ActiveSheet.Shapes.Range(Array("Prostoką... 1")).Select ' W zaznaczonym (wcześniej) arkuszu zaznacz "prostokąt 1" With Selection.ShapeRange.Fill ' w wybranej selekcji (wyżej) ustaw ... Robię poprawkę na czuja/teoretyczne. Zakładam że "twoje" makro...

Makro Excel VBA - jak odwołać się do komórki po nazwie?

jakos nadal nie działa pojawia się komunikat Application.defined or object-defined error Dodano po 7 Jeśli tak zrobię to faktycznie jest ok wksz.Activate MsgBox Range("status") Jeśli wksz.Range("status") to już błąd Ja chce kopiować komórki pomiędzy arkuszami wiec użyłem polecenia 'Cells(NextRow, 1) = wksz.Range("status") gdzie cells jest poleceniem...

Excel-Blok. zapisanych komórek - nie zapisane dalej mozliwe do edycji

przekopiowałem kod do vba w moim pliku przestało to wszystko działać Zaproponowałem kod prywatny do obsługi skoroszytu - zatem musisz go wkleić dla obiektu ThisWorkbook :!: Po skopiowaniu kodu i dostosowaniu nazwy roboczego arkusza - plik musi być zapisany jako xlsm :!: Ze względu na zastosowane uproszczenia zapisu kodu - każdorazowo trzeba "wychodzić"...

Jak zaznaczyć komórki od aktywnej do wiersza 3000 w VBA Excel?

#N/D! w Twoim arkuszu prawdopodobnie nie jest stałą tekstową, lecz wynikiem formuły. Metoda Replace, którą chciałeś zastosować odnosi się do stałych i do fragmentów formuł (ale tak jak zostały zapisane w komórce, a nie do ich wyników). W tym przypadku sugerowałbym użycie np. kodu: [syntax=vbscript]Dim r As Range For Each r In Range("G2:G10") If IsError(r)...

VBA/Excel: Makro kopiujące wiersze przy spełnieniu warunku tak

Jak rozumiem, dane masz w arkuszu Wk (aktywnym) i chcesz je przekopiować do arkusza Ww (zestawienie)? Jeśli tak, po lewej stronie musi być odniesienie do arkusza, do którego kopiujesz dane (Ww), a po prawej - arkusza źródłowego (Wk). Dlatego też dziwię się, że piszesz że to zdziałało odwrotnie. Jeden szczegół na który nie zwróciłem uwagi - jeżeli w...

Excel VBA: Makro do wypełnienia dat w komórkach A2 w 31 arkuszach

Twój kod nie działa. Myślałem, że wiesz o tym, a jak nie wierzysz to porównaj co robi Twoje makro, a co jest mi potrzebne. W pole A2 wpisuje datę z dniem równym nazwie aktywnego arkusza..... Drwiny z 31 lutego to...żenua, wobec tego, że mam arkusz taki sam na 12 miesięcy roku.

[VBA] EXCEL - Makro dodające wiersz - wydłużona praca przy akruszu udostępnionym

Cześć, mam dość rozbudowany plik - są oczywiście funkcje, formatowania warunkowe i makra. Wszystko działa płynnie do momentu włączenia funkcji udostępniania arkusza (w tradycyjnej formie, Excel 2016). Jedno z makr jest odpowiedzialne za wstawienie poniżej aktywnego wiersza nowych wierszy w ilości podanej przez użytkownika i przeklejenie tam zawartości...

Excel - dynamiczna ścieżka w WYSZUKAJ.PIONOWO z ZŁĄCZ.TEKSTY

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...

Excel - makra kopiujące kolumny i sumujące kilka wierszy w jeden

Przykładowe makro: [syntax=vbscript]Sub numery() Dim coll As New Collection Dim ow As Long, i As Long ow = Range("A" & Rows.Count).End(xlUp).Row On Error Resume Next For i = 2 To ow If Range("A" & i).Value <> vbNullString Then coll.Add coll.Count + 1, Range("A" & i).Value If Err = 0 Then Range("B" & i).Value = coll.Count Else Err.Clear...

Excel makro z wyborem arkusza do wklejenia danych - jak to zrobić?

Dzięki wielki wszystko ok Jeszcze was trochę po mecze. A jak przerobić to makro tak żeby działało na zakresach to znaczy z jednego pliku kopiuje np. plik A sheets(1).range("C6:E16";"B19:B20") i żeby te zakresy wklejało mi w tym aktywnym pliku w różne miejsca np. zakres1Plik B Sheets(1).range("H6:J16";"G19:G20"), zakres2 plik B sheets(1).range("M6:O16";"L19:L20")...

Excel - Jak wyszukać i przenieść dane osób na urlopie do innego arkusza?

Do skopiowania wyników filtrowania w inne miejsce aktywnego arkusza. Można to obejść w VBA. Wiec nie rozumiem w czym problem? W arkusz1 masz bazę. W arkusz2(aktywny) kryteria filtrowania i określenie miejsce w które chcesz odfiltrowane dane umieścić. Jeżeli operacja ma być jednorazowa, robisz to "z ręki". Jeżeli robisz to często, lub potrzebujesz odfiltrowania...

Excel VBA - kopiowanie,transponowanie i wklejanie w nowym wierszu

tu masz makro kopiujące te dane z arkusz1 z komórkek b5:b10 do aktywnego arkusza do kolumny D kopiowanie z kolumny w Arkusz1, następnie transpozycja i wklejenie w wierszu w aktywnym arkuszu (każde użycie makra wkleja do kolejnego wolnego wiersza wiersza)

Excel, tworzenie makra VBA dla połączenia kolumn i przypisywania wartości do listy

Cześć. Można próbować tak: [syntax=vbnet]Sub Makro1() Const oc1 = 1 ' wyjście do kolumny 1 Const oc2 = 3 ' wyjscie do kolumny 3 Const wks = "Sheet2" ' arkusz wyjsciowy ' Sheets(wks).Cells.Delete ' mozna odkomentowac aby czyscic caly arkusz przed wykonaniem makro Dim x, r, c As Integer r = 2 c = 2 x = 1 Do While Cells(r, 1).Value <> "" Do While...

[VBA Excel] - Filtr dat od do nie wyświetla danych, tylko po kliknięciu ok

Próbuje zrobić makro które po wprowadzeniu w inputbox dat od i dat do założy filtr na dane i zapisze go do PDF problem jest z filtrem. Po wprowadzeniu nie wyświetla żadnych danych mimo iż kryteria się wprowadzają, dopiero jak kliknę "ok". Dane się wyświetlają, poniżej kod: Dim data_Od As Date data_Od = InputBox("Podaj date od:") Dim data_do As Date...

EXCEL VBA - odczyt metodą ADODB z otwartego pliku (udział sieciowy)

Witam serdecznie, Mam problem z odczytem danych metodą ADODB z innego arkusza Excel będącego na udziale sieciowym i który może być otwarty przez inną osobę na swoim komputerze. Korzystam z funkcji napisanej przez Tajana: [url=http://www.excelforum.pl/viewtopic.... do ExcelForum - Funkcja GetValue. O ile funkcja ma podstawowe zadanie czytać...

Excel VBA: Jak zapamiętać i przywrócić aktywny arkusz przy zamykaniu i otwieraniu?

Mam jakiś tam plik w Excelu który pracuje na podstawie makro, mam w tym pliku kilka arkuszy. Ponieważ plik będzie uruchamiany na kilku komputerach a zarazem posiada kilka zabezpieczeń wpadłem na pomysł aby podczas zamykania skoroszytu nastąpiło ukrycie wszystkich arkuszy oprócz jednego. Wszystko działa OK, ale i zarazem denerwuje gdyż po ponownym uruchomieniu...

(VBA) EXCEL - przenoszenie i łączenie kolumn w nowych skoroszytach według filtru

A co jeszcze zostanie? Chyba nic.;) Czyli faktycznie przegiąłem... No nic , będę musiał walczyć dalej sam. Pętelka , którą mam (makro) pięknie skacze po arkuszach i wywołuje makro do wysyłki email , przerobiłem to makro aby wysyłało na adres z komórki "D1" z aktywnego arkusza - no i ładnie to wysyła. Przecież nie pisałem "macie mi to zrobić" tylko...

Excel – zacinanie się i przenoszenie między plikami przy pracy na wielu arkuszach

Powiem tak: Nie spotkałem się z takim problemem ze "zwykłymi" plikami excela. Jednak wystarczy jeden plik z nieodpowiednio napisanym makrem który "rozwala" wszystko. Ktoś pisząc makro np. nie przewidział, że może być aktywny inny arkusz niż zamierzony w kodzie makra lub nie przewidział wyłączenia uruchomionej jakiejś procedury która może czeka na jakąś...

vba - zamkniecie pliku po upywie danego casu ktos wie jak to zrobic

Teoretycznie można coś podobnego zrobić - choć w praktyce jest to bardzo złe rozwiązanie, a już zwłaszcza na plikach w pracy, gdzie istotne jest bezpieczeństwo i pewność danych... Może najpierw wykład, potem kod ;) Garść faktów: Excel nie nadaje się do pracy wielozadaniowej (czy równoległej, zwał jak zwał). Teoretycznie można w pliku włączyć jakiś tam...

VBA excel-edycja makra do uzupełnianai danych i wydruku

Który arkusz jest aktywny w trakcie podglądu ? Dlaczego właściwie do identyfikacji numeru wiersza, z którego pobierane mają być dane, służy zaznaczenie jakiejś jego komórki/komórek, czy to jedyny mechanizm, który można zastosować ? Makro aktywuje na poglądzie arkusz Etykieta. W podglądzie nie ma danych uzupełnionych z arkusza Baza oraz gubi się odwołanie.

VBA: Błąd przy kopiowaniu danych między arkuszami Excel

Siema, Mam napisane makro vba, żeby kopiowało mi dane z komórki zawartej w aktywnym pliku excel do drugiego aktywnego. Pisałem to na dwa sposoby i za każdym razem wywala mi błąd. Poradźcie proszę. Będę wdzięczny za każdą pomoc! 1. Tutaj wywala błąd - Compile Error: Sub or Function not defined. Sub screen() ' ' screen Macro ' ' Workbook(cale.xls).Activate...

excel 2013 makro zapisujace xls w pdfie - zapis do pliku pdf pod okreslona nazwa

WItam, pomozcie, temat niby prosty, ale jednak nie moge sobie z nim poradzic. potrzebuje makra, ktore zapisywaloby dany arkusz excela (aktywny w danym momencie) w formacie pdf, nazwa tego pliku bylaby brana z dwoch komorek tego arkusza, np e1 I e5, a sam plik pdf zapisywalby sie na pulpicie w folderze PDF. po skonczonym dzialaniu wyskakuje komunikat...

Jak dodać czyszczenie danych po skopiowaniu w VBA Excel?

Napisałam proste makro kopiujące zakres komórek z aktywnego arkusza do archiwum. Chciałabym, aby tabela z aktywnego arkusza po zapisaniu do archiwum automatycznie "się wyczyściła". Dodatkowym problemem jest również makro działające w arkuszu "BAZA" - zaznaczam tu dowolne pozycje w kolumnie K poprzez dwukrotne kliknięcie myszy, po czym wybieram przyciskiem...

VBA Excel - Kopiowanie danych z innych plików do pliku zbiorczego-poprawa kodu

Dzięki za wskazówki :) Korzystając z Twoich rad wklepałem kod ale niestety jak wgrywam plik nic się nie dzieje, tj nie są przepisywane żadne wartości i nie mam pojęcia gdzie leży błąd. Przypuszczam, że diabeł jak zwykle tkwi w szczegółach... Po pierwsze: zrób przypisanie do arkusza tak, jak Ci proponowałem, nie MsgBox (Dane.Name) ) Po drugie, przy...

[Excel] [VBA] LIsta wyboru z podziałem na grupy i podgrupy

... Jak naciśniemy w arkuszu Kosztorys pole B7 czyli to białe puste szybko dwa razy to otwiera się Listbox z wyborem danej pracy ... Wszystko działa ok ... No niezupełnie ... ' ListBox1_Click ' usuwa z komórki ' AB7 ' wartość liczbową i po zamknięciu okna nie można go już ponownie otworzyć bez wstawienia tam liczby. ... Potrzebne są tylko trzy zmiany....

MS EXCEL 2010 - Połączenie dwóch kodów VBA oraz makra

Witam sympatyków MS Excel W sieci znalazłem dwa ciekawe kody oraz makro, które chciał bym ze sobą połączyć tak żeby działały poprawnie we wspólnym arkuszu. Jak większość uczących się VBA napotkałem problem. Na jednej stronie znalazłem dość ciekawy opis formatowania warunkowego wraz z kodem VBA służącym do zaznaczania (wyróżniania) aktywnego wiersza...

Excel VBA: Jak napisać makro działające na dwóch otwartych plikach?

No i widzisz bo pracujesz na aktywnym arkuszu. Jak sobie przypiszesz do zmiennej workbook to nie musisz fokusować drugiego okna. Autofiltr też możesz zrobić na obiekcie. A pliku do zmiennej nie musisz otwierać możesz go przypisać: [syntax=vbscript] Set Wrkb2 = Workbooks("zeszyt2.xlsb") [/syntax] A potem się odwołujesz do tego obiektu. Aktywacje możesz...

[Excel] lista rozwijana w zależności od danych w tabeli

Ja zaproponuje takie wskazówki: Proponuję dodać jeszcze jeden arkusz (później ukryty) np o nazwie słownik. W arkuszu tym stworzył bym za np pomocą funkcji jeżeli(), licz.jeżeli(), max() i wyszukaj.pionowo() "aktywny" słownik firm na podstawie danych z arkusza "lista...". Tak zrobioną listę/słownik powiązałbym z pierwszym okienkiem wyboru w arkuszu głównym....

VBA Excel - Makro do kopiowania danych między skoroszytami A i B

Kombinujesz jak koń pod górkę z tymi zakresami- skaczesz po arkuszach bez ładu i składu, to i nic dziwnego, że się to w którymś momencie rozjeżdża... Zrób raz, a porządnie, deklarację arkusza skąd i dokąd kopiujesz - a potem konsekwentnie się ich trzymaj przy kopiowaniu. Zakres Range i .Range to nie jest to samo - musisz uważać, co robisz. Odczytaj...

VBA Excel - Makro do zapisywania arkuszy jako PDF w odpowiednich folderach

Człowieku Ty jesteś jakimś magikiem normalnie!!!! dzięki - działa perfekto, jeszcze tylko jednej drobnej jak sądzę poprawki potrzebuje. W ty, nowym pliku xls przydałoby się podmienić nazwę (obecnie kopiuje z pierwotnego xlsx) na np "Arkusz1". I tak sobie myślę, przy przenoszeniu do nowego pliku xlsx kopiuje całość - a mógłby kopiować tylko to co jest...

Excel, VBA - makro uruchamiane przyciskiem powoduje błąd.

Jak dla mnie śp. pamięci "kozak vba" "Charles Pearson" http://www.cpearson.com/excel/optimize.h... Ciekawa lektura, na trochę dogłębniejszą analizę. Kiedyś Piotr Majcher (pmsocho na YT) w jednym ze swoich filmików pokazał zastosowanie "Miernika do szybkości wykonywania się formuł w Excelu" (https://youtu.be/fWI8kHAyFtg). Więc z chęcią kiedyś potestuję...

Excel_VBA: Instrukcja warunkowa na nieaktywnych skoroszytach

"Jaki sens ma deklarowanie zmiennej obiektowej typu Workbook w obrębie jednego skoroszytu (jak wynika z Twojego kodu)?" Moja odpowiedź dla naszego początkującego kolegi ma mieć walory edukacyjne, dlatego zastosowałem taką konstrukcję. Może się wydawać trochę bez sensu w tak prostym przypadku, ale przy złożonych aplikacjach mających setki może tysiące...

Excel - filtrowanie tabeli przestawnej i kopiowanie

Witam To jest makro wyszukane w jakiejś książce nie pamiętam. Tworzy nowe skoroszyty dla filtra z tabeli przestawnej. Zmień fragment aby tworzyło nowe arkusze Dodano po 6 Proponuję stronę helion.pl Tam do książek są przykłady na FTP. Skarbnica przykładów ;-)

VBA - Jak stworzyć makro do wydruku danych z arkusza w Excel?

Aby wydrukować jeden szablon, możesz użyć prostego przepisania wartości (lub nawet formuł): [syntax=vbscript]Arkusz2.Range("A1:E6").... 'wyczyść stare dane na szablonie Arkusz2.Range("A1").Value = Arkusz1.Range("A1").Value Arkusz2.Range("A3").Value = Arkusz1.Range("G5").Value Arkusz2.Range("A5").Value = Arkusz1.Range("G3").Value * 1000 & "...

Excel aktywacja przycisku macro z wyboru drop boxa.

Witam wszystkich forumowiczów, mam pytanie związane z Excelem 2013, a mianowicie czy mogę uaktywnić przycisk wykonujący makro z listy drop box. Bardziej dokładnie opisując: mam kolumnę z komórkami wyboru listy drop box i jeśli wszystkie są wypełnione to ostatnia komórka jest zdefiniowana jako drop box tak lub nie. Jeśli jest wybrane Nie to nic się nie...

Makro Excel do kopiowania zakresu komórek z Arkusza1 do Arkusza2 przy aktywnej D

Potrzebuję pomocy przy stworzeniu makra do kopiowania zakresu komórek z Arkusza1 do Arkusza 2. Wybieram np. komórkę Arkusz1:D7. Makro kopiuje komórki C7, D7,E7,F7,G7 i H7 i wkleja je do Arkusza2(C15, H15). Wybieram drugą komórkę np. Arkusz1:D25 i makro wkleja zaznaczony obszar do Arkusza2 w kolejny wiersz(C16, H16). Makro powinno działać tylko przy...

Excel VBA: Deklarowanie zmiennych dla całego modułu i operacje na arkuszach

Pliku xlsm nie mogę załączyć Zawsze możesz załączyć plik w formacie .xls albo skompresować swój plik np. do .zip i w tej postaci załączyć. Plik tekstowy też jest OK, ale nie można go uruchomić bez danych, więc można coś przeoczyć. Nie wiadomo z którego arkusza uruchamiasz makro. Zaraz na początku obliczasz numer ostatniego wiersza w kolumnie 18. arkusza...

VBA - makro - excel - odwołanie do kolejnych arkuszy

Jeżeli jednak chcesz wpisać do aktywnej komórki formułę łączącą dane z arkusza wsh, z ostatniego wiersza i kolumny 9 to należy to zapisać następująco:[syntax=vb] Row_komorki = ActiveCell.Row Column_komorki = ActiveCell.Column ActiveCell.FormulaR1C1 = "='" & wsh.Name & _ "'!R[" & ost_w - Row_komorki & "]C[" & 9 - Column_komorki & "]"[/syntax]

VBA Excel - makro do tworzenia raportu z tabeli przestawnej i kopiowania danych

Witam, W załączonym przykładzie w pliku Excel mam dwa arkusze: Dane oraz Tabela. W arkuszu Dane mam wstawioną tabelę z danymi, która jest na bieżąco uzupełniana przez różnych użytkowników. W arkuszu Tabela mam wstawioną tabelę przestawną która prezentuje dane z podziałem na osoby odpowiedzialne za dany temat i przyporządkowanymi jej tematami. Bardzo...

Excel VBA - Jak kopiować grafik z ukrytego arkusza?

ale to nie działa chyba dlatego że kod jest umieszczony w Module To nie to. Makro aktywuje arkusz o nazwie przypisanej do zmiennej 'grafik', dlatego ActiveSheet będzie zawsze Sheets(grafik). Najprościej byłoby przerobić je na procedurę z przekazaniem argumentu w postaci nazwy aktywnego arkusza. Ale jest jeszcze wiele niejasności... Najlepiej, gdybyś...

Excel VBA – Jak połączyć listy z kolumn Q, R, S, T, U do jednej kolumny V?

Nie chcę za bardzo wchodzić w pomysł kolegi adamasa bo nie wiem co było głównym celem i dlaczego to zrobił tak a nie inaczej. Zaproponuje trochę inne rozwiązanie, ale ponieważ nie znam całego kodu i intencji arkusza może być kłopot z działaniem (np wcześniejsza ochrona arkusza) Zakładam jak piszesz, że nazwiska w danych kolumnach są posortowane a właściwie...

Excel VBA: Jak przefiltrować tabelę po dzisiejszej dacie i usunąć filtry?

Witam, na wstępie mówię, że przeszukałem już fora i nie udało mi się znaleźć rozwiązanie mojego problemu, a do rzeczy... Potrzebuję przefiltrować tabelę po dzisiejszej dacie. Mam dość rozbudowany plik Excela, (mnóstwo kolumn i wierszy), a w jednej z kolumn datę. Chcę żeby po uruchomieniu pliku Excela, makro przefiltrowało mi tylko wiersze z dzisiejszą...

[Excel] Jak makro może wpisywać datę w komórce z przyciskiem?

Witam wszystkich, Chciałem wykorzystać kalendarz w swoim arkuszu z http://www.elektroda.pl/rtvforum/topic14... Przypisałem go do przycisku. Chciałem, żeby makro nie wpisywało mi daty w aktywnej komórce, tylko w komórce gdzie znajduję się przycisk. Chciałem stworzyć kilkadziesiąt - około 70, takich przycisków w jednym skoroszycie. Czy nie będzie...

[EXCEL] Jak wykluczyć arkusz z kopiowania komórek w makrze VBA?

Problem został rozwiązany, napisałem kod od nowa ;) A co do aktywnego okna z kodem na zrzucie to on pojawiał się sam gdy odpalałem makro w skoroszycie. Po odpaleniu pojawiał mi się edytor VSB i wyskakiwało właśnie to okno. Dzięki za pomoc Sprawa zamknięta.

VBA Excel - Formatowanie wybranego tekstu w komórce

Wielkie dzięki. To jest to o co mi chodziło. Do pełni szczęścia brakuje mi tylko tego, aby makro działało również wtedy, gdy tekst w dowolnej komórce kolumny A jest zaciągany z innego arkusza np. w komórce A5 jest wpisana formuła =Sheet2!D1 lub w dowolnej komórce kolumny A aktywnego arkusza wpisana jest np. formuła ="data cos tam"&Sheet2!A1 Da się tak...

excel vba - komunikat o nie wypełnieniu komórki jeżeli warunek

Dzień dobry, Proszę spróbować zastosować takie makro: [syntax=vb]Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim s As Long, n As Long, i As Long With ActiveSheet.UsedRange s = .Row n = .Rows.Count For i = 1 To n If .Cells(i, "A") > 0 And .Cells(i, "K") = "" Then .Cells(i, "K").Activate MsgBox ("Komórka K" & i + s - 1 & " nie została wypełniona."...

Eksport z Excela do Pdf. Jak zapisywać wybrane arkusze

Mam Makro, które pobierając dane z Arkusza zapisuje aktywny arkusz w lokalizacji określonej w komórce arkusza pod nazwą również pobieraną z komórki. Ograniczeniem jest to, że zapisywany jest aktywny arkusz. Co dopisać, aby do pdf były zapisywane arkusze, których nazwy również byłyby pobierane z komórki wskazanego arkusza? [syntax=vbscript]sub Export_to_pdf()...

excel VBA - Kopiowanie danych z innego pliku - co tu nie gra??

1. Następnym razem rozpocznij nowy wątek. 2. jak już makro zadziała, to dane się kopiują Jakim cudem? Kolejność działań: 1. Open (po otwarciu skoroszyt jest aktywny) 2. Wybranie arkusza - Sheets().Select 3. Kopiowanie - Range().Copy 4. Wybranie skoroszytu docelowego - Workbooks().Activate 5. Wybór arkusza docelowego - Sheets().Select 6. Wybór lewej,...

Excel VBA – jak scalić i obramować komórki kodem w programie magazynowym?

Jeśli makro jest w module lub jest to kod formularza a wcześniej nie jest aktywowany właściwy arkusz, to wartość pobierana jest z komórki bieżącego (aktywnego w tym momencie) arkusza. Dla uniknięcia "pomyłek" lepiej użyć pełnego adresu Np w bloku "With-End With" With Sheets("Arkusz1").Rang... & j) .Value = .Value...

Excel 2010 - makra nie działają mimo włączenia zawartości aktywnej

Przyznam że nie wiem co jeszcze doradzić więc będę strzelał. Nie dopuszczam opcji że plik a właściwie makro potrzebuje jakiegoś zewnętrznego identyfikatora do działania (pliku/zapisu w rejestrze). Czegoś w rodzaju pieczęci np w rejestrze i jeżeli ktoś wcześniej nie "opieczętuje" siebie/swojego komputera to makro nie będzie się uruchamiać (Robiłem dla...

Excel VBA Makro do kopiowania danych między plikami i tworzenie arkuszy

Dziękuję za sugestie. Dodano po 16 Z kopiowaniem sobie poradziłam. Jednak mam problem z automatycznym stworzeniem arkuszy dla wszystkich osób z listy. Dla jednej osoby, pojedynczej aktywnej komórki wiem jak stworzyć. A czy jest możliwość stworzenia makra, które po kliknięciu przycisku stworzy automatycznie arkusze dla wszystkich osób (i nada nazwy takie...

Jak naprawić działanie makra z pliku Personal przy kopiowaniu tabel?

Dzień Dobry Mam kłopot po skopiowaniu kodu do pliku Personal makro nie działa poprawnie i nie wiem jak to zmienić. Zaczynam od otwarcia pliku na którym pracuję i i robię kopie arkusza tam będą kopiowane wartości z tabelą nieciągłą obszar ("A1:Q18").Wszystko działa do momentu otwarcia i skopiowania tabeli z wskazanego pliku niestety dalej makro nie przechodzi...

VBA Excel Przerwanie pętli po zmianie aktywnej komórki

Witam, Mam problem z przerwaniem pętli oczekującej na dane z portu COM. Makro które napisałem ma za zadanie odczytać wartość z urządzenia zewnętrznego, ale dopiero jak na urządzeniu zostanie naciśnięty odpowiedni przycisk. Chciałbym aby działanie makra wyglądało w ten sposób, że użytkownik klika na dowolną komórkę, w której chce wprowadzić dane, wysyła...

EXCEL - jakie formuły do szukania i wyświetlania danch

'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"...

Excel Makro lub formuła - Drukowanie arkusza z uzupełnienaniem danych

Dobrze myślałeś. Przycisk i kod, który wypełni formularz na podstawie Np aktywnej komórki i "druknie" x2 szt. Zwykłe przypisanie cells()=cells() i instrukcja PrinTout Coś na wzór (kod w module):[syntax=vb]Sub PrnForm() Dim arkPrn As Worksheet Set arkPrn = Sheets("Wydruk") With ActiveSheet wrs = ActiveCell.Row arkPrn.Range("d7") = .Cells(wrs, 1) 'Nr...

Excel VBA - Kopiowanie "nagłówków" kolumny i wiersza aktywnej komórk

Cześć, Jestem początkujący w VBA, ale porwałem się, by przygotować skoroszyt obsługujący raporty kasowe i druk KP w szkole muzycznej. W załączonym pliku nie wiem jak napisać taki skrytp: W arkuszu "dane" wpisuję kwotę, którą za dany miesiąc wpłacił uczeń np. w komórce J8, i pozostawiam tę komórkę zaznaczoną. Uruchamiam makro, które przykleja do odpowiednich...

Excel 2003 - jak znaleźć tekst i zwrócić dane z kolumny?

Tylko już teraz konkretne pytanie czy docelowy arkusz (struktura arkuszy i układ wierszy i kolumn) jest taki jak w przesłanym przez ciebie załączniku. Bo już w makro trzeba określać konkretnie miejsca docelowe. Nie, nie jest taka sama struktura. Myślałem o makro, które "wprowadza" nową funkcję. Na zasadzie czegoś takiego: Function Kolor(Adres As Range)...

VBA - Odwołanie do konkretnej komórki w innym excelu

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...

Excel - ewidencja czasu - 35 godzin i naruszenie doby

No nie wiem, marek003 pewnie już coś ma w rękawie, ale tak się zastanawiam... W tej formie, to rzeczywiście karkołomna robota. Potrzebny byłby arkusz pomocniczy, obliczający zależności dla każdej (tak mi się wydaje) pary komórek. Zdaje się, że o wiele prościej byłoby napisać makro. Test byłby przeprowadzany jedynie na aktywnej komórce (Target.Value),...

Excel - makro zapisujące plik pod wskazaną nazwą

Witam, jestem tutaj nowy i potrzebuję pomocy osób bardziej doświadczonych. Mój problem polega na tym że potrzebuję po wcisnięciu buttona aby utworzyło mi nowe zeszyty z nazwą pobraną z innego arkusza niż ten na którym jest przycisk znalazłem takie rozwiązanie : Sub CreateWBs() Dim lRow, x As Integer Dim wbName As String lRow = Range("A"...

VBA Excel - Kopiowanie komórek z różnych skoroszytów do skoroszytu zbiorczego

Dzień dobry, korzystam z kodu, który kopiuje mi wybrane komórki ze skoroszytu (o zmiennej nazwie) i konkretnego arkusza w tym skoroszycie (nazwa arkusza jest zawsze stała) do skoroszytu "zbiorczego" o stałej nazwie (w tym wypadku ZEST_ZAM.xlsx). W kodzie mam wpisaną "na sztywno" nazwę skoroszytu, z którego komórki są kopiowane i nie umiem tego zastąpić...

Jak wyszukiwać w wielu kolumnach w Excelu? Zaznaczanie aktywnego wiersza, Pop Reminder.

Posiadam działającą wyszukiwarkę w Excelu, która działa tylko dla jednej kolumny [syntax=vbscript]Private Sub TextBox1_Change() ActiveSheet.ListObjects("Data1").RANGE.A... field:=2, Criteria1:="*" & [a2] & "*", Operator:=xlFilterValues End Sub[/syntax], jak zmodyfikować makro bądź utworzyć całkowicie nowe, aby działało dla wielu kolumn....

Excel - Jak stworzyć listę unikalnych nazwisk z wielu arkuszy?

A może coś jeszcze prostszego. Autor nie wspomniał jak będzie wprowadzał dane. Jeżeli to będzie robił "z ręki" i pojedynczo to może w "sekcji" Change każdego arkusza uruchamiać makro z odwołaniem do procedury w module która pobierze nazwisko z aktywnego arkusza (przed chwilą wprowadzone) i poprzez pętle sprawdzającą nazwiska w Total w przypadku braku...

Excel Makro - Jak skopiować i sformatować wiersz z modyfikacją komórki?

Witam Mam do uzupełnienia dość spory arkusz. Zazwyczaj chodzi o wpisanie wartości w dwóch komórkach, ale często sprawy się komplikują i muszę wstawić nowy wiersz, skopiować kilka potrzebnych komórek z wiersza powyżej (nie wszystkie), wprowadzić zmianę w jednej komórce i sformatować wiersz. Jako, że jest tego dość dużo, a czasu mam mało, chciałem użyć...

Makro do Excela: zapisywanie pliku do nowego katalogu i usuwanie starego

A mam jeszcze taki problem, w arkuszu posiadam dwa przyciski uruchamiające makra, i chciałbym aby jeden z przycisków był aktywny dopiero po przeniesieniu pliku z arkuszem do innej lokalizacji. I druga sprawa aby przycisk był widoczny w zależności od wartości komórki np. jeśli wpiszę do niej konkrety komunikat to wtedy przycisk się pojawia a jeśli jest...

Jak napisać makro VBA z funkcją WYSZUKAJ.PIONOWO w Excelu?

Witam wszystkich, Potrzebuję pilnie informacji jak zapisać makro działające jak WYSZUKAJ.PIONOWO z odwołaniem do arkusza2 czyli mojej tabeli danych. Temat pewnie nie byłby jakoś strasznie skomplikowany gdyby nie fakt powtórzenia obliczeń do końca aktywnych kolumn ale również na zasadzie powtórzeń w wierszach ze stałą równicą 7wierszy - powtórzenia oczywiście...

Excel - kopiowanie wzoru z wprowadzeniem zmian - tylko makro?

Może to dlatego, że w takiej formie jak to podałeś teraz, funkcja aktualizuje dane tylko z otwartego arkusza o takiej nazwie. Żeby aktualizować dane z arkusza umieszczonego w jakiejś konkretnej lokalizacji, powinieneś podać pełną ścieżkę do niego. Spróbuj przerobić kod w podobny sposób jak przykład poniżej (zwróć uwagę na zmianę nazwy arkusza na pełną...

VBA Excel - Kopiowanie arkuszy do nowo utworzonego pliku

Witam Wszystkich; Za pomocą komendy Workbooks.Add tworzę nowy plik, chcę skopiować wszystkie arkusze z poprzedniego do nowo utworzonego. Próbuję zrobić to tak: [syntax=vb]Sub PRSONALZapisCustomerFile() ' Zapisuje plik estimate 'deklaracja zmiennych Dim wiersz As Long Dim z1 As Long Dim z2 As Long Dim myName As String Dim myPath As String Dim sh As Worksheet...

Jak stworzyć makro VBA w Excelu do skanowania kodów kreskowych?

Witam, Potrzebuję pomocy przy stworzeniu makra lub kodu, instrukcja poniżej: Zaczynając od komórki A2 → skanuję kod kreskowy skanerem, który wprowadza mi numer artykułu w komórkę A2 i automatycznie przeskakuje do A3. Następnie musi wykonać makro z buttona "Szukaj" po czym znów aktywuje komórkę A2. Kolejno schodzi o 4 wiersze w dół i aktywuje pierwszą...

excel - wklejanie przetłumaczonego tekstu do sąsiedniej komórki

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...