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...
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ć.
Coś takiego powinno zadziałać :-) [syntax=vbscript] Sub raport_pobrań () Dim fileName As Workbook Dim path As String Dim sheetName As String Worksheets("POBRANIA").Select path = "D:\rary\Raport POBR.xlsm" Set fileName = Workbooks.Open(path) ThisWorkbook.Activate For wiersz = 6 To 36 sheetName = Range("N" & wiersz) If sheetName <> "" Then With...
Dzięki za ten trud który stworzyłem !! Jutro w pracy będę działał jak coś to już wiem jak usunąć umowy w makra :) Pozdrawiam
Czy w otwartych skoroszytach (wystarczy w jednym) są (mogą być) makra?
Witaj, wszystko jest możliwe [syntax=vb] sub Idziemy() Dim tbl As Range Set tbl = Sheets("Jacek").Range("W:W").Cells If Application.Intersect(ActiveCell, Range("a1:k500")) Is Nothing Then MsgBox "Bledne odwolanie - wybierz poprawna komorke" Else r = Application.Match(ActiveCell, tbl, 0) Application.Goto tbl(r) End If end sub [/syntax]
makra, które będzie przenosić dane z jednego arkusza do innego Efekt taki możesz uzyskać np takim kodem: 968551
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,...
k = b.Range("A1:AN1").Find(What:= Cells(1, x) , LookIn:=xlValues, LookAt:=xlWhole, _
To może jaśniej - mam makro, którego zadaniem jest scalenie dokładnie 9 plików excel do jednego zbiorczego pliku. Makro scalające jest powyżej. Może i koślawe ale działa :) Do tego makra chcę dorzucić filtr, mający za zadanie scalić dane od - data początkowa, do - data końcowa. Obie daty, mogę wprowadzać w odpowiednie komórki w arkuszu, przed generowaniem...
Tu mam wrażenie że jest coś z synchronizacją pomiędzy zamykaniem pliku i kończeniem makra, tak jakby zamykanie pliku trwa a on już skończył makro i dlatego się widok nie odświeża a przycisk cały czas jest jakby wduszony - nie odciska się, i wtedy czegoś mu brakuje, szukam sposobu by je jakoś zatrzymać może jakiś pasek postępu
Teraz OK. A jak zmodyfikować linijkę If key = 6 Then Arkusz3.PrintOut Copies:=1 żeby poszło na drukarkę inną niż domyślna Nazwa drukarki do XEROA5 PS. Modyfikacja załącznika nie potrzebna. Ja i tak kopiuję kod VBA i wklejam do swojego makra.
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)
Jeżeli chodzi o przenoszenie formatowania to excel właściwie nie ma żadnych funkcji. Można to zrobić jedynie poprzez makro (VBA) lub "pisaniną" poprzez formatowanie warunkowe i to w excelu 2007 i powyżej, bo niższe mogą mieć tylko max 3 warunki. Ten kto zna jako-tako programowanie w VAB może sobie poradzić. Ten kto nie ma pojęcia na początku upadnie,...
w trzeciej sama trasa wypisana w formacie: sklep_xxx-sklep_yyy-sklep_zzz Jeśli dobrze zrozumiałem, to myślnik jest znakiem rozdzielającym nazwy sklepów, których trzeba wyszukać? Jeśli tak, to najprościej rozbić ciąg funkcją Split i zapisać w tablicy. Następnie wyszukać kolejne wartości w pętli For, gdzie licznikiem będzie rozmiar tablicy. Wynik można...
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.
.. U mnie, dla załączonego pliku, makro wykonuje się 2s. Markoz, Marku, można Was prosić o pomoc? Chodzi o najmłodszy załącznik.. Na moim leciwym laptopie i excelu 2000, czas wykonania makra wynosi okolo 1s.
:) 8-) Bez przesady. 8-) to ułamek mojej wiedzy 8-) :) Nie no ... oszukuje :) Na poważnie: Miło że Ci się podoba ale kod makra nie jest zbyt ambitny. Może ktoś zrealizuje to prościej ale niestety mam kocioł w pracy i muszę się "wyłączyć". (ostatecznie pomagać wieczorami) W załączeniu poprawki. Zapomniałem wspomnieć Arkusz "Zlecenia" ma się tak nazywać...
Albo to, albo to. Chociaż bardziej wolałbym gotowca -> ostatnio z makrami *VB miałem doczynienia jakieś 8 lat więc musiałbym sobie przypomnieć.
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
B100 też się zmieniało ale nie opisałem tego bo w moim przypadku nie miało to znaczenia To wiem bo się powinno zmieniać. Podałeś więc nieścisłe informacje, które (w najgorszym przypadku) mogły świadczyć o niewłaściwym działaniu programu. :D
Witaj. Jak domyślam się, samo przeniesienie odpowiednich pytań i odpowiedzi do drugiego arkusza nie jest problemem, większym problemem jest pozbycie się pustych linii z najprostszego możliwego rozwiązania. Do tematu można podejść na dwa sposoby, za pomocą makr, albo za pomocą odpowiednich formuł. W przypadku bardziej skomplikowanego problemu makra pewnie...
https://support.office.com/pl-pl/article... https://support.office.com/pl-pl/article... https://support.office.com/pl-pl/article...
Dziękuję za odpowiedź. Nie jestem zbyt dobry w makrach po zarejestrowaniu oraz dodaniu makra gdy wciskam przycisk RunSub pojawia się komunikat Macros, aby wybrać coś, ale mam tam pustą listę. Jak mogę sobie z tym poradzić?
Wstaw w kod arkusza "Wydatki" i kliknij w "Zapisz" [syntax=vb]Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim ostWrs As Long 'warunkiem działania makra jest adres scalonej komórki (tej z tekstem "Zapisz") 'zwrócony przez zmienną Target If Target.Address(0, 0) = "E18:E19" Then 'sprawdzamy, czy wymagane pola są wypełnione /przy okazji...
Cześć. Rozwiązanie okazało się banalne. Aby działało w excel należy włączyć Tools-> references: Visual Basic For Application Microsoft Excel 16.0 Object library OLE Automation Microsoft Office 16.0 Object Library Microsoft Forms 2.0 Object Library Microsoft Word 16.0 Object Libraty Zamykam wątek
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.
Zapytam o makro co 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 NewRow = Range("A65536").End(xlUp).Row + 1 Range("C" &...
Chcę uzyskać przeniesienie całych wierszy z Arkusza1 do Arkusza2 jeśli zostanie spełniony określony warunek. Jeśli w kolumnie stan pojawi się wartość "Zakończony" to całe wiersze mają być przeniesione do Arkusza2, natomiast w Arkuszu1 wykasowane. W załączniku plik Excel Cześć! Rozumiem, że chcesz, aby wiersze z Arkusza1, które spełniają określony warunek...
Witam serdecznie, Czy ktos moglby mi pomoc w napisaniu makra dla excel 2007. Potrzebuje stworzyc chyba prosta baze danych, ale niestety przekracza to moje umiejetnosci znacznie. W zalaczniku przesylam plik - jak chcialabym zeby to dzilalo Algorytm Artusz 1 (WPIS) 1. wpisuje dane w zoltym polu (kolumna B2:B6) 2. Dopiero po wciśnięciu przycisku dane są...
Nie chce mi się pisać od początku, więc przerobie to twoje :) Dla takiego układu, jak w załączniku [syntax=vbscript]Sub nazwiska() Dim wsP As Worksheet, ws1 As Worksheet Dim i&, d&, k& Set wsP = Sheets("Wykaz pracowników") For a = 2 To Sheets.Count Set ws1 = Sheets(a) k = 3 c = 3 + d b = 12 + d For i = c To b ws1.Cells(7, k).Value = wsP.Cells(i, 1).Value...
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.
rafal24s -spróbowałeś to makro? Też mam podobną potrzebę, ale przede mną jeszcze nauka uruchomienia makra tak w ogóle... O kurcze udało się, Makro działa. Czy zamiast rekord.ClearContents można użyć czegoś innego, w przypadku kiedy wprowadzane dane są w jakiejś formatce -porozrzucane po arkuszu?
Jest. Mało tego, masz wybór: formuła w docelowej komórce, lub makro.
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 :!:
Zapewne można by to było zrobić funkcjami ale trzeba by było mieć większą wiedzę co i jak wybierasz a tak zrobiłem dosłownie tak jak chcesz: Makrem poprzez SelectionChange
Potrzebuję pomocy z napisaniem makra, które będzie miało za zadanie automatyczne wstawienie nowego wiersza w przypadku gdy dane w komórkach wykraczają poza kolumnę H i przeniesienie do niego tej zawartości poza kolumną H z powyższego wiersza. W załączniku plik przedstawiający co chciałbym osiągnąć.
Przerób sobie to makro:
Jeśli masz Excela 2010 lub nowszego to można to zrobić w Power Query bez makro
No właśnie dlatego mam mały problem, bo mam okno UserForm w którym jest tylko jedna kontrolka TextBox, dlatego pytam czy mogę usunąć fokus bez jego przenoszenia do innej kontrolki (której akurat nie ma, może źle to ująłem żeby przenosić makrem). Wiem że w ostateczności mogę wykorzystać pomocniczą kontrolkę którą ukryję, ale czy mogę to zrobić bez pomocniczej...
Wiele opisów dotyczących kopiowania danych w Excelu znalazłem tutaj: http://forum.idg.pl/excel-makro-do-przen...
Nagraj makro jak to robisz, następnie je dostosuj do swoich potrzeb.
Przenoszenie danych może zniszczyć wzajemne zależności. Jeśli jednak "wytniesz" zakres komórek i "wkleisz" je w inne miejsce, to formuły powinny się automatycznie zaktualizować. Jeśli w arkuszu działają makra, to trzeba uważać, bo one działają według wcześniej określonych reguł i odwołują się do konkretnych komórek - operacje kopiuj/wklej/wytnij nie...
Cześć koledzy i koleżanki, Mam problem z plikiem który opierałby się na prostym rozwiązaniu problemu i chciałbym uniknąć makra. Pracuję na jednym pliku Dostawy.xlsx w którym jest arkusz "Zbiorczy" oraz kilkanaście innych z nazwami miast. Chodzi o to abym codziennie wpisywał dane dotyczące dostaw tylko i wyłącznie do arkusza "Zbiorczy" w którym jest...
żeby VBA rozpoznał, że w wybranych wierszach potencjalni klienci dostali nowych sprzedawców... jeśli Basia chce przejąć jakiegoś potencjalnego klienta, to z tej zakładki klient przeniesie się sam do jej zakładki, jak tylko w pierwszej kolumnie Basia wybierze siebie jako osobę obsługującą. Albo rybki, albo akwarium: nie ma sensu przeglądać 5000 wierszy...
Bardzo dziękuję za pomoc, dopisałem formuły, przenoszenie danych i drukowanie działa idealnie. Twoja propozycja sprawdziła się i jest bardzo dobra. Pozostała mi jeszcze jedna kwestia, chciałem powielać szablon z wpisywanymi danymi by go następnie zapisać w pdf. Myślałem o dopisaniu kolejnego makra które by zamiast wydruku kolejnych stron arkusza wygenerowało...
Chyba tylko makrem. Gdyby było odwrotnie (wpisujesz pracownika w wykazie) i przy dodatkowej kolumnie dotyczącej działu i kolumnie pomocniczej - można by było spróbować bez makr.
Witam Z tego co ja wiem to jest z taka operacją trochę zabawy, ale przecież wszystko jest możliwe do zrobienia, pozostaje tylko kwestia czasu i pieniędzy: :roll: Zobacz Topic Simensa nr 17490711, oraz 18003417 na stronie http://www4.ad.siemens.de/-snm-013503893...
Ok, dziękuję - właśnie o to mi chodziło. Mam jeszcze pytanie jak zrobić, aby po naciśnięciu na "tak" nie przechodził mi kursor automatycznie do zakładki podsumowanie tylko zostawał na swoim miejscu w arkuszu info? W tym makrze co napisałeś niestety mi się przenosi.
A jak bez zalacznika, co najmniej kodu makra?
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,...
Witam, będę wdzięczny za pomoc w napisaniu formuł lub makra. W pliku wklejane będą dane do arkusza Total dla trzech zmian I zmiana 6:00-13:00 II zmiana 14:00-21:00 III zmiana 22:00-05:00 Teraz chodzi o to, aby dane z tego arkusza automatycznie kopiowało do poszczególnych arkuszy w zależności od przypisanych godzin zmianowych tzn. aby np. do arkusza...
Dziękuje. Problem rozwiązano, makro działa idealnie.
Witam potrzebuję pomocy w stworzeniu makra w Excelu 2007. Potrzebuję kodu który przepisze wiersze do nowego arkusza po spełnieniu poniższych kryterium: Zakres analizowania: Od wiersza 12 kolumna B Do wiersza 111 kolumna P Makro: jeżeli w arkuszu nr 1 w kolumnie P z zakresu wierszy od P12:P111 znajdzie się wartość większą (różna) od „0” (wynik...
Przejrzałem cały internet chyba, na amerykańskich stronach dużo osób zgłaszało ten problem jednak nie został dobrze rozwiązany. Niektórzy proponują różne makra, inni grzebanie w kodzie i metafile. Mi udało się sprawę załatwić tak, może komuś kiedyś się przyda: "pośrednią" metodą jest zapisanie wszystkiego w formacie ms office 97-2003, wówczas przy przenoszeniu...
Cześć. Używam makra do wysyłania maili z outlooka za pomoca excela. Załączam zakres jako htmlbody która zawiera tabele a potem zwykły tekst pisany w HTML. Potrzebuje dodać logo firmy. Robię to za pomocą ścieżki do pliku. Jednak plik załącza się na samej górze co wygląda słabo. Stworzyłem tło w excelu w zakresie który kopiuje do wiadomości. Jednak przy...
Mam problem z przenoszeniem danych z bazy do innego arkusza. Dla danych typów produktu muszę przenosić specyficzne dane o wszystkich transakcjach które ich dotyczą. Manualne wycinanie z filtrowanej bazy danych jest bardzo czasochłonne i próbuję sobie to usprawnić. Słabo ogarniam VBA więc w tej chwili robię to formułami (próbowałem na różne sposoby),...
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...
Dzięki. Kodzik działa wyśmienicie. Teraz w moim przypadku kod wygląda tak: [syntax=vb]sciezka = ActiveWorkbook.Path With Application.FileDialog(msoFileDialogOpen... .InitialFileName = sciezka & "\Dokumenty\LZH\" & NazwiskoImie .Show End With[/syntax] ...a jak do tego kodu dodać dwie informacje w przypadku jeżeli od danego pracownika nie ma folderu w podanej...
może wydać się dziwne, ale w jaki sposób aktywować makro, jak podpiąć pod przycisk?
Dodałem do każdego makra linijkę kodu który podałeś i nic. Zauważyłem że Excel odnajduje i przenosi, ale tylko w (w tle), kursor we wskazane komórki. Jednak ich nie wyświetla. W załączeniu plik z dodaną linijką kodu którą zaproponowałeś.
Hej! Skoro już mowa o rejestrowaniu makr. Mam Excela 2007 i aktywowałam zakładkę Deweloper, ale przycisk "Zarejestruj makra", "Makra" i "Visual Basic" nie są aktywne;( Ktoś wie o co chodzi? Post wydzieliłem i przenoszę do Komputery Software. - arnoldziq
Jeśli bez makr, to można wspomóc się wierszami pomocniczymi. W moim przykładzie 2-ma. Formuły, poza 1-szym wierszem, są "kopiowalne". Warunek: posortowane kolumny A:B
a czy makro zapisuje się w pliku Excela? i przenosząc plik na inne komputery wszystko działa?
Moje spostrzeżenia: Przetestowałem i o wiele szybciej wychodzi mi odszukanie nazwiska i wpisywanie informacji bezpośrednio w grafik, niż za pośrednictwem formularza. Jakoś nie mam przekonania do rozwiązania w tej formie. Bardzo łatwo o błędy i musiałbyś porządnie przed nimi zabezpieczyć. Byłoby warto, gdyby formularz ułatwiał pracę, a po mojemu tego...
z plików tych korzysta (uzupełnia je) wiele osób W Accessie podobnie jak w Excelu można zastosować do wprowadzania danych odpowiednio oskryptowane w VBA formularze , które stanowić mogą jedyny interfejs graficzny użytkownika :idea: "Popełniłem" kiedyś małą aplikację użytkową (fakturowanie i obrót magazynowy) opartą na kilkudziesięciu makrach i formularzach...
Nie bardzo rozumiem na czym polega istota problemu. Czy tylko na automatycznym odświeżeniu tabeli przestawnej? To można zrobić np. makrem przy każdorazowej aktywacji arkusza z tabelą. Przykład w załączniku. Analogicznie można bez tabeli przestawnej założyć tylko filtr i ten filtr odświeżać makrem. Można też formułami, ale to bardziej skomplikowane.
Pokaże moment, który nie działa na przykładzie. Pomino tego, ze mam na liście słowo ZUS to nie przenosi mi tego wiersza. Wiesz co może być zle?
Oczywiście, że ma sens. Magazyn dopiero się tworzy, a zawartość jest tylko po to, żeby sprawdzić, czy dane się dobrze przenoszą. FIFO ma być zachowane, bo taki jest odgórny wymóg i tyle.
Tak, przenosząc część makr do kodu arkusza. Przykład "na szybko" w załączniku. Uporządkuj, dostosuj do własnych potrzeb.
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.
Makro działa prawidłowo dopóki nie przeniosłem go do makr osobistym, z uwagi na to, że jest mi potrzebne do przenoszenia arkuszy z innych skoroszytów. Niestety, po przeniesieniu, pojawia się wcześniej pokazany komunikat i makro się zatrzymuje. Oczywiście, tak jak wskazujesz, w tych swoich skoroszytach mam dodany arkusz o nazwie "Ostatni".
po poprawkach wygląda to tak: Sub Macro1() 'deklaracje tablic grup POTS,DSL,inne dopisać Dim POTS(1 To 2) As Variant POTS(1) = "0.2" POTS(2) = "0.3" Dim DSL(1 To 2) As Variant DSL(1) = "0.4" DSL(2) = "0.5" Dim inne(1 To 2) As Variant inne(1)...
Czyli są to listy, a przecież one "same z siebie" dodają sobie wiersze ... ? Planujesz wstawiać coś tylko ręcznie, czy może "jakimś mechanizmem" przenosić do listy/list coś z innego miejsca arkusza/zeszytu ?
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.
Udało mi się dopasować pliki i przetestować. Za każdym razem pojawia mi się komunikat - w schowku jest duża ilość informacji, czy chcesz później wklejać je do innego programu. Może źle dopasowałem? nie mam wprawy w excel. Czy można wprost przenosić dane bez np formuł. Tzn w każdym pliku jest lista rozwijana z RM (wybór z kilkunastu opcji), czy też wyszukaj...
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 Mam mały problem z napisaniem Makra w Excelu: Potrzebuje takiego makra które z Textbox1 (który ma kilka wierszy) przypisze mi każdy pojedynczy wiersz w nowej komórce (A1, A2,....) A następnie potrzebuje żeby z Komórki B1, B2, pobierały się wartości tekstowe i wstawiały do Textbox2 i były rozdzielone spacjami (B1 B2 B3), a następnie pod nimi /dwa...
witam. mam taką potrzebę: sporządziłem dla firmy (sklep) bazę towarów wyliczającą cenę. i w drugim arkuszu format cen do wydrukowania na półkę. z tym że tych towarów będzie co najmniej 500 szt. i będzie to robione na kilka punktów.. chciałem cos takiego co automatycznie pobierze dane z pierwszego arkusza i wstawi to w odpowiednie pola w arkuszu drugim...
Tak. W kolumnie LP nie wpisujesz. Makro rekordy z pustym LP przenosi do zbiorczego i wypelni LP sam 'Data wpływu' - format daty
Pliki są generowane ze skanera etykiet i chciałbym aby po podłączeniu skanera do komputera przy pomocy jednego kliknięcia w Excelu, pliki tekstowe z folderu skanera kopiowały się do arkusza a potem wszystkie pliki zostawały przenoszone do innego folderu w komputerze. Plik tekstowy wygląda tak
...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...
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ć.
Przenoszę opcje do komórki I1, I2, I3, I4... w 'dzieleniu': Rows("2:2").Clear - usunie I2, bedzie od J2 wprawo
Chciałbym, żeby dane były automatycznie ... przenoszone do tabeli poniżej IMHO wystarczy odpowiednio zaprojektować te tabele, aby dane przenoszone były automatycznie bez żadnego przycisku i makra, a jedynie wykorzystując proste, "przeciągalne" formuły :please: 989671
Przeniesienie nie wchodzi w grę, bo to nie jest jeden arkusz, tylko kilkanaście, które są powiązane ze sobą makro... Osiwieję... Dodano po 6 Chyba nic nie wymyślę, zacznę przenosić powoli wszystko. Dzięki...
tak powiązane. W arkuszu 4 dane ułożone w wierszu od kolumny A do D 0123456 011-6500-011-00001/11 011-6510-011-00001/11 011-6520-011-00001/11 urbanek Makro w arkuszu1 w kolumnie A (dane są jakieś) i szuka zawsze w kolumnie A w arkuszu 2 i kolumnie a arkuszu 3 i jeśli znajdzie dane to przenosi dane do arkusza 4 i wkleja w kolejności wartości przyporządkowane
marcinj12, Dzięki za tę podpowiedź. Poprawie to w kodzie i zobacze czy choć trochę przyspieszyło. Szczerze mówiąc to nie wiem, która zajmuje więcej czasu, wydaje mi się, że delete, ponieważ jest odpalana dwa razy (w dwóch arkuszach). Jeżeli chodzi o ilość danych, to przy około 300 wierszach radzi sobie w miare szybko, jednak już przy tysiącu, niestety...
A jakiego Excela używasz?? Arkusz nie jest chroniony, w pliku Baza.xlsm wciskasz ALT+F11 i kod makra powinien być w Arkusz1.
Witam, witam... Na tym forum jest więcej ludzi, nigdy nie wiesz kto odpowie ;) Niestety, w Visual Basic z Visual Studio robi się kompletnie inne projekty niż w VBA w Excelu - to drugie jest mocno okrojoną wersją wspomnianego. Jedynie składnia języka jest trochę podobna, ale nie ma możliwości przeniesienia projektu z VS do Excela. Pozostaje ponowne wykonanie...
No tak zgadza się. Pętla nie jest mi potrzebna. Ale taki kod działa więc jest ok. Plik będzie generowany raz na jakieś dwa dni, dlatego nazwa generowanego pliku zawiera formułę aktualnej daty z komórki "B3". Bardziej zależy mi aby za każdym użyciem makra generował się w katalogu "wyniki" nowy plik. Wówczas w katalogu "wyniki", po jakimś czasie mam kilka...
Nie nazywałbym tego hobby. Potrzebuję, aby jakikolwiek laik mógł zajrzeć do odpowiedniego arkusza nie przeglądając, gdzie on się znajduje. Wszystko mi działa, lecz problemem jest pobranie wszystkich nazw arkuszy do listy. Chcę, aby działo się to automatem. Uruchamiam plik, uruchamia się makro, pobiera nazwy arkusuzy, umieszcza je w liście, ja ją przeglądam...
Witaj. Może być. Nie do końca zobrazowałem sobie, jak Kolega dokładnie chce to robić, ale wydaje mi się, że odpowiednie makro powinno załatwić sprawę. Za pomocą makro możliwe jest śledzenie zmian w arkuszu, możliwe jest też wykonywanie dowolnych czynności (jak choćby kopiuj/wytnij/wklej/usuń) na wierszach.
Jak to powinno wyglądać, żeby mając otwarte plik bazowy i plik do którego będę kopiował działało za każdym razem? Musisz ustawić "automatyczny" zakres do kopiowania :D Niestety bez przykładowych plików trudno będzie Ci pomóc :cry: Nagrany kod będzie Ci przenosił każdorazowo Range("K20:M23") z pliku z którego uruchamiasz makro zawsze do pliku test do...
Żeby się pozbyć skutecznie tego problemu zastąp: Target - Target.Address i Range("x17") - Range("x17").Address Upierdliwość powinna ustąpić. Edit: adamas_nt jak zwykle szybszy :D Masz teraz dwie możliwości do wyboru. Żadna z nich jednak nie spowoduje wyczyszczenia y17 w przypadku wyboru z listy w x17. Do czyszczenia zmusi Del lub edycja rzeczonej komórki....
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ść...
Sprawdziłem i wygląda na to że jest wszystko o co chodziło. Jesteś wielki. Mam jeszcze tylko pytanko czy jest możliwość aby po kliknięciu generuj PZ od razu się drukowało a nie przenosiło do innej zakładki i czy dało by rade zrobić takie makro dokladnie to samo do drugiego arkusza tego do skupu z usługa suszenia. Zeby też drukowało PZ. Jesteś wielki...
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ą...
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....
To nie idąc na łatwiznę, w ramach nauki, algorytm powinien wyglądać następująco: • ustalasz ilość wierszy do wyszukiwania na podstawie ostatniej nie pustej komórki w kolumnie E • w pętli przechodzisz poszczególne wiersze w kolumnie E porównując czy wartość w komórce jest zgodna z szukanym wzorcem np. "WSTRZYMANY" • jeżeli nie jest...
excel przenoszenie excel przenoszenie danych excel zdjęcia makra
brother zablokowany połączenie szeregowe diód zawór czterodrożny pompa ciepła
zasilacz terkocze aopen zasilacz
Domyślny kod instalatora dla central DSC Podłączenie WLZ w puszce pomiarowej instalacji odgromowej