aby od aktywnej komórki ma być kopiowana z innego arkusza do aktywnej komórki w tym arkuszu Aktywna komórka nie może być jednocześnie w arkuszach.
Poniżej XLSy
Zastosuj pętlę [url=http://dzono4.w.interia.pl/kurs/for... Next, gdzie jako licznik końca podstaw wartość z komórki.
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...
Dzięki wielkie, Działa, aczkolwiek nie do końca jak chcę. Makro kopiuje wiersze, gdzie w kolunie G jest wartość większa niż 1, ale tylko raz. Ja chcę, aby kopiowało wiersz tyle razy ile jest wpisane właśnie w kolumnę G i tą wartość zamieniało na "jedynki". Czyli, jeżeli np. w komórce G2 mam wartość 5 to makro ma wstawić poniżej do wierszy od 3 do 6...
wpisywane "ręcznie", a nie poprzez formuły - jak ogarnąć drugą część mojego problemu? Żeby wykorzystać makro zdarzeniowe :D to proponuję wykorzystać jednak inną kolumnę np. wolną obecnie kolumnę A :spoko: . W załączonym pliku proponuje w przedostatniej komórce kolumny A wprowadzić wartość 1 , a wówczas cały ten wiersz (od B do AH) zostanie wstawiony...
Jak miałoby to wyglądać? Od daty do daty? Wyłączając opłacone? Zgodnie z zasadami księgowości nota odsetkowa tyczy się faktur już zapłaconych, ale poza terminem. Czyli za czas spóźnienia. Może się tyczyć tych jeszcze nie opłaconych (na dzień sporządzenia noty) ale wtedy jest "kłopot" z wyliczeniem wartości odsetek za zwłokę bo dzień sporządzenia noty...
automatycznie skopiowały się poniżej tabelki To spróbuj wykorzystać makro powiel() (uruchamiane skrótem ctrl+p ) :idea: :D z załączonego pliku. Dla pewności działania konieczne jest formatowanie ilości (Qty) jako liczby, a nie jako tekst :cry: (jak w Twoim przykładzie) :!: 1026922 1026916
Witam wszystkich, jestem początkująca w pisaniu makr i VBA i mam problem z kopiowaniem części kolumny. Może był już poruszany ten temat ale go nie znalazłam, ani nie znalazłam odpowiedzi w podobnych. Napisałam kod metodą prób i błędów ale nie działa tak jak chcę. Kopiuje wybrany zakres z kolumny ale wkleja go gdzie popadnie. Chodzi mi o to żeby zakres...
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...
Makro poniżej przesuwa nazwiska w prawo o wartość numeru grupy+1, a następnie usuwa puste komórki w obszarze danych. Nazwiska nie są posortowane. Jeżeli jest potrzeba. sortowania to na początku makra dopisać sortowanie.[syntax=vbscript]Sub Przepisz_Nazwiska() Dim Tab_Opis As Variant With ActiveSheet Tab_Opis = Array("Grupa 1", "Grupa 2", "Grupa 3",...
Witam. Mam arkusz "obliczenia" w którym są dane liczbowe i puste komórki. Zależało by mi aby makro działało w następujący sposób: 1. po pojawieniu danych w tym arkuszu "obliczenia" makro samo się uruchamiało. 2. Chciałbym aby kopiowały się te dane, które są większe od zera( dokładniej nie kopiowało pustych komórek). Dane są od komórki F4. 3. makro...
Wielkie dzięki, bardzo pomogłeś dokładnie o to chodziło, o takie kopiowanie jednak czy dało by radę te komórki które są zaznaczone jako siwe, żeby się nie kopiowały po wypełnieniu? Chodzi o to że one po skopiowaniu powinny zostać uzupełnione przez potecjalnego użytkowaniak, a to co jest w białych jest kopiowane do tych poniżej w postaci niezmienionej,...
Ja myślę że kolega k4stor zrozumiał, że ma 1000x kopiować numer ewidencyjny do funkcji WYSZUKAJ.PIONOWO, gdy chodzi o to, żeby było to odwołanie do komórki (obok). Ze swojej strony dodam, że oprócz przeciągania istnieje "mały czarny kwadracik" w prawym dolnym rogu zaznaczonej komórki, którego kliknięcie wypełnia formułą wszystkie komórki poniżej. Ba,...
Witam, Potrzebuję zrobić przycisk, który skopiuje mi wartości z zakresu komórek i wklei je w miejscu, które jest okreslane w nastepujący sposób: Mam komórkę z daną wartością np. 4 i teraz chce aby po kliknięciu w przycisk skopiowały się komórki określone w makro i wkleiły się o dana ilość kolumn w prawo od referencyjnej kolumny/komórki. Poniżej kod,...
Witam. Domyślam się że to co potrzebuję jest bardzo proste. Mianowicie potrzebuję pomocy żeby stworzyć przycisk dzięki któremu będę mógł kopiować wartości z jednego arkusza do aktywnego arkusza (w którym znajduje się przycisk) do konkretnej kolumny z tym żeby jak będzie kopiować do kolejnego pustego wiersza. Czyli np. po naciśnięciu przycisku z arkusza...
Przesyłam raz jeszcze załącznik, jest to samo makro, bez arkusza. Na wszelki wypadek wklejam makro poniżej [syntax=vbnet]Sub Kopiuj_obszar() Set a = Sheets(1) Set b = Sheets(2) KOL = 3 FOR ILE_KOPII = 1 TO 3 For NW = 2 To 7 FOR NK = 2 to 50 b.Cells(nw, NK + KOL) = a.Cells(NW, NK) NEXT Next KOL = KOL + 9 NEXT End Sub[/syntax]
Przyczyną błędu jest tylko to, co napisał adams_nt : powinna być deklaracja typu jak poniżej: Ewentualnie program mógł by sprawdzić czy akrusz B jest otwarty, jeżeli jest nie otwierać go ponownie a jeżeli jest zamknięty otworzyć go. Założyłeś, że Twoje makro będzie kopiować z pliku B.xls aktualnie zaznaczony wiersz - ono nie otwiera pliku [ponownie]....
Potrzebne będą dwie zagnieżdżone pętle. W przykładzie poniżej, makro porównuje nazwę arkusza z fragmentem ciągu w komórkach kolumny 'A'. Urozmaiciłeś nieco różną wielkością liter, dlatego LCase . Do modułu wklej [syntax=vb]Sub Kopiuj() Dim wk As Workbook, ark As Worksheet, myFile As String, wrs As Long myFile = "c:\Statystyka.xlsx" 'ścieżka i nazwa...
Wytłumaczenie dosyć proste: użyłeś zdarzenia odpalanego przy jakiejkolwiek zmianie w którymkolwiek arkuszu, bez żadnych dodatkowych zabezpieczeń/warunków... Jeżeli to makro wypisuje jakąkolwiek wartość do innej komórki, automatycznie odpala kolejne zdarzenie i program się zapętla... Zamiast globalnego zdarzenia, użyj zdarzenia Worksheet_Change w arkuszu...
Witam Forumowiczów, jako, że nie znam się kompletnie na pisaniu makr w Excelu proszę o pomoc. Tworzę pewnego Excela i nie mogę przejść w nim jednego kroku i tu będzie potrzebne chyba makro, bo funkcjami Excela chyba nie można tego wykonać. A więc tak. Mam tylko jedną kolumnę, w której występują 0, po kilkunastu zerach pojawia się jedynka następnie dalej...
Witam, Mam problem z makrem, które znalazłem na forum i które staram się przerobić pod moje potrzeby. Docelowo, makro ma sprawdzać czy w komórce w kolumnie F arkusza 1 jest wyraz "tak" i jeżeli to się potwierdzi to kopiować w pierwsze wolne miejsce w kolumnie D akrusza 2 zawartość komórki B arkusza 1. I jednocześnie usuwać ten wiersz z arkusza 1. Poniżej...
Witam serdecznie Kolegów. Mój problem polega na stworzeniu makra do excela, który kopiuje konkretne komórki do nowego arkusza. Nie są to całe wiersze czy kolumny, ale wybrane według pewnego algorytmu. W pierwszym arkuszu (cennik) znajdują się kolumny: A-nazwa usługi B-cena netto C-ilość szt. z VAT 8% D-ilość szt. z VAT 23% Załóżmy, że w wierszach znajdują...
Witam Musze przekopiować wiele pojedynczych komórek z jednego arkusza do drugiego. Kopiowanie danych musi się odbywać z zachowaniem formatowania i odniesienia do list słownikowych. Kopiowanie odbywa się po jednej komórce ponieważ makro musi być uniwersalne i pod parametry w i k, poz i kol_doc wpisywać zadane wartości. Przy poniższej operacji trwa to...
Witam ponownie Zacznę od tego, że mam takie dane w excellu: 1293.2750.4324.1294.2750.3765. 0. 0. 0. 1. 1. 1. 1. 2. 3. 1. 2. 3. I teraz chciałabym napisać takie makro, które kopiuje mi komórki z pierwszego wiersza jeżeli w komórkach w wierszu poniżej wartości są takie same. Chciałabym, żeby te skopiowane wartości (tutaj akurat po 3) były kopiowane do...
Witam! Po głębszej analizie zauwazyłam, że makro działa poprawnie tylko do momentu wprowadzenia danych w komórce J15 lub niżej - wtedy wolny wiersz zaczyna liczyć od ostatniej faktycznie użytej komórki w kolumnie J czyli wstawia w J16, nastepnie J17 itd. Można jakoś zmodyfikować kod aby wartosci kopiowały się tylko w wiersze w zakresie od 4 do 14, nawet...
Witam serdecznie, Potrzebuje pomocy w napisaniu marka, poniewaz sam nie potrafię. Tabela: W kolumnie T w kolejnych wierszach są wpisane jako tekst ścieżki na dysku. Czasem jest to jedna ścieżka, a czasem dwie lub trzy oddzielone ";" (średnikiem). Czyli ścieżki to takie główne wartości oddzielone ";" średnikami. Makro: Makro ma przeszukiwać tekst (wartości)...
Osobiście wolę korzystać z funkcji Dir . FileSerch potrzebuje referencji i lubi stwarzać problemy. Poniżej przykład z pętlą. Jeśli daty w nazwach są w stałym formacie można sobie ułatwić podstawiając dzisiejszą datę. Dla wczoraj będzie to Date-1, itd Oczywiście dla wielu plików przypisanie nazwy odbywać się będzie wewnątrz pętli bez wychodzenia, ale...
Witam Jestem jeszcze zielony w makrach excel, dlatego potrzebuję Waszej pomocy. Chciałbym stworzyć makro kopiujące dane z wielu plików excel do jednego pliku zbiorczego. Założenia: 1. Wiele plików dawców *.xls o różnych nazwach znajdujących się w tym samym folderze 2. Kopiowanie z pliku dawcy z zakresu arkusza "Tabela wyników" z komórek A2 do D51 3....
Poniższe makro wstawi tą formułę w 20 komórek poniżej zaznaczonej komórki: i : [" & i & ".xls]. To tak na przyszłość, jakbyś chciał to kiedyś zmodyfikować.
Witam, mam pytanie czy ktoś by mi pomógł ponieważ mam do zrobienia proste makro natomiast ze względu na to iż nie bardzo orientuje się w temacie potrzebowałbym z tym pomocy. W załączniku jest plik: Makro, które potrzebuje: ma za zadanie skopiować komórkę z kolumny B (arkusz Dane) do arkusza Formularz do komórki H2 i wtedy wydrukować. i tak w kółko dla...
Można na kilka sposobów. Poniżej masz jeden z nich: [syntax=vb] Sub Auto_close() ' ' Makro1 Makro ' Application.DisplayAlerts = False Range("C5:Q5").Select Selection.Copy Do ActiveCell.Offset(1, 0).Select If ActiveCell.Value = "" Then Exit Do Loop Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False...
Problem jest taki że makro w Excelu nie zaciąga danych z komórek odnoszących się do innego arkusza. Przypominam, że na prośbę autora postu kod został dostosowany do ściągania danych tylko z pierwszego arkusza wszystkich plików ze wskazanego folderu :D Tak było Port, nie przedstawiłem zagadnienia odpowiednio szeroko i teraz się meczę straszliwie :(...
Poniżej plik z działającym makrem.
Witajcie, przychodzę z kwestią zawiłą w moim mniemaniu, znalazłem rozwiązania poszczególnych etapów zadania, stworzyłem formuły, kopiuję je i mam czego potrzebuję, jednak nie potrafię połączyć tego w makro a wykonywanie pojedynczych czynności x 1000 jest pracochłonne o istnieje ryzyko błędu. Gdyby była to kwestia jednorazowa to nie poruszał bym w ogóle...
Prawie działa, tylko potrzebuję by było wklej specjalnie - wartości . Przy takim zapisie jak poniżej nie wiem gdzie to wpisać
Witam, mam taki problem potrzebuje makro, które znajdowałoby mi wartość w kolumnie B - || i kopiowało imię nazwisko oraz numer do stworzonego wiersza poniżej. Jeśli w kolumnie autorzy jest jeden autor skopiować dane do kolumny powstałej C stan początkowy http://obrazki.elektroda.pl/8788959900_1... efekt jaki chce uzyskać http://obrazki.elektroda.pl/8298584700_1...
Witam, pokrótce opisz mój problem na podstawie zamieszczonego poniżej pliku 'przykład1'. Makro które w nim utworzyłem ma za zadanie: kopiować z arkusza '3' wiersz z ciągiem 4 cyfr do arkusza '1'. Potem z tego arkusza kopiować kolumnę 'J' do arkusza '4'. W przypadku analizowanego przykładu, makro ma się zakończyć, gdy wszystkie wiersze (30) z arkusza...
Witam. Chodzi mi dokładnie z pliku A do B, w każdym pliku jest ok 10 ponumerowanych skoroszytów, np. od 1 do 10 . Po wprowadzeniu wszystkich danych do pliku A na wszystkie skoroszyty np. do kolumn A1:B50 tak aby makro skopiowało je do np: C1:D50 w pliku B, oczywiście tyczy się to większej ilości kolumn a to jest tylko przykład . Dodano po 13 Poniżej...
witam :) Próbuje napisać mały programik jednak cały czas mam jakieś błędy, a na niektóre rozwiązania brak mi pomysłów. To mój pierwszy program, dotychczasowe wypociny opieram na tym co wyczytałem w internecie. Chciałbym stworzyć makro w Excelu, miałby to być wykaz uwzględniający wszystkie informacje z pozostałych zakładek (które edytowane są ręcznie)....
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...
Przeglądałem, ale jakiś czas temu, po rejestracji (kilka miesięcy temu, z tego co pamiętam) :) Korzystam z forum po raz pierwszy. I mocno przeceniłem swoje umiejętności pisania makr w Excelu, a także okazuje się że również definiowania problemów :/ Dodano po 18 zamotałem się trochę :/ mam makro, które po wciśnięciu Przycisku CommandButton dodaje arkusz...
Tak znalazłem przez przypadek ten wątek to umieszczę swoje rozwiązanie bo... jeżeli mamy wiele wierszy do przeglądnięcia (np. 100 000 czy 500 000) to "lecenie" pętlą komórka po komórce jest wolne :/ Ja zawsze w takiej sytuacji korzystam z .Find dzięki temu pętla obraca się tylko tyle razy ile jest szukanych elementów :) czyli nawet jak masz 500 000...
Całość wygląda tak: W Wordzie mam duży tekst (ponad 1000 stron), z wieloma rozdziałami (ponad 300). Z każdego rozdziału muszę wybrać teksty "zielone", pozbyć się niepotrzebnych znaków, sprawdzić i poprawić ewentualne błędy (dla bezpieczeństwa dotychczas kopiowałem rozdział do osobnego pliku), i w kolejności występowania przenieść do konkretnej komórki...
Wiem, że może ten kod nie był idealny, ale niestety clubs Twoja propozycja też nie działa. Rezultatem jest błąd : Run-time error'9'9: Subscript out of range Może przybliżę bardziej makro, które napisałem. Makro ma za zadanie otwarcie pliku "matki" do którego kopiuje pewne dane, następnie zapisuje go pod odpowiednia nazwą w odpowiedniej lokalizacji....
Cześć, Zwraca się do Was z prośbą o pomoc. Mam pewne makro, którego wycinek wklejam poniżej: [syntax=vbnet] Sub TmToStr2(ow As Long) With Sheets("Arkusz2") For i = 2 To ow zwrot = "LE" BH = "BH" startOD = 1 Dim x As Integer With Sheets("Arkusz2") For x = 1 To 10 If InStr(startOD, .Cells(i, 7), zwrot, vbTextCompare) = x Then .Cells(i, 5) = .Cells(i,...
Moim zdaniem, całkowicie subiektywnym, najlepiej byłoby stworzyć gotowy plik raportu i tylko edytować dane (kasować stare i zapisywać aktualne). Pomyśl, że przecież trzeba ten plik "ładnie" opakować: jakieś nagłówki, opisy, wielkość czcionki czy inne kolory... Dlatego zrobiłbym to raz. Na ten pomysł także wpadłem ale sobie już <chyba> poradzę...
Dzień dobry. Chciałbym mieć formułę lub makro, które pozwoliłoby mi wyszukać w kolumnie A prawidłową nazwę przedmiotu na podstawie czterech pierwszych znaków w innym arkuszu: Zaznaczona komórka (4F562 Półka 60-2), którą chciałbym zostawić na swoim miejscu w arkuszu, ale zmienić jej nazwę https://obrazki.elektroda.pl/7465854100_... Na...
https://obrazki.elektroda.pl/4334732600_... chodzi mi o to, że jak nacisnę zmiana asortymentu to powyższa tabelka mi się skopiuje i wklei poniżej przycisku. Ogólnie to jeszcze umiem napisać i nagrać, ale w jednym arkuszu mam wiele zmian i pod każda zmianą taki przycisk. A taki przycisk nie działa dla innych zmian, tylko dla pierwszej....
Witam, Potrzebuję pomocy z napisaniem makra (najlepiej gotowca ze względu na znikomą znajomość VBA), które będzie miało za zadanie automatyczne skopiowanie wartości w komórki poniżej w zadanym zakresie (by robić to etapami). Moja wiedza kończy się na tym etapie: [syntax=vb] Sub Makro2() ' ' Makro2 Makro ' Range("C39:D39").Select Selection.Copy Range("C40").Select...
Witam serdecznie, Mam drobny problem (dla was drobny), chcę aby w moim zleceniu po zapełnieniu przez użytkownika wszystkich przygotowanych pozycji mógł on dodać kolejną odpowiednio skonfigurowaną. I tak nagrałem makro które kopiuje mi przygotowane pola, odnajduje w arkuszu pierwszy wolny wiersz i wkleja mi to co przygotowałem. Jest jeden problem chciałbym...
Witam i przypominam się w temacie mam jeszcze pytania otóż chciałem by moje makro po uruchomieniu: - zaznaczało od komórki H9 wszystkie uzupełnione wiersze w dół a następnie w lewo po czym kopiowało je i dodawało je do tabeli w nowym arkuszu, przy czym rozpoczynało dodawanie od pierwszego nie uzupełnionego wiersza w nowym arkuszu: nw = Sheets("DANE...
Przyznam że jak dla mnie to nie do końca zrozumiale napisane. Spróbuj usiąść i na spokojnie opisać co ma się "dziać". Ty wiesz o co chodzi ale my nie do końca (nie wszystko jest jednoznaczne). Po pierwsze "arkusz posortowany wg nr zamówień" czyli wg jakiej kolumny? Z tego co zrozumiałem makro powinno sprawdzać order-id i client i jeżeli zauważy że kolejny...
Cześć, Potrzebuję pomocy przy napisaniu makra, które będzie kopiowało i wklejało dane - a konkretnie musi do być pętla, ponieważ tych danych jest sporo. Niestety jestem początkująca i potrafię to zrobić tylko na piechotę... Poniżej przykład kodu: [syntax=vbscript]Dim ws As Worksheet Set ws = ThisWorkbook.Worksheets("Arkusz1") With ws .Range("K2:M2").Copy...
Witam, po raz kolejny dziś stanąłem przed ścianą. Mam problem z danymi które ściąga mi makro z kwerendą. W liczbach jest kropka oddzielająca całości od dziesiętnych co uniemożliwia mi ich obróbkę. Wymyśliłem sobie coś takiego co załączyłem poniżej. A więc kwerenda wrzuca mi dane w zakres komórek A2:C20 ja to kopiuję niżej i po skopiowaniu zamieniam...
Wielkie dzięki za pomoc! Zmieniłem trochę twój kod do moich celów. W twoim kodzie makro kończyło pracę gdy w pierwszej kolumnie napotkało pierwsza pustą komórkę. Potrzebowałem mieć pewność, że wszystkie dane zostaną skopiowane. Dlatego też zmieniłem pętle DO WHILE na pętle FOR i użyłem funkcji adamas_nt . [syntax=vb] Sub Copy() Dim myPath As String...
witam Was serdecznie ;) Mam problem ze zrealizowanej pewnego makra. Postaram sie opisać w jaki sposób program ma działać na bardzo uproszczonych danych. Poniżej zamieściłem również prezentacje graficzną tego co ma zrobić makro. Na wstępie jedno podstawowe pytanie: skąd Wy bierzecie różnego rodzaju wymyślne funkcje, z jakich materiałów korzystacie? ja...
Witam jakiś czas temu eksploatowałem makro jak poniżej [syntax=vb]Private Sub CommandButton4_Click() On Error GoTo myErr Application.ScreenUpdating = False nazwa_arkusza1 = Range("L1") wiersz_naglowka = 11 ost_wiersz = Range("A65536").End(xlUp).Row ost_kolumna = Cells(wiersz_naglowka + 1, 255).End(xlToLeft).Column Set ws = Worksheets(Worksheets.Count)...
Witam - chciałbym dołożyć pytanie do tego wątku. Mianowicie, czy można wykorzystać konkretną komórkę (przy użyciu funkcji cells (w, k), do tego by określić lokalizację danego pliku. Pytam, gdyż chciałbym w prosty sposób móc pobierać dane, bez konieczności ich każdorazowego otwierania i kopiowania. http://obrazki.elektroda.pl/4558130500_1...
Zamykając temat. W pierwszym poście tego tematu jest kompletny kod pod EXCEL 2003 i XP (sprawdzony) Poniżej przedstawiam kod sprawdzony na EXCEL 2007 ( w większości opisane co i jak) [syntax=vb] Sub OperacjeHurtowe() 'makro dla excel 2007 'nazwa pliku startowego start2.xlsm i jest umieszczony w folderze w którym znajdują się podfolery z posortowanymi...
JRV, dzięki za dobre chęci. Tylko, że taki kod do wpisywania zakresu kopiowania danych, powoduje, że trzeba wpisywać zakres po kolei dla wszystkich plików, a ja chciałem aby można było wpisać jeden raz dla wszystkich plików. Na chwilę obecną mam już wszystko zrobione, wszystko już działa jak należy, łącznie z licznikiem scalonych plików :D . W razie...
Witam poniżej zamieszczam odpowiedź skonstruowaną przez właściciela serwisu: http://office.info.pl/ Przetestowałem wszystko działa jak należy, jeśli ktoś nie zna VBA jest to idealny sposób i bardzo prosty w wykonaniu. (...)"można to zrobić na dwa sposoby: 1) zawsze za pomocą VBA - czyli oprogramować Makro; 2) "sposobem/sztuczką" :) i ten przedstawię...
Czy można zmodyfikować poniższe makro Pewnie można ... jak się komuś będzie "chciało chcieć" ... : ) ... ale wpierw parę uwag dla przyszłych twoich "modyfikacji": 1. xlOpenXMLWorkbook - podawałbym kody liczbowe (w tym przypadku jest to 51) zamiast nazwy stałych, będzie bezpieczniej jeśli plik będzie otwierany w różnych wersjach excela: Function CopyDataRangeP...
Witam W załączniku jest plik Excela o nazwie "pomoc2". W tym pliku mamy dwa arkusze o nazwach: "DANE" i "BAZA". W arkuszu "BAZA" w wierszu czwartym znajdują się cyfry od 1 do 10. W skrótowym opisie jest to kolejność w jakiej powinny być wklejone dane do arkusza "DANE" dla każdego symbolu. Dla ułatwienia i czytelniejszego zrozumienia o co mi chodzi,...
WITOJCIE. Napisałem makro, które ma porównywać wartości w różnych plikach, jeśli znajdzie takie same komórki to kopiuje komórke która znajduje sie obok w odpowiednie miejsce w drugim pliku (ale to nie jest ważne). To co sprawia mi kłopot to potrzeba używania różnych nazw pliku, a w poleceniu Windows("nazwa_pliku").Activate nie da użyć się zmiennej Sub...
No trochę źle wyjaśniłam o co mi chodzi Wiec Arkusz1 to wzór, tak bym chciała, aby wyglądały wszystkie tabele, ale to rozwiązanie sprawia, ze kopiuje się znacznie więcej wierszy niż jest to potrzebne w danejtabeli (po 1700 tyle ile jest w tabeli źródłowej (tabela źródłowo, może być bez obramowani a i nagłówków, bo i tak dane będę importowane...
Witam. Przeszukałem już wiele postów, ale nie znalazłem odpowiedzi na pytanie. A mianowicie mam następujący problem - chcę stworzyć bazę wypożyczanych i oddawanych elementów, w pliku bazowym Excela mam bazę elementów, są one opatrzone nazwą i numerem katalogowym (ponad 3000 elementów), otrzymuję WZ i PZ w formie pliku csv po każdym wydaniu lub zdaniu....
Jeszcze raz dzięki, co do nagłówka już sobie poradziłam (poniżej kod - dla zainteresowanych). Private Sub Dzielenie_Click() Dim wbBook As Workbook Dim wsSheet As Worksheet Dim rnStart As Range Dim rnData As Range Dim i As Long Application.ScreenUpdating = False On Error GoTo myErr Set wbBook = ThisWorkbook Set wsSheet = wbBook.Worksheets("Prowizja&quo...
Witam Mam bazę danych w Accessie, z której zaciągam dane do exela następującym makrem: [syntax=vb]Sub Zaciagnij() Dim strMyPath As String, strDBName As String, strDB As String, strSQL As String Dim i As Long, n As Long, lFieldCount As Long Dim rng As Range Dim wartosc1 As String Dim adoRecSet As New ADODB.Recordset Dim connDB As New ADODB.Connection...
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...
Po kilkudniowych męczarniach wpadłem na pewien pomysł z wykorzystaniem szablonu "makememos" z książki "Excel 2003 Programowanie w VBA Vademecum profesjonalisty". Sens jest taki że program ma tworzyć plik w wordzie gdzie kopiuje tekst z komórek , potem zaznacza cały tekst w wordzie i go kopiuje :). Jest jeszcze kilka nierozwiązanych kwestii i prosiłbym...
Serdecznie dziękuję! Teraz jest idealne! Ja co prawda sam wróciłem do kopiowania ostatnich trzech kolumn w ostatnim kodzie poprawionym przez Ciebie bo poległem przy zaokrągleniach , a tak było prościej. Nie mogłem też na razie dojść do tego jak zaznaczyć cały zakres nowo powstałej tabelki aby zrobić "wypasione" obramowanie. Podpowiesz jaki zakres wybrać?...
Dzień dobry, Bardzo proszę o pomoc z makrem, potrzebuje pętle które będzie miała za zadania kopiowanie i wklejanie w odpowiednie komórki między arkuszami aktualnie mam napisane makro ale niestety sam nie potrafię jeszcze stworzyć takiej pętli Dodano po 3 Mam już coś takiego ale jeszcze nie jest to co bym chciał osiągnąć Potrzebuje dla następnego wiersza...
Witam, niestety jestem zielony w temacie VBA. Mam plik, który po rozdziale z użyciem Text to Columns -> Delimited -> Comma wygląda jak w pliku Material Balance 904715 . Chciałbym aby makro odnajdywało komórkę zaczynającą się tekstem "material stream" kopiowało zakres komórek znajdujących się poniżej tej komórki, aż do momentu odnalezienia kolejnej komórki...
makro kopiowanie komórek makro kopiowanie komórek niepustych makro kopiowanie komórek formuł
nabłyszczacz zmywarka bosch bramka router synchronizacja czasu windows
traktorek silnik briggs traktorek silnik briggs
Prądnica G-11 do silnika S-312B Ursus C-328 – symbol, parametry, zamienniki Weintek HMI – data i formaty w alarmach, konfiguracja Event Log, synchronizacja czasu