[syntax=vb]'1.xls Arkusz1 z wiersza 9 z kolumn E, H, L, O, R, U, W do pliku 2.xls Arkusz1 do tych samych kolumn w wierszu 6 'z wiersza 6 w pliku 2.xls z kolumn F, J, N P, T, V, X, Z do wiersza 9 w pliku 1.xls Arkusz1 Sub swap_walue() Dim ark1 As Worksheet Dim ark2 As Worksheet Set ark1 = Workbooks("1.xls").Sheets("Arkusz1") Set ark2 = Workbooks("2.xls").Sheets("Arkusz1")...
Rozumiem, że w pliku jest arkusz roboczy, do którego do określonych komórek wpisuje się dane, które potem w arkuszu "Baza" mają utworzyć dwie kolumny. Zakładam, że arkusz "Baza" istnieje. W przytoczonym makro dostrzegam 2 błędy: 1. W wierszu NewRow = Range("A65536").End(xlUp).Row + 1 powinno być C65536 lub D65536, bo do tych kolumn dopisywane są dane...
Witam Potrzebuje pomocy z excelem, mecze się już parę dni i nie mogę sobie poradzić, przeczytałem juz wszystkie posty i nic. Mam dwa skoroszyty - jeden z nich nazywa się Baza/Arkusz1 i znajdują się w nim dane do skopiowanie do innego skoroszytu (bieżacy arkusz Menu). Jednak kopiuje tylko wybrane komórki (które spełniają odpowiednie warunki). Ponizej...
to o czym piszesz to dla mnie czarna magia Jaka tam czarna. Sprawa jest dość prosta i spokojnie obędzie się bez różdżki, szklanej kuli, czy czapki Merlina :) Makro najpierw sortuje, następnie zmienia wartości na tekst w kolumnie D. Przycisk po prawej służy tylko testom. Pozostaje sformatowanie gotowej tabelki (można dopisać stosowną procedurę). Pewnie...
Witam. Bardzo proszę o pomoc w makrze, które przenosiłoby wartości z tych samych komórek w jednym pliku do takich samych komórek w innym pliku. Np z pliku 1.xls Arkusz1 do pliku 2.xls Arkusz2 komórek z zakresu B8:Z47; B53: Z92; B98:Z137. Nie chodzi mi o kopiuj/wklej lecz przeniesienie wartości.
A dlaczego chcesz zastosować makro do tak prostego działania :?: Pokaż swój plik (ewentualnie pliki żródłowe i docelowy) :!: , albo szukaj na elektrodzie przykładów rozwiązań "przenoszenia danych" :idea:
Najprościej rzecz ujmując [syntax=vbscript]licznik = 3 For i = 1 To 100 If Sheets("Arkusz1").Range("B" & i) = 1 Then Sheets("Arkusz1").Range("C" & i & ":S" & i).Copy Sheets("Arkusz2").Range("B" & licznik & ":R" & licznik) licznik = licznik + 1 End If Next[/syntax]
Nagraj makro jak to robisz, następnie je dostosuj do swoich potrzeb.
Jest. Mało tego, masz wybór: formuła w docelowej komórce, lub makro.
Sprobuj takie makro [syntax=vb]Sub sortgodz() With ActiveSheet.UsedRange .Sort key1:=.Columns(4).Cells(1), header:=xlYes Set bt = .Find("Zast") r = Cells(Rows.Count, 4).End(xlUp).Row + 1 Rows(bt.Row).Cut Rows(r).Insert shift:=xlDown End With End Sub [/syntax]
Jeśli koniecznie chcesz przenosić wartość jednej komórki do drugiej przy użyciu makra - to po zarejestrowaniu edytuj to makro i skoryguj wklejanie ze schowka (zapisana jedna wartość :D ) na wklejanie wartości komórki pierwotnej. Znacznie prostszy sposób przenoszenia wartości z jednej komórki do drugiej to łączenia typu d10 = a1 :!:
Widzę, że nie bardzo lubisz makra ;) a wystarczy: 1. makro z WorkbookOpen powtórzyć przy WorksheetActivate (aktualizacja listy Combobox''a). 2. Usunąć instrukcje warunkowe dot. producenta Listę kolorów modyfikujesz w arkuszu "Opcje". Musi być "ciurkiem" (bez dziur). Edit 20:17 - zmieniłem załącznik (Clear brakowało przy Activate)
Najlepiej załącz te pliki i cały kod, który ma służyć do kopiowania. Ten kod jest w pliku "Nowy", czy jeszcze w innym pliku? Jaki jest komunikat błędu? Zakres danych nie musi być na 100 komórek, może być mniej, ale żeby charakter danych był zachowany.
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,...
Proponuję takie proste makro:[syntax=vbscript]Sub Przenoszenie() Dim ws1 As Worksheet: Set ws1 = ThisWorkbook.Worksheets("Arkusz1") Dim ws2 As Worksheet: Set ws2 = ThisWorkbook.Worksheets("Arkusz2") Dim tbl As Variant Dim lr As Long tbl = ws1.[e5:z5] With ws2 lr = .Cells(.Rows.Count, 3).End(xlUp).Row + 1 .Cells(lr, 3) = .Cells(lr - 1, 3).Value + 1 .Cells(lr,...
Zbliżone działanie do pożądanego :D tj. przenoszenie danych z katalogu do oferty przy pomocy dwukliku (makro działa pojedynczymi wierszami - oczekując na wpis ilości do oferty :ok: patrz na zrzut ) 978389 Drugie makro w "ofercie" usuwa wybrane wpisy (wybrany indeks :!: ,a przy okazji ilość :D ) 978391
Cześć, Potrzebuję pomocy w napisaniu makra w VBA. Plik A posiada 40 kolumn (liczba wierszy jest zmienna, od 1 do 10 000), niestety ich ustawienie jest zmienne w zależności między innymi od dnia, nie zmieniają się nagłówki, chciałbym do pliku B kopiować całe kolumny w zależności od ich nagłówka (zawsze pierwsza komórka w kolumnie).
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.
Bez plików trudno się zorientować co Ty chcesz kopiować :cry: Proponuję jednak nagrać sobie makro przenoszenia (kopiowania) całego arkusza z pliku źródłowego do pliku docelowego :idea: , a potem przeprowadzić procedurę ukrywania lub usuwania niepotrzebnych danych w pliku docelowym :D
Wg mnie robisz to od niewłaściwej strony. To word powinien sięgnąć do excela, pobrać odpowiednie komórki i powstawiać je gdzie trzeba. http://support.microsoft.com/kb/294683/p... Ograniczenie jest takie że trzeba ~te wszystkie komórki ustawić w jednym wierszu excela. Jeżeli będzie więcej wierszy to w wyniku powstanie tyle różnych dokumentów ile jest wierszy...
Witam, jestem kompletnie poczatkująca jeśli chodzi o tworzenie makr a chciałabym uprościć sobie pracę. W jednym arkuszu (Tab.2b) wpisuję dane w kolumnach odpowiednio: B- numer projektu C- numer raportu parasolowego G- wartość przekazanych refundacji H- data refundacji w drugim arkuszu (rejestr) mam inne dane dotyczące projektów wykazanych w kol.B arkuszu...
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....
Czegoś nie rozumiem, ale może jestem za młody. :D Czy mierzyłeś czas potrzebny na wklejenie jednej formuły i przeciągnięcie jej np. w dół o 1000 komórek? Myślę (bo też nie mierzyłem), że wynik otrzymasz w sekundach.
A nie prościej zrobić formatowanie warunkowe. Wówczas mamy sprawdzanie przez excela wartości i makro nie obciąża go dodatkowo...Piszę już jakiś czas makra i np jak robi się kopię dużych arkuszy, to makro jest zbyt wolne - lepiej zamiast przenoszenia Rows(A) użyć zaznaczenia i polecenia kopiuj excela wpisując formuły poprzez makro niż kopiować fizyczną...
Cześć wszystkim, Jestem kompletnie zielony w tych sprawach, a chciałem zrobić makro przenoszące dane z jednego pliku (nazwa: napa) do drugiego pliku (nazwa: Raport), przykładowo dane z komórki Y przenieść do komórki N. Patrzyłem w internecie jak to robić i połowicznie mi się udało, ale rzecz w tym, że chciałbym, aby pliki dodawały się automatycznie...
Po pół godzinie wczytywania się załapałem (chyba) o co chodzi. Po pierwsze czy aby na pewno nie będzie interesowało cię za co klient zapłacił? Bo czyszczenie danych i przygotowywanie do kolejnego "wpisu" zlikwiduje szczegóły (składowe) danej wpłaty. Druga rzecz związana z brakiem sumowania. Może jest błędna formuła (nie uwzględnia wszystkich komórek)...
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...
Ok Działa, ale nie przenosi do innego arkusz. Ponadto kopiuje tylko wiersz A2 i to jest dziwne bo w kodzie jest umieszczony zakres od A2 do U3. Nie wiem czym to jest spowodowane. To może tak, zarejestrowałem nowe makro: Sub kopiowanie() ' ' kopiowanie Makro ' ' ActiveWindow.ScrollColumn = 2 ActiveWindow.ScrollColumn = 1 Range("A1:U2").Select Selection.Copy...
Do importu danych które do tej pory obrabialiśmy już dużo wcześniej nagrałem makro i wszystko działa. Dorobiłem do tego przycisk i jest OK. Teraz muszę nagrać kolejne makro, które zaimportuje plik wlasciciel.csv (plik zawsze będzie miał tą sama nazwę). Potem trzeba będzie do tego mara dopisać warunek żeby wykonało się pod warunkiem, że plik istnieje...
Jeżeli to są funkcje excela (nie makro) to: Skopiuj (nie przenoś) skoroszyt B do katalogu gdzie jest skoroszyt A. Otwórz tylko skoroszyt A "Wejdź" w formułę gdzie jest odwołanie do skoroszytu B (będzie się jeszcze odwoływać do starej lokalizacji skoroszytu B) Skopiuj ścieżkę (zaznacz w formule ścieżkę do pliku B i Ctrl+C ) "Wyjdź" z komórki i zaznacz...
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...
Witam kolegów i koleżanki. Zwracam z prośbą do was o pomoc, język VBA jest mi obcy. Wszystko dzieje w obrebie tego samego zeszytu o nazwie "Dane" W zeszycie "DANE", arkuszu " Baza" w kolumnie J od komórki 13 mam dwa słowa Auto i Ciągnik. Chciałbym aby w momencie jak pojawi się słowo " Auto" makro przenosiło dane do arkusza "Produkt". Arkusz "Baza" w...
Witam serdecznie, Mam zaprojektowany formularz z polami tekstowymi, polami kombi oraz polami dat. Formularz pobiera słowniki pewnych nazw z bazy danych. Wszystko opiera się na bazie oraz formularzu stworzonym w OpenOffice. Potrzebuję makro, aby po kliknięciu na przycisk zapisz w formularzu przeniosło wszystkie dane wpisane i wybrane z pól kombi w formularzu...
Witam! Potrzebuję ustawić w załączonym pliku w karcie "dostawca B" formuły lub makro w taki sposób , aby automatycznie kolejno kopiowało wartości z odpowiednich komórek w kartach T-31, następnie z T-32... T-33, T-34 i T-35 ale tylko dla wierszy w których jako producent elementów wybrany jest Dostawca B. Dodatkowo w karcie "dostawca B" nie ma wszystkich...
Nie sądzę ... podsumujmy zatem, na podstawie kodu, co mamy: 1. Arkusz zbiorczy nazywa się "Aktywność" 2. Tabela zbiorcza znajduje się w zakresie "B18:O2000" 3. Nagłówki tabeli zbiorczej znajdują się w zakresie "B18:O18" 4. Tabele źródłowe w plikach dawców znajdują się w arkuszach nazwanych "Aktywność" 5. Tabele źródłowe w plikach dawców mają nagłówek...
Dzięki za info. Spróbuję i pokarzę rezultat. Teraz klecę wcześniejsze etapy. Skończyłem 1. czyli przenoszenie danych. Teraz zaczynam 2 czyli układanie danych i usuwanie dubli, a łączenie tekstu będzie w 3 etapie Dodano po 5 Mam prośbę o krótki przykład. Nie dałem rady sam nic zdziałać. Dzięki.
Długo nikt nie odpowiada, więc chyba coś tu nie jest jasne. Excel może działać (upraszczając nieco) poprzez formuły lub poprzez makra. Formuły nie mogą niczego przenosić, mogą jedynie "kopiować", a ściślej zwracać wynik tam, gdzie wcześniej wpisano formułę, pozostawiając dane źródłowe bez zmiany. Formuły działają automatycznie, przeliczają się same,...
Warunek jest taki żeby wstawiało te dane w pliku STATYSTKA biorąc pod uwagę datę przyjęcia czyli jeżeli w pliku STATYSTYKA w komórce C2 mamy datę 2023-01-30 to żeby kopiowało z pliku DANE tylko te pozycje które mają taką samą datę jak ta wcześniej wymieniona. Makro miałoby przenosić z jednego pliku do drugiego dane żeby przyspieszyć pracę i nie dublować...
Dzięki za wszystkie uwagi. To makro rzeczywiście mi ruszyło, tylko, że ja go nie rozumiem i nie wiem co ono dokładnie robi (przepraszam, ale tak jak pisałem wcześniej moja wiedza z VBA jest cieniutka). Czy ono tylko odczytuje dane z komórki A3 z zamkniętego pliku "1" bez przenoszenia? A jeżeli tak to proszę o poradę co powinienem dopisać, aby powiedzmy...
Nie przesadzajmy, wszystko da się powoli zrobić. Zacznijmy od tego przenoszenia z komórki do komórki. Najłatwiej będzie to zrobić jeżeli masz gdzieś stan ogółem, czyli sumę obu komórek. Wygląda to jakoś tak: 10100 20155 17107 Wtedy na poziomie tego arkusza (ważne!) wklej makro: [syntax=vbscript] Private Sub Worksheet_Change(ByVal Target As Range) If...
Troszkę mi się zeszło z odpowiedzią, ale chwilowo zająłem się innymi sprawami. Jak wcześniej wspomniałem moim założeniem jest stworzenie makra/funkcji która po kliknięciu na na pole obok "Współczynnik częstotliwości [FM]" przenosi nas do tabelki znajdującej się w arkuszu 2. Po kliknięciu na odpowiednią komórkę w tabeli danych makro/funkcja zwraca wartość...
Co ma wspólnego makro do zaznaczania aktywnego wiersza z funkcją, której nagłówek pokazujesz? Jak i do czego używasz tej funkcji? Zaznaczanie aktywnego wiersza masz zrobione formatowaniem warunkowym z formułą: [syntax=text]=KOMÓRKA("ROW")=WIERSZ()[/s... z tym są dwa. Pierwszy - należy właściwie zaznaczyć zakres komórek, w którym to formatowanie...
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...
Jeżeli tekst w komórce A2 będzie inny, musisz odpowiednio zmodyfikować/wyliczyć argumenty właściwości Characters. Pierwsza liczba oznacza numer pierwszego znaku do modyfikacji, druga ile kolejnych znaków ma mieć taki sam atrybut. Dzięki. Coś jednak szwankuje w makrze, ponieważ arkusz jest cały czas przeliczany, aż po pewnym czasie zamyka mi program....
Dzień dobry, Dziękuję za wyjaśnienie w kwestii sumy liczb nieujemnych. Tak jak myślałem, chodzi o to, żeby co najmniej jedna wartość była niezerowa, więc jeśli liczby są nieujemne, właściwym kryterium jest suma. Formuły z ostatniego postu znowu nie rozumiem, bo w tej wersji, którą Pan załączył w komórkach B166 i C166 nie ma żadnych liczb. Ale zostawmy...
No więc tak. Nagałam sobie makro, aby zobaczyć jak przeniść samą wartość. Sęk w tym, że na początku przenosiło wartości, tyle że do innej komórki. Potem się zorientowałam, że moją zmienną nie są kolumny, tylko wiersze. Po poprawieniu tego makro przenosi mnie do drugiego arkusza, ale nie wyrzuca wartości. Podsyłam plik.
Dziękuję. Makro Pana JRV spełnia to o co mi chodzi, niestety przy zmianie samej daty od razu pojawia się ona na samym dole, gdy przypiszę do tej daty zysk pojawia się ta sama data na dole z nowym zyskiem. Założenia są takie, że nie może być dwóch takich samych dat. Więc niezależnie od zmiany zysku powinien się on zmieniać tylko w przypisanej dacie....
Witam Czy jest możliwe i jeśli tak to w jaki sposób aby utworzyć takie makro, które sprawdzałoby następującą zależność: powiedzmy w pierwszej kolumnie (A) A1, A2, A3... znajdowałyby się cyfry np od 1-10 W kolumnie B (B1, B2, B3, B4) wpisywałoby się 4 cyfry z w/w 10 Następnie w komórkach E1, F1, G1, H1 chciałbym wstawić taką zależność, która sprawdzałaby...
Usuń dane i wstaw arkusz z makrem. Będzie łatwiej pomóc
Nie rozumiem czemu ma to służyć. Masz 5 komórek do wypełnienia zarówno po lewej, jak i po prawej stronie rysunku, Zablokuj pierwszy wiersz arkusza "BAZA" i wpisuj bezpośrednio w nim. Prosto i bez problemów. Jeśli jednak wolisz coś ambitniejszego, to poszukaj na forum. Potrzebujesz znaleźć Nr ostatniego wiersza w arkuszu "BAZA", dalej proste przypisanie....
Może takie makro zdarzeniowe w module skoroszytu (jeśli ma działać we wszystkich arkuszach) lub w module arkusza (jeśli tylko w jednym arkuszu): [syntax=vbscript]Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) Dim tval Application.EnableEvents = False If Application.CutCopyMode = xlCopy Then tval = Target Application.Undo...
Wszystko powinno być dobrze jeżeli pozbędziesz się kropki przy liczbach (a przynajmnierj przy ostatniej - największej). Innymi słowy jeżeli w pozycji Lp będą liczby jako liczby "moje" makro wstawiając kolejną pozycję będzie powiększać maksymalna liczbę Lp o jeden i wpisywać ją w pierwszej komórce wklejanego wiersza. (W kodzie makra za to odpowiada zmienna...
Witam Potrzebuje pomocy z napisaniem makra ale nie za bardzo wiem jak się za to zabrać. Jeśli ktoś mógłby pomóc byłbym wdzięczny. Mianowicie chodzi mi o makro , które wyszukuje w wierszu komórki o wartości np: 100, 200 i 300, jeśli znajdzie w wierszu wartość 100 przechodzi do pierwszej kolumny tego samego wiersza i wpisuje np "aaa", jeśli znajdzie 200...
kopiować wartość wskazanej komórki do kolejnej pustej komórki w kolumnie innego pliku Co znaczy "do ... komórki w kolumnie innego pliku" ? Tam jest kilka kolumn, gdzie w pliku źródłowym będą komórki-dawcy danych do zestawienia ? I co znaczy "wskazana komórka", będziesz zaznaczać myszakiem daną komórę i po wciśnięciu przycisku/wybraniu makra ma przenosić...
Naprawdę nie chcesz pójść w tym kierunku? Zobacz w pliku - Arkusz1 komórka A2 - wybierasz użytkownika i resztę danych przenosi ci się samo. Szybko, prosto i bez makr.
Witam, Napisałem makro, które ma za zadanie przenosić wiersze z jednego arkusza do drugiego, na podstawie wartości (tekstu) komórek, w jednej z kolumn (A), a następnie usuwa puste wiersze. Jest ono napisane w dość 'prymitywny' sposób, jednakże działa. Niestety jednak, nie radzi sobie zbyt dobrze z dużą ilością danych - wszystko wychodzi jak powinno,...
Powinieneś użyć offset https://wiki.openoffice.org/wi...dress, Indirect, Offset, Index To bardzo skomplikowane i nie znalazłem tego o co mi dokładnie chodzi. A co do numerowania, jak wpiszesz sobie 2 wartości, np 1 i 2, potem je zaznaczysz to możesz przeciągać, a jak chcesz X tysięcy to chyba ci tylko makro zostaje. Przeciągam i nic się nie dzieje....
Tak o to chodziło aby dane były w jednej komórce a adres przenoszony do komórki obok. A jak się włącza to makro? Proszę o krok po kroku jestem zupełnie zielony jak widać.
A ja tak do tego posta się dołączę i zapytam o makro co nie zakres komórek ma przenosić tylko wybrane komórki do nowego arkusza i ustawiać je w jednym wierszu. Mam już coś napisane ale nie działa. Proszę o pomoc. Kod makra: Sub zapisdobazy() ' ' zapisdobazy Makro ' Przyjmujący_zamówienie = Range("E6") ID_zamówienia = Range("E7") Sheets("Baza").Select...
Mam wers. 2016. Może sam dodaj w to miejsce listę poprzez poprawność. W źródle wpisz: https://obrazki.elektroda.pl/3302491600_... https://obrazki.elektroda.pl/6335000700_...
Witam! Jestem tu nowa i potrzebuję pomocy bardziej zaawansowanych użytkowników, ja dopiero staram się uczyć VBA, niestety napotkałam problem jak dla mnie nie do przejścia. Próbowałam przerobić inne makro na swoje potrzeby jednak ewidentnie coś jest z nim nie tak a ja nie potrafię zdiagnozować w czym problem. Przyznam, że nie mam już siły - może znajdzie...
Arkusz zbiera bezpośrednio dane pomiarowe z urządzenia. Zbieranie danych w programie zewnetrzym i export do excela jest rozwiązaniem mniej korzystnym, niż wstawienie danych do konkretnej komórki wskazanej przez użytkownika.
Witam Mam poniższy kod makra, który przenosi wartości z komórek w kolumnie "C" do komórek w kolumnie "CL", która pierwotnie jest pusta: [syntax=vbscript]Sub wstaw() Dim licznik As Integer Dim ostWrs As Integer Dim Nazwisko As String ostWrs = Range("A65536").End(xlUp).Row - 1 For licznik = 79 To ostWrs Step 93 Nazwisko = Range("C" & licznik).Value Range("CL"...
Utworzyłem arkusz z miesiącami w formie kalendarza Żeby nie tracić czasu na ręczne przewijanie zawartości skoroszytu w celu odnalezienia szukanego miesiąca, utworzyłem ikony przycisków do których przypisałem odpowiednie makra, w których podałem współrzędne konkretnych komórek. Przyciski działają, i makra przenoszą nas do tabel z odpowiednimi miesiącami....
Moje rozwiązanie - nieco inne, aby wygenerować zawartość drugiego arkusza ("Zamowienie") trzeba uruchomić Makro. [syntax=vb]Sub Makro1() ' ' Const R1 = "A1" ' pierwsza komórka nagłówka tabeli Const W = 6 ' szerokość tabeli Const Q = 5 ' kolumna z ilością produktów Const FixLP = True ' ustawić False jeśli ma kopiować LP z produktu Dim OF As Integer OF...
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ą...
Dzieki wielkie. Problemem bylo zle zapisanie sciezki pliku. Powyzsze rozwiazanie jednak nie do konca rozwialo moje problemy. Mam duza ilosc plikow do przeniesienia (za pomoca powyzszego kodu) problem polega na tym iz jesli w trakcie przenoszenia pojawi sie blad to przerwie on cala operacje (nie bede wiedzial ktore pliki sie przeniosly a ktore nie).W...
Jakoś nie widzę zastosowania makra do przenoszenia z Arkusz1 do Arkusz2 niepustych wierszy. Wygląda na to, że coś się zmieniło... Opisz wiec proszę co i jak ma być.
Witam! Mam makro, które przenosi wartości wstawione w kolumnach H, I oraz J do karty której nazwa jest identyczna z wartością tekstu wstawionego w kolumnie C dla wiersza w którym w kolumnach H, I, J ma przenieść dane. Dodatkowo w momencie przenoszenia danych do odpowiednich kart, kopiują się również informacje z datą raportu, zmianą jakiej dotyczy wstawiany...
Cześć, bardzo dziękuje za pomoc :) Efekt końcowy jest prawie taki jak chcieliśmy uzyskać. Nie mam zastrzeżeń, do działania bo wszystko działa tak jak trzeba, lecz: 1. Zamienione są dane Firma 1 (t) z numerem karty. Firma 1 (t) - to wartość wyrażana w tonach, czyli MASA z dokumentu WZ Numer karty - to ta górna wartość z dokumentu WZ, nr karty/przepustki...
aby makro wiedziało ze w danym pliku jest np tylko 850 Zaznaczanie do kopiowania/przenoszenia/itp. bez używania tzw. zmiennych. Jeśli masz tabelę w arkuszu, a w tabeli wiersze w kolumnach zachowują ciągłość danych, tzn. brak jest pustych komórek, to można w ten sposób:[syntax=vbscript]Range("H1", Range("H1").End(xlDown)).Copy[/syntax]lu...
Witam, Czy istnieje możliwość napisania w MS Excel makra, które będzie działało zgodnie z poniższym schematem: 1. W skoroszycie istnieje arkusz Jacek oraz Placek 2. W arkuszu Placek w zakresie A1:K500 występują wartości całkowite, które mogą się powtarzać 3. W arkuszu Jacek w kolumnie "W" istnieją wartości całkowite unikatowe - nie powtarzające się...
Dzień dobry, mam skoroszyt w którym jest 3200 arkuszy i każdego arkusza mam do skopiowania klika wybranych danych do kolejnych kolumn kolejnych wierszy podstawowego arkusza BAZA. Usiłuję napisać makro, które z każdego z tych arkuszy by przenosiło wybrane dane, utknąłem na takim etapie jak procedura podstawowa ma wrócić po kolejne dane do tego wybranego...
Witam wszystkich mam poważny problem z dodawaniem nowego wiersza za pomocą przycisku. Stworzyłem tabelkę, która zawiera wiele list rozwijanych i funkcji jeżeli to coś tam. Przycisk z odwołaniem do Makra dodaje mi kolejny wiersz zachowuje listy rozwijane ale nie przenosi funkcji i pojawiają się puste komórki. Czy może ktoś wie jak powinno wyglądać prawidłowe...
Za pomocą makra mam umożliwić użytkownikowi wpisywanie do komórki a1 tylko daty , a gdy makro to wykona , ma za pomocą funkcji TEKSTOWEJ przenieść do osobnych kolumn dzień miesiąc oraz rok. Tyle ,że te daty się kodują na kod daty kiedy używam funkcji tekstowej i przenosi mi np w kolumnę dzień liczbę 46
Witam, chciałem przerobić pewne makro ale jakoś mi nie idzie :/ Chodzi o to by dodać takie polecenie aby makro przenosiło dane do odpowiedniego arkusza w odpowiednie pole. Czyli jeśłi w komórce A1 wpiszę "Arkusz10" to dane z pól C1 oraz D1 zostaną przeniesione do tego właśnie rkusza w odpowiedni wiersz który jest w polu B1 Jest to wykonalne ?
Mam Arkusz Google, w którym są dwie karty. Pierwsza karta zamówienia, druga karta zrealizowane. W pierwszej karcie zamówienia mam w jednej kolumnie listę rozwijaną (sprawdzanie poprawności danych) bądź pole wyboru. Chciałbym napisać makro, które będzie sprawdzać po kolei każdy wiersz i w momencie, kiedy natrafi na komórkę z wybranym polem "ZAKOŃCZONE"...
Chodzi o to, że ma dane dotyczące klas są w arkuszu "dodawania danych", z którego przenoszone są do arkusza zbiorczego a arkusz dodawania danych jest czyszczony. Napisałam coś takiego: Sub klasa() Dim ileW As Long ileW = Arkusz1.Range("A8").Value If Arkusz4.Range("C53") = Arkusz1.Range("W9") Then Arkusz1.Range("W" & ileW + 10).Value = Arkusz4.Range("E53").Value...
lanzul dziękuję za odpowiedź... jestem początkującym vba-excelowcem i powiem szczerze, moje pierwsze makro, polegające na zaznaczaniu fragmentu zeszytu i przenoszenia go gdzie indziej powstało jakieś 2 tygodnie temu. Także dopiero się tego uczę, więc stąd toporność i kompletny beton mojego kodu, bo nie wiem jak np. dynamicznie zmieniać punkty odniesienia...
Witaj. Sama funkcja "znajdź wszystko" nie ma (przynajmniej w wersji Excela, której używam) funkcji umożliwiającej kopiowanie czegokolwiek. Natomiast Excel umożliwia napisanie makra, w którym da się zdefiniować dowolne czynności, w tym również porównywanie ze wzorcem oraz kopiowanie czy przenoszenie zawartości komórek.
Witam, Mając wykonany printscreen obrazku, z pozycji komórki, w której ma być wklejony, uruchamiam makro, które: - blokuje współczynnik proporcji - wstawia mi obrazek automatycznie pomniejszony do wysokości 2,5 cm - zmienia właściwości obrazu na "przenoś i zmniejszaj rozmiar wraz z komórkami". Już parę dni męczę temat i nie potrafię dopisać warunku,...
Witam, jestem początkującym w pisaniu makr. Walczyłem cały dzień aby napisać makro i nie wyszło dlatego proszę o wzór. Z arkusza „dane”, aby przenosiło komórki wszystkie z wiersza oprócz komórek z nagłówkiem „Ilość etykiet” do arkusza „widok” i skopiowało tyle razy, jaka jest wartość w komórce z nagłówka „ilość...
Witam, Czy znalazła by się osoba pomocna w napisaniu makra? Chodzi o makro rozbijające komórki "etapy pracy" na kilka po napotkaniu znaku ";". Jeśli pomiędzy kolejnymi znakami jest pusta przestrzeń ("; ;") taka wartość nie powinna być przenoszona. Dodatkowo makro miało by "przesuwać" kolejne wiersze w dół. Przykład jak to ma wyglądać umieściłem w załączniku....
Witam; Potrzebuję makra, które wykona następującą czynność: Zapisze dane z Arkusza1 do Arkusza2 (Tabela 1) Kolumna od1 do kolumna7 mają być wypełniane jeden raz ale po zapisie do tabeli muszą się dopisać do każdej pozycji z (Tabeli 2 ) W Tabeli2 może być wypełniony jeden wiersz, dwa , trzy lub wszystkie, w zależności od potrzeb. Po dopisaniu do tabeli...
Wszystko działa prawidłowo tylko tych danych mam dość dużo bo około 90 komórek do przeniesienia do dwóch arkuszy. Jestem jeszcze na początkowym etapie a działanie makra zaczyna się dość mocno wydłużać. Excel nie jest i nigdy nie był uważany przez Microsoft za narzędzie do developmentu oprogramowania
W zasadzie wszystko działa idealnie oprócz tzw. przeksięgowania ... :D Wpisuję numer RZ w komórkę "G-1" a następnie przyciskiem "Obciąż RZ" zdejmuję liczbę podzespołów z arkusza "RZ" ... :?: mechanizm arkusza "robi" rozliczenie tak jaby wszystkie dane tabeli arkusza "Przeksięguj" dotyczyły tylko RZ zawartego w komórce "G1"... :?: Po pierwszym użyciu...
Cześć, potrzebuję pomocy z napisaniem makra, które będzie przenosić dane z jednego arkusza do innego. W arkuszu1 będą dane w polach D3:D100 jeśli któraś z komórek spełni wymaganie (wartość1) np komórka D10 to komórka, to do arkuasz2 automatycznie przeniesie się wartość komórek F10, H10, I10, J10, K10. Problem polega na tym, że przenoszone wartości powinny...
jeżeli użyje formuły to muszę użyć formuły do każdej komórki, a chodzi mi oto żeby przenosiło do jednej kolumny np C, wiec formula odpada.
witam wszystkich, Mam prawie skończoną część swojego projektu, jednak brakuje mi małej modyfikacji makra. Otóż makro nie do końca prawidłowo kopiuje zawartość bloku. Potrzeba mi, żeby po wypełnieniu całego pierwszego bloku danych, makro kopiowało poniżej następny blok, ale w skopiowanym bloku przenosiły się tylko wartości nagłówków oraz wartości z komórek...
Witam wszystkich forumowiczów Jestem początkującym użytkownikiem vba i natrafiłem na problem, przez który nie mogę ruszyć dalej: Stworzyłem Userforma, który ma za zadanie przenosić wartości z textboxów do kolejnych pustych komórek. Makro działa dobrze, jednak mam problem z numeracją wiersza w pierwszej kolumnie w tej samej linii, w której wprowadzane...
Przenoszę opcje do komórki I1, I2, I3, I4... w 'dzieleniu': Rows("2:2").Clear - usunie I2, bedzie od J2 wprawo
Witam! Potrzebuję pomocy z odpowiednim zaprogramowaniem makra. Opisuję dokładnie czego potrzebuję - mam w pliku 2 arkusze : "m-ki" gdzie w kolumnie A mam kolejno wypisane materiały a w kolumnie B do każdego materiału mam przypisany index "karta wadliwe" jest to karta finalna, do której chciałbym aby po podwójnym kliknięciu w wartość z komórki A w karcie...
Witam, Mam taki problem: Łączę kilka plików z jednego folderu w jeden plik (w jednym arkuszu). Wykorzystuję do tego poniższe makro. Chciałbym, aby zamiast formuł do docelowego pliku przenosiły się wartości z komórek wyjściowych. Problem jest pewnie banalny, ale nie bardzo znam się na VBA. Z góry dzięki za pomoc. [syntax=vb]Sub Merge() Dim bookList As...
"=RC Tak Nie wiem jeszcze czy okaże się szybsze, ale warto spróbować. Jeżeli podłączysz makro pod skrót klawiszowy (obsługiwany jedną ręką), np w stylu CTRL+D to wbrew pozorom będzie to szybsze niż to co teraz robisz. A szybciej nie osiągniesz nic więcej bo przecież też żeby wkleić wciskasz ctrl+v. Po prostu stajesz myszką na danej komórce, wciskasz...
Działa ale też nie do końca tak jak trzeba - nie przenosi szerokości komórek i formatowania warunkowego. Ale spox poradziłem sobie w inny sposób. Na bazie poprzedniej procedury nagrałem sobie makro, które usuwa zbędne wiersze i zmienia nazwę arkusz i pozamiatane. Jeszcze raz wielkie dzięki za pomoc.
Przenosić wartości komórek z wybranego pliku w zdefiniowane wcześniej komórki w pliku z aktywowanym makrem :) Przykład: Z pliku o nazwie 1234.xlsx (plik chce dowolnie wybrać Application.GetOpenFileName) przenieść wartość komórek "b2, b82, c41, e75" itd. do pliku 4321.xlsxm w którym aktywowałem makro do komórek o tym samym położeniu "b2, b82, c41, e75"....
Witam, Posiadam w pracy pewien program zakładowy do którego muszę wklepywać numery zamówień. Jest to trochę męczące zajęcie, ponieważ na dzień mam 150 pozycji do wpisania a właściwie przepisania z arkusza w excelu. Każdy numer muszę przepisac lub wkleić osobno. Każdy numer zamówienia mam w osobnym wierszu, dlatego po kolei kopiuje sobie komórkę i wklejam...
Tak to powinno działać. 1) Komórki C3:D5 powinny się przenieść do C30:D32 - z I zmiany 29 maja do III zmiany 28 maja; 2) Komórki C6:D8 powinny się przenieść do E24:F26 - z II zmiany 29 maja do I zmiany 29 maja; 3) z komórkami C9:D11 nic się nie dzieje ponieważ jest to zmiana wolna - nic nie jest wpisan; 4) I tak cały 30 maj pozostaje bez zmian; 5) Z...
...W pliku który mi przesłałeś nie wiem czemu ale nie ma żadnych przycisków do makr ... Bo i być nie powinno ... w zamyśle miało być menu " KOSZTORYS " i takie w tych " Dodatkach " widać - w teorii, jak się je kliknie, powinno pokazać coś takiego jak poniżej na drugim obrazku - wygląd w starym excelu: 838683 838684 ... Zauważyłem, że: 1. jak dodaje...
Przerobiłem kod do swoich tabel i wydaje mi się, że wszystko zrobiłem ok, ale pokazuje mi błąd w linijce: [syntax=vbscript]b.Range("C" & s + 5 & ":BL" & s + 88).PasteSpecial xlPasteValues[/syntax] Czy to może być efekt tego, że w rzeczywistości niektóre komórki w tych tabelach są scalone. Załączam plik oryginalny. W pliku tym znajduje się też ten kod,...
przenoszenie komórek makro przenoszenie kolumn makro przenoszenie wierszy
śrubki srubki laptopa klawiatura czyszczenie zalaniu licznik honda
wymiana stopy tefal afore bnt004
Zwarcie na kablu wentylatora Indesit – dwa plusy na przewodach, przyczyny i diagnostyka Neoplan N316 – brak kontrolek na desce, nie działają kierunkowskazy, MOKI, przekaźnik X, bezpieczniki