Zobacz załącznik. Dla prawidłowego działania formuł, każdą fakturę w Arkusz1 należy kończyć nowym numerem. Kolumnę F oraz zakres E1:E2 ustaw z białą czcionką i nie będzie widoczne na wydruku. Edit 21:29: Zmieniłem załącznik, poprzedni był niedokończony.
Przerobiłem makro z innego wątku PRL - sprawdź czy działa Umieść makro w plik B"plik B.xlsx" PRL po dodaniu elementów z Twojego nagrywania.
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...
1. Załóż filtr w oryginalnej tabeli (niepuste) -> zaznacz całą tabelę i wtedy dopiero kopiuj dane . Może nawet lepiej wklejać "tylko wartości" niż dane z pełnym formatem każdej kopiowanej komórki. Zrobisz to w jednym ruchu zamiast korzystać z pętli (2000 razy). Po nagraniu makra można edytować zaznaczony zakres tak, żeby najlepiej nam odpowiadał. 2....
Podmieniłem pętle i opisałem co najistotniejsze. Nie sprawdziłem działania.[syntax=vb]Sub testit() dato = Range("B3") ' nazwa folderu z plikami do pobrania danych myvar = ThisWorkbook.Path & "\" & dato 'wywołanie funkcji If TypeName(myvar) <> "Boolean" Then For i = LBound(myvar) To UBound(myvar) ' otwieram 1 odnaleziony skoroszyt (a w...
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...
Potrzebuję dodać do swojego kodu konieczność potwierdzania chęci usunięcia danych, jeśli wybrany zakres to więcej niż jedna komórka. Czyli jeśli użytkownik skasuje zawartość jednej komórki, to nic się nie dzieje, natomiast jeśli zaznaczy kilka i będzie chciał skasować ich zawartość, to pojawi się msgbox "czy na pewno chcesz skasować dane z zakresu ......
Cześć, potrzebuję pomocy. W załączonym pliku znajdziecie arkusze: - weryfikacja - firma 1 - firma 2 - kodowanie firma 1 - kodowanie firma 2 Przystępując do pracy: 1. Do arkusza "Firma 1" wklejam dane z innego pliku od kolumny E do AB 2. Uzupełniam formułę w kolumnie A 3. W kolumnę B wpisuje "F1" 4. Kopiuję kolumnę A i wklejam do arkusza "Kodowanie Firma...
Super, dziękuję. Dodano po 8 Jeszcze jedno pytanko, czy jest możliwość żeby zamiast komunikatu "wybierz zakres", na stałe podać zakres do tworzenia arkuszy (dane w tym zakresie są zmienne, ale zakres z którego mają się tworzyć arkusze jest stały)?
Witam To też zadziała ale w tej postaci [syntax=vbnet]For Each cell In Columns("AE").Cells cell.Value = Trim(cell.Value) Next[/syntax] Nie wiem tylko dlaczego odwołujesz się do całej kolumny AE gdzie przy excelu 2010 jest 1048576 wierszy i makro musi "przemielić" cały zakres lepiej ustawić konkretny zakres lub użyty zakres wtedy makro będzie działało...
Witam, Mam pytanko do wszystkich fachowców z Excela, jak powinno wyglądać makro które stworzy mi kolejny plik, i skopiuje do niego dane które mam obecnie zaznaczone, dobrze by było aby w pliku głównym stworzyło mi również hiperłącze do nowego pliku, tak aby w razie ewentualnej edycji danych zmieniły się one również w pliku który powstał podczas owego...
Witam, mam nastepujacy problem: "zrodlo" - posiadam np. 10 zakladek z takim samym ukladem - sa to zakladki z ktorych chce kopiowac dane "cel" dane chce kopiowac do 40 innych zakladek (kazda zakladka posiada swoj numer np. 5455) - numer ten jest wpisany "x" razy w zakładkach "zrodlo" w kolumnie A. w jaki sposob napisac makro które bedzie do zakladek...
[syntax=vbscript]Sub Scal() ow = Cells(Rows.Count, "A").End(xlUp).Row b = 1 For x = 1 To ow If Not f Then b = x f = True End If If Cells(x + 1) <> Cells(x, 1) Then Range(Cells(b, 2), Cells(x, 2)).Merge Cells(b, 2) = Cells(x, 1) f = False End If Next End Sub[/syntax]
Witam, mam serie dat w jednej kolumnie. Chciałbym żeby makro zapytało mnie, najlepiej w formie wyskakującego okienka jaki zakres dat chciałbym zaznaczyć a następnie żeby makro wykonało polecenie. W przypadku braku zakresu danych wybranego przez użytkownika, najlepiej żeby makro napisało brak daty. z góry dziękuję za pomoc pozdrawiam
Sprawdzanie poprawności danych było by wystarczające jednak problem w tym że nie mogę tej opcji ustawić odgórnie, dlatego że plik w którym ma być ta opcja jest tworzony z innego głównego pliku i zakres w którym ma działać sprawdzanie danych jest ruchomy. Dlatego sprawdzanie danych musi być włączone przez makro. Zakres w którym ma być ustawione sprawdzanie...
Cześć. Czy ktoś z Was wie jak powinno wyglądać makro porównujące ze sobą tabele w następujący sposób: -Załóżmy, że mamy dwa arkusze z danymi pracowników. W jednym jest formatka do raportu, w drugim przygotowana baza z ilością pracowników przypisanych do danych grup (dział/sekcja/skrót jedn org/MPK/rodzaj pracownika/fabryka) - formatka ma ten sam układ....
Witam, nie mam pomysłu jak przerobić to makro żeby pobierało jedynie wybrane zakresy danych z kolumny AQ, a nie całą kolumnę, np zakres AQ16:AQ22, AQ26:AQ30, AQ37:AQ39 itd bo zakresów będzie więcej w tej kolumnie. Proszę o pomoc. Poniżej makro: [syntax=vbscript]Private Sub Test_Click() Sheets("Klient").Range("A18:H32").ClearC... poz = 18 For w =...
Niestety, za każdym razem typy są różne i zakres danych również Dodano po 4 Jak zrobić pętle dla danych filtrowanych w kolumnie E dla różnej ilości wierszy, aby kopiowało mi w zależności od danych i wrzucało do nowego arkusza zapisując go tym typem oraz według tego co aktualnie mam w liście wyboru w kolumnie E? Mogę prosić o podpowiedź.
Witam. Mam wielką prośbę. Dostałem w pracy zadanie utworzenia wizualizacji do procesu walcowania taśmy wraz z raportowaniem przebiegu.. Wizualizację (napisaną w In-Touch z wykorzystaniem SPC) połączyłem za pomocą DDE z arkuszem excel'a w którym ma być tworzony raport z walcowania taśmy. I tu zaczyna się mój problem. Samą wizualizację napisałem bez problemu...
Witam Poszukuje wsparcia w utworzeniu odpowiedniego makra. Posiadam dwa skoroszyty. W pierwszym "A" znajduje się arkusz z tabelą w którą chcę z automatu wprowadzać dane. Jedna cześć danych będzie narzucona i automatycznie wpisywana przez narzucony schemat w makro Druga cześć danych będzie kopiowana z tego samego skoroszytu " A" , tylko z innych komórek...
Nie do końca mi to wychodzi. Mam arkusz produkcja i arkusz zrobione. W arkuszu produkcja jest kolumna C w której jest unikatowy numer zlecenia a w kolumnie N jest pusto lub 'got.'. Chcę aby w arkuszu produkcja kolumna N, wpisując słowo 'got.' formuła przekopiowała mi cały wiersz do arkusza zrobione. Zakres danych w arkuszu produkcja to A2:L3000.
Witam, Uprzejma prośba o pomoc / podpowiedź / wyjaśnienie (na wstępie nie jestem programistą …. niestety!). 1. Formatowanie kilku zakresów jednocześnie. Chce nadać (za pomocą makra w VBA Excel) kilku zakresom danych ten sam format. Zakresy tu np: (B15:B38) (B51:C62) (B98:D112) Format to: ###,00;[Czerwony] - ###,00;- Bez tła (przeźroczyste tło)...
Witam. Mam pytanie, czy dysponuje ktoś makrem lub byłby w stanie napisać * lub doradzić jak napisać makro , które pozwoliłoby kopiować zakres danych do skoroszytu głównego. Oczywiście wszystkie inne skoroszyty są "kopią" tego głównego. Interesuje mnie taka sytuacja. Ktoś pracuje na pliku 1.xlsx w skład którego wchodzą powiedzmy 2 arkusze ( arkusz1 oraz...
Dzień dobry, Bez załącznika to można się tylko domyślać. Jeżeli to ma być z użyciem filtra, to albo można zastosować filtr zaawansowany, albo ustawić sobie formatowanie warunkowe na odpowiedni zakres dat przy użyciu formuł, a potem zastosować autofiltr wg kolorów. Pozdrowienia.
Witaj. Zakładając, że oryginalne dane na pierwszym arkuszu, a wynik na drugi: [syntax=vb]Sub upraw() Dim bsk As Range, bsr As Range Dim rb&, rd&, cd&, cm& Set bsk = ThisWorkbook.Sheets(1).Columns(1).Cells Set bsr = ThisWorkbook.Sheets(1).Range("B:J").Rows rb = 2: rd = 2 With ThisWorkbook.Sheets(2) bsk(1).Copy .Cells(1, 1): bsr(1).Copy...
Witam Mam zakres danych w dwóch kolumnach i chcę skorzystać z filtra zaawansowanego który będzie filtrował dane z arkusza1 na podstawie wartości wpisanych w arkuszu2 Nagrałem sobie makro tylko mam problem ponieważ nie wiem jak je zmodyfikować na własne potrzeby niepuste komórki, gdyż samo poszerzenie zakresu uwzględniając puste nie przefiltruje danych....
Rany!!! Tak też próbowałem ale za każdym razem wywalało mi błąd. Teraz wiem co źle zrobiłem. Makro nagrałem i testowałem na pustym plik i tam działało. Kiedy przeniosłem makro do mojego docelowego pliku to zapomniałem w moim pliku utworzyć zakres "Przeniesienia" i dlatego wywalało mi błąd. Dzięki
Masz racje może faktycznie ciężko i spaprałem opis, postaram się to sprawdzić po weekendzie. Jeszcze raz opisuje o co mi chodzi , mam 200 plikow w folderze "dane", w folderze "WZOR" jest plik wzorcowy wzor.xls oraz folder "CEL" czyli jest tak skrypt z folderu "dane" pobiera pierwszy plik to jest otwiera plik np g35.xls kopiuje odpowiednie zakresy komorek...
Cześć. Prośba o wsparcie w rozwiązaniu poniższego problemu. Mam kod do dzielenia na pliki (zapożyczony gdzieś z sieci). Do tej pory spaniał w 100% moje oczekiwania, ale teraz potrzebuję dodatkowej funkcjonalności. Makro zapisuje każdy arkusz jako odrębny plik za wyjątkiem trzech wykluczonych prze ze mnie. Pierwszy to plik z danymi źródłowymi. Dwa kolejne...
Na podstawie tych danych ( M4 i O4) makro wyszukuje wszystkie dane łącznie i pomiędzy ( zakres dat ) nimi z kolumny M , a następnie kopiuje te dane do nowego skoroszytu . Proszę o dokładne wyjaśnienie treści zadania - literalnie rozumiem to tak: na podstawie założonej daty M i daty O (wprowadzonych inputem do makra) makro wyszukuje wszystkie 20 polowe...
Witam! Bardzo potrzebuję pomocy. Mam plik raportu o nazwie "raport.xlsm" za pomocą którego przenoszę różne dane do kilku różnych plików w tym do pliku "plik do wydruku.xlsm" znajdującego się w innej lokalizacji niż "raport.xlsm". Zawsze po przeniesieniu danych muszę otworzyć "plik do wydruku.xlsm" w celu wydrukowania 2szt. danych z arkusza1 tego pliku...
PRL - baaaardzo dziękuję za pomoc! Niestety potrzebuję "hybrydy" obu makr z tematu. ImportPlikowDoArkuszy pobiera dane ale wybiera wszystkie pliki z danej ścieżki, nie pozwala wybrać zakresu i tworzy osobny arkusz dla każdego. Ale działa! Możliwe jest dodanie jeszcze 2 funkcjonalności z pierwszego makra z tematu (ImportujPlikizWieluLokalizacji)? Rozwiązaniem...
Ja to zrozumiałem trochę inaczej, ale rzeczywiście opis nie należy do klarownych. Makro zdarzeniowe reaguje na zmiany w komórkach B5:B7 wprowadzone ręcznie, nie makrem. Tekst makra jest w module arkusza. Zakres trzeba dopasować. Jeśli w B8 wpiszę "14", to w C8 ma być formuła "=400+B8" chyba jednak źle zrozumiałem, ale może to sobie przerobisz.
No dobra, makro było pójściem na łatwiznę ;). Można też taką formułą: =INDEKS($A$1:$A$9;ZAOKR.W.DÓŁ... Gdzie zakres $A$1:$A$9 jest zakresem ze znakami, które mają być powtórzone.
Dzień dobry, Obawiam się, że formułami to byłoby trudno osiągnąć. Można próbować za pomocą makr, ale należałoby dokładnie określić co te makra mają robić i w jakim zakresie komórek. Więc jeśli makra wchodzą w grę to trzeba określić: jak będzie określony zakres komórek, w którym makro ma działać. Rozumiem, że byłoby to jedno lub dwa makra - jedno inicjujące,...
cześć, poszukuję rozwiązania, które pozwoli na kopiowanie danych z jednego arkusza do drugiego. Opis zadania. W Arkuszu1 znajdują wszystkie wprowadzone przez użytkownika ( kolumny C:G ) oraz miejsce w którym, użytkownik wpisuje interesujący go zakres dat ( komórka B2 - data od, komórka B3 - data do ). Na podstawie tych danych ( B2 i B3) makro wyszukuje...
Witam, Mój problem dotyczy konsolidacji pewnego zakresu danych. Cała trudność polega na tym, że ów zakres się zmienia, więc napisałam najpierw makro na określonym zakresie, aby przetestować działanie: [syntax=vb] ark.Range("I13").Consolidate _ Sources:=Array("Arkusz1!R13C7:R15C8"), _ Function:=xlSum[/syntax] Jednak docelowo, pragnę, aby zakres wyglądał...
Tam akurat jest 10 siedlisk i ten zakres będzie wystarczający. ID(jest stałe wszędzie jest 4) | ID gniazda(i ID znajduję sie w kolumnie E) | ID Siedliska (tutaj wartość jest w wierszu nr 1) | Powierzchnia(tutaj właśnie chciałbym przekopiować wartość komórki z tabelki. Przy pustej komórce przechodzi dalej. Mam nadzieje ze dobrze zrozumiałem Twoje pytanie.
:arrow: walek33 Przestań (z laikiem)... Chodzi o to, że jeśli chcesz wyczyścić większy zakres (zaznaczenie + Del) lub coś podobnego, to taka próba zakończy się błędem... Spróbuj: If Target = Range("x17") and Target.Count=1 Then Range("y17").ClearContents
Dziekuje za odpowiedz z kursu napewno skorzystam i wezme sie za prace... poszedlem troche na latwizne i udalo mi sie przerobic czyjes makro i smiga wysmienicie moze komus tez sie przyda pozdrawiam Sub OperacjeHurtowe() Dim wbkSkoroszyt As Workbook Dim i As Long, szukWiersz As Long, wiersz As Long Dim sciezka As String ' okreslam sciezke szukania...
Witam. Bardzo dziękuję makro działa naprawdę super i BARDZO mi Pan pracę ułatwił !! :) Jeżeli mogę jeszcze prosić o pomoc. 1. Nie kasuje komórek z zakresu br.Sheets(s).Range("39&... Ale w w sumie nie problem :) 2. Czy...
Cześć, Chciałbym stworzyć makro, które pobiera pewien zakres danych i wkleja do jednego pliku. Chciałbym, żeby to odbywało się automatycznie, gdyż dziennie takich plików jest około 120. 1. Pliki mają zawsze datę na końcu, czyli z dzisiaj było by ...31.10.2011.xls 2. Pliki zawsze są umieszczane w jednym folderze - np. c:\dane\ Zrobienie makra, żeby otwierał...
Nic tak nie uczy jak przykłady, a tych jest na forum dostatek. Szukaj pod hasłem "Excel Dir", "Excel lista plików" i coś na temat pętli. Np For Each element In kolekcja , gdzie kolekcja to zakres komórek z nazwami katalogów. Np coś takiego [syntax=vb]Sub bla() Dim zakres As Range, kom As Range Dim kat As String, sKat As String, plik As String Set zakres...
Dzień dobry, Można również napisać stosunkowo proste makro (załącznik), które uporządkuje dane w pożądany sposób. Makro da spodziewany rezultat, jeśli adres mailowy w oryginalnych danych będzie stanowił osobny wiersz. Dane ze strony www należy skopiować w zwykły sposób do komórek. Po kopiowaniu zakres komórek jest zaznaczony, w razie czego można zmienić...
O takie makro mi chodzilo. W moim arkuszu mam dwie zakladki o identycznym ukladzie wierszy i kolumn. Chcialbym aby makro dzialalo niezaleznie na obu. I jeszcze jedno pytanie. Moj oryginalny arkusz jest dosc odszerny w ilosci danych tak wiec po uruchomieniu zajmuje to odrobine czasu. Czy istnieje sposob aby przyspieszyc makro/otwieranie pliku np. przez...
Masz jakieś zależności, czy to zupełnie brane z kapelusza? Np AN/A1wysokiITczesciN/AA1 AN/A1niski IT czesciN/AA? Dlaczego drugi wiersz tabeli: DN/A1N/AITN/AzielonyA1 nie powinno być D1? Sprawdzanie każdej z osobna, to kilometr kodu[syntax=vb]Sub OooRany_kto_to_wymyslil() Dim zakres As Range, ostWrs As Long With Sheets("Arkusz1") ostWrs = .Range("B65536").End(xlUp).Row...
Tomuś_P tak to jest także makro do scalania, które między innymi też przeglądałem, tylko tyle, że ja potrzebuję dodatkowe funkcje, które wyszczególniłem w pierwszym poście, a których żaden gotowiec nie ma. JRV, jeżeli chodzi o wpisywanie od pierwszego wiersza, to dzięki pomocy kolegów z innego forum, już mam to rozwiązane, co do zakresu danych, to zakres...
Witam, mam "mały kłopot". Tworzę arkusz rozliczający koszty, jednak danych jest sporo i chcę ułatwić sobie pracę. Arkusz wygląda tak: http://obrazki.elektroda.net/86_12664947... Chciałbym aby: 1) w formularzu "lista firm" wyświetlała się lista firm (np. ABEL, AGROS NOVA, ALGIDA), jednak formatując formant i podając zakres kryteriów w postaci...
Witam Stworzyłem programik, który importuje z folderów i podfolderów pliki *.dat do Excela. Pierwszy przycisk (makro) otwiera po kolei wszystkie pliki dat i zapisuje do jednego arkusza w pierwszy wolny wiersz. Drugi makro importuje konkretny plik z konkretnego folderu. W folderze dane znajdują się podfoldery np. 0112 , 0212, 0312 które oznaczają miesiąc...
Witam serdecznie. Jest to mój pierwszy post więc proszę o wyrozumiałość. Mam pewien problem a że VBA nie znam zbyt dobrze ( raczej jakieś podstawy) trochę mnie to przerasta. Szukałem coś nt. temat ale ciężko znaleźć jakiś podobny przykład. Do sedna: Dane: W pliku znajduje sie kilka arkuszy : arkusz1, arkusz2,arkusz3, arkusz4 itd. W 4 pierwszych arkuszach...
excel zakres makro excel zakres danych excel makro kopiować zakres
wyświetlacz mastercook magistrala rezystory lm3886 aplikacja
odkurzacz piorący pralka elektrolux ewt810
Tacka DVD wysuwa się po włożeniu płyty - przyczyny Bezpieczne usuwanie kamienia kotłowego: kwas octowy vs. kwas siarkowy
