Makro w oddzielnom skoroszycie [syntax=vb]Sub wypelnienie() Dim rd&, rs&, bd As Worksheet, bsh As Worksheet rs = InputBox("Wprowadz numer wiersza danych", "Wiersz #?", 1) path_A = "d:\AAA\" path_B = "d:\AAB\" Set bsh = Workbooks.Open(path_B & "BAZA").Sheets(1) Set bs = Range(Cells(rs, 1), Cells(rs, 7)) plik = Dir(path_A & "*.xlsx") While...
Na razie dziękuję za pomoc. Pozniej sprawdzę makro
Witam [syntax=vbscript]Sub zamianki() Dim kom As Excel.Range Application.ScreenUpdating = False With Sheets("L-ki") For Each kom In .Range("c3:c70") If kom.Value <> "" Then Sheets("R-ki").Cells(kom.Row, "E") = Range("C" & kom.Row).Value End If Next kom End With Application.ScreenUpdating = True End Sub[/syntax]
Tak napisałeś, ale napisałeś również: Chodzi o to żeby z pliku z danymi makro pobierało konkretne dane i wstawiało w bazę danych. Przerobiłem makro pod pliki z Twoimi danymi. Nie było mowy o tym, że dane mają być importowane przyrostowo. Dodano po 8 Przerobiłem makro, żeby importowało tylko 'nowe' pliki. po drugie w pliku z danymi są pewne komórki stałe...
a co masz na myśli mówiąc "...podstawiać formuły w osobnej pętli"? Wstaw kolumny, wpisz ręcznie formuły sumowania i przepisz argumenty do makra. Po zakończeniu pętli wstawiającej kolumny i nagłówki (usuń linię z wstawianiem sum), dopisz następną wpisującą tylko formuły.
W pliku "Spis" jest 6 komórek do których mają być zaciągnięte dane z pliku"Dane". W makro widzę, że dane są pobierane z pliku arkusz1.xls w folderze C:\Dane_\ Utworzony plik z danymi na dysku C i nie trzeba nic kliknąć. Wystarczy otworzyć plik Spis_xxxx. Testowano to. Jaka jest rzeczywista ścieżka do plików danych?
Sub ZapiszPlik() Dim Skor As Workbook Const FOLDER As String = "D:\moje dokumenty\" -tu wpisujesz lokalizację pliku, gdzie docelowo ma się zapisać plik Set Skor = ThisWorkbook Skor.SaveAs FOLDER & "pliczek" & Format(Now(), "_yyyymmdd") - "pliczek" to nazwa jaką będzie posiadał plik ThisWorkbook.Close False End Sub To makro wstawiasz w pliku, który ma...
W załączniku znajdują sie dwa arkusze: "DANE" i "WZÓR". W arkuszu"WZÓR" jest przykład o co mi chodzi. W arkuszu "DANE" w kolumnie A jest jakiś zakres danych(danych będzie tysiące i w tym problem) W kolumnie C arkusza"DANE" należy wstawić jakieś dane. Zastanawiam jak rozwiązać aby w kolumnie C wstawić te dane szybko i sprawnie? jak robię zakres od 1-20...
Mnie te makra nie zawiesiły Excela ani razu, ale testowałem je na wersji 2007 i 2010. Być może problem jest spowodowany przez połączenie wklejania danych ze schowka z wstawianiem komórek. Jeśli formatowanie komórek nie ma znaczenia i kopiowane są stałe (tak to przynajmniej wygląda w przykładowym pliku), to może zrezygnować z kopiowania na rzecz przypisywania...
Nie jest potrzebne makro. Wystarczyłaby funkcja SUMA.WARUNKÓW, gdyby nazwy z listy "typ_aktywności" były zgodne z nagłówkami tabeli (wiersz Nr2 arkusza "Rozliczenie tygodniowe"). Chodzi o Np "spotkania" / "spotkanie" etc.
Na podstawie zmian w komórce J1 przeliczają się dane w bazie, tam wstawione są funkcje jeżeli,mnie interesuje wartość skopiowanych danych obliczonych na podstawie zmian komórki J1
Przyszło mi do głowy że może tak jeszcze opisze mój problem, będzie łatwiej zrozumieć: 1.1. Makro wstawia wszystkie symbole z kolumny A arkusza "BAZA" do arkusza "DANE" do pierwszej wolnej komórki w kolumnie C i dla każdego symbolu wstawia tekst:"cccccccccccc cccccccccc" w kolumnie D arkusza "DANE; 1.2. Raz jeszcze raz makro wstawia wszystkie symbole...
Ustaw w kolumnie R sprawdzanie poprawności danych. Nie zaprzęgaj do tego formuły.
miał być tylko przykładem W tym "przykładzie" tabela jest w postaci "obiektu tabeli", zaś w twoim to zwykłe zestawienie "tabelaryczne". To jaką właściwie postać będą miały dane: obiektu tabeli czy zwykłego zestawienia danych ?
Dziękuje koledze makro wstawia w kolumnę s wszystkie znaki. A co z włączeniem filtra skopiowaniem danych i wyłączeniem filtra?
A jak te pola tekstowe wstawiasz? Może zamieść przykład pliku z takim polem?
Ten plik, który pokazałeś jako wzór ma zupełnie inną strukturę i raczej trudno go dopasować do Twojego nowego pliku. Szkoda, że nie ma w nim żadnych danych, żeby zweryfikować czy formuły kopiują się poprawnie. Poza tym nie wiem, czy tak jak w pliku wzorcowym istotne jest wstawianie wierszy, czy wystarczy samo kopiowanie. W pliku wzorcowym były podsumowania,...
Kurde - takiego kombajnu nie spodziewałem się... Super, ale jest tak rozbudowany że przeszedł moje oczekiwania dlatego chciałem zapytać - czy byłby kłopot dodać opcję blokowania wybranych arkuszy? Sprawa druga (wklejanie danych w miejsca które chciałem) mam już zrobione więc ta część pytania nieaktualna.
W tej wersji wybiera się wszystkie pliki do importu za jednym razem. Prościej się chyba nie da. (at)maciejgonet Widzę, że używasz 365. Ja mam dostęp tylko do wersji darmowej A1 i tutaj nie widzę wcale możliwości użycia makr... https://obrazki.elektroda.pl/4569294400_... Poprosiłem kolegę, który ma 365 i makro działa poprawnie. https://obrazki.elektroda.pl/3843900100_...
Zakładając że układ kolumn i danych jest stały - nie piszesz szczegółów, wystarczy w określonej komórce wpisać (zakładając że 3 jest w komórce 1A): = 1A&" "&1C&" "$1G Jeżeli natomiast układ danych jest różny w każdym wierszu, trzeba by napisać makro uwzględniające puste komórki.
Wróżąc z fusów wróżę, że ta propozycja nie doprowadzi do postępu. Klawisz Enter nie ma tu znaczenia. Sprawdzałem, że jeśli makro wstawia wartość do komórki zdarzenie Change jest generowane i godzina się pojawia, choć nie jest używany żaden klawisz.
Makro ma rozdzielić i zapisać w kolumnie. hm... może faktycznie w jednej kolumnie imie, nazwisko, data ur. ,ulica, nr domu, nr mieszkania, kod poczt. i miejscowość. dane maja być rozdzielane za pomocą ( , ) i wpisywane do odpowiedniej kolumny w excelu chociaż ja to zrozumiałem tak, że dane rozdzielamy, a następnie każdy z rodzajów danych wstawiamy...
"dodawanie" (Arkusz 3, G2) dodawało go automatycznie do listy do Arkusz1 jako kolejną pozycję Tylko, że musisz zablokować makro, które tam występuje (Blokada). Zmiana nazw zakładek: ''Arkusz3''=>''Odczyt skanerem''; ''Odczyt skanerem''=>''Lista'' 885424
Witam, Temat ogólnie już był poruszany, ale został zablokowany a ja chciałabym stworzyć coś dodatkowego do niego i nie wiem jak. Konkretnie chodzi mi o taką tabelkę jak w załączniku 1 i stworzenie do niej makra by oddzielały się wiersze po nagłówku "Obiekt" i dodatkowo by tam gdzie jest nagłówek "Godziny" tworzyło się auto-sumowanie dla powyższych kolumn...
Czyli wstawianie arkusza opanowane. Teraz mamy wpisywać *jakieś* dane w jakiś sposób. Można założyć, że linia po linii (ale to założenie wynikające tylko z kontekstu wcześniejszych postów). W jaki sposób działa teraz wpisywanie do jednej linii? Makro, które już Kolega posiada zaczyna wpisywać od komórki, która jest aktualnie zaznaczona i wypełnia ileś...
Coś takiego robi się przez makro poszukaj na tym forum czy ktoś nie robił podobnego makra ten dział oraz programowanie ogólne tam takze widziałem tematy odnośnie excela :)
... " a " czy mógłbyś poprawić aby wstawiało Datę w komórkach w zakresie od B11 do B2000 i Godzinę od C11 do C2000 1. " a " co to jest to " a " w " If Target <> a " ? 2. "zbiorczo", tj. hurtem (?), czy sukcesywnie w miarę wpisywania danych w tym samym wierszu w zakresie kolumn 5 do 8 ? ps: trzeba by wstawić kontrolę zmiennej "i" (wierszy)
Może wystarczy wstawianie skrótem Ctrl+: (dwukropek). Jeśli data automatycznie wpisywana ma być w kol. B jednocześnie z pojawieniem się danych w kol. A, to wykorzystaj zdarzenie arkusza "przy zmianie". Np (wklej w kod arkusza)[syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 1 Then Target.Offset(0, 1) = Date End If End...
Proszę krok po kroczku 1. "Baza danych" musi mieć identyczną budowę (jeśli chodzi o kolumny) jak arkusz spisowy (zwłaszcza pod względem komórek scalonych :!: ) :arrow: najlepiej zrobić do wydruku kopię arkusza "Arkusz danych (2)"; 2. Ze wzoru arkusza spisowego robisz zrzut stopki wydruku 932190 3. W "Arkuszu danych (2)" wyfiltrowujesz tylko dane z...
[url=http://www.ozgrid.com/VBA/find-meth... masz przykład jak ta funkcja można wyszukiwać w całej kolumnie. Ostatni listing pokazuje jak wyszukać kilka wartości i wstawić komentarz - w Twoim wypadku musisz wyszukiwać w arkuszu 2, a wstawiać nie komentarze, a znalezione wyniki do arkusza 1.
Zaproponowany uprzednio kod makra przystosowany jest do określonego układu tabeli :!: :D tzn. po zmianie układu kolumn trzeba stosownie kod zmodyfikować :cry: Dodatkowo makro nie przystosowane jest do "niespodzianek" typu "nadziewanie" pustych komórek pojedyńczą spacją czy wprowadzania nietypowych wierszy tabeli z nazwami podzbiorów danych :sm31: :cunning:
Zrobić się da, ale trzeba trochę pokombinować... Piszę tego posta gdy problem już jest rozwiązany, a piszę dlatego, że podałeś rozwiązanie nie tylko pracochłonne, ale przekombinowane. Po co wstawiać dodatkowe kolumny, skoro można od razu - gdzieś w sąsiedniej wpisać formułę: ="''" & A1 & "'", a otrzymanym wynikiem napisać (wkleić specjalnie...
Witam, kontynuując temat mam jeszcze zapytanie o takie makro: 1) w tych dodanych wierszach w kolumnie "A" wpisany byłby tekst "zrobione" 2) w kolumnie "B" ponumerowane tylko te dodane wiersze 3) w kolumnie "C" w miejsce wyczyszczonych danych wpisany tekst "ok" czy da się coś takiego zrobić? Będę bardzo wdzięczna
Teraz jest ok jeżeli chodzi o tworzenie pliku DXF. :-) Jest jeszcze jednak mały problem techniczny zapisu rekordów w samym pliku, a mianowicie przed każdą liczbą i po każdej liczbie w danym rekordzie makro wstawia spację np. "30" natomiast powinno być tak "30" (sama liczba tak jak jest wpisane w komórce). Przy ciągach literowych ten problem nie występuje.
Witam Chciałbym aby makro wstawiało wiersz. [syntax=vbscript] Range("B2").Select Selection.EntireRow.Insert [/syntax] ale to działa gdy jestem w danym arkuszu, a ja bym chciał coś takiego zrobić aby będąc w "Arkusz1" i na podstawie danych z tego arkusza stworzyć nową tabele w nowym arkuszu "Arkusz2" I to jakoś mi nie chce zadziałać (nie mogę składni...
Stworzyłem makro, które wstawia do komórki excela zdjecie produktu, którego nazwa znajduje się w komórce obok. Niestety po sortowaniu pliku zdjęcia nie zmieniają lokalizacji razem z resztą danych. Czy jest jakiś sposób aby "przywiązać" zdjęcie do komórki, tak aby możliwe było sortowanie?
chciałbym pobierać listę indeksów i nazw z zewnętrznego pliku excela Nie kombinował bym tu zbyt dużo. Kopiuj-Wklej (makrem lub ręcznie) do arkusza pomocniczego i mamy dane w zasięgu. Z zapisywaniem podobnie - nagraj makro kopiowania arkusza do nowego pliku i dostosuj (czyt. posprzątaj po rejestratorze). jak zrobić aby po kliknięciu ok w formularzu...
No i ... ? Do czego mamy się odnieść (tj. ci którzy ewentualnie poświęcą swój czas na ten temat), do przypadku sprzed lat wielu, tyczącego się pewnie w szczegółach innej sprawy ? Opisz dokładniej swój kłopot z KS i zamieść jakieś przykłady, na któryh próbowałeś działać z tamtymi kodami. Pokrótce: 1. Musisz mieć bazę danych w pliku excela z takimi polami...
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...
Zdaje się, że zapętlasz się w nieskończoność. Ale bez analizy krok po kroku (klawisz F8), trudno coś powiedzieć pewnego. Pierwsze co rzuciło się w oczy to : [syntax=vb]ZnajdzNast = InStr(ZnajdzStop, Dokument, PozPocz, vbTextCompare)[/syntax]Gdzie przy następnym przebiegu: [syntax=vb]ZnajdzStart = InStr(ZnajdzNast, Dokument, PozPocz, vbTextCompare)[/syntax]To...
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...
Co do twojego kodu, .Range/.Cells - odwołuje się do aktywnego arkusza? Chodzi mi o te kropki na początku. Nie, odwołuje się do obiektu - w tym wypadku arkusza - użytego w otaczającej klauzuli With... To taki skrótowiec, którzy przed kropką wstawia to, co jest w With, czyli zamiast powtarzać: Przy próbie tworzenia kolejnego arkusza wywala błąd 1004...
Kolego ten twój cały kod można skrócić do ps. jak co to na dziś już kończe :) Dzięki wielki. Makro działa super. Te makro, które napisałeś trochę przerobiłem, bo chodzi o to, że okazało się, że dane muszą być przeniesione do innego arkusza. Po poprawkach wygląda to j.n. Czy tu coś też da się uprościć? Sub wstawianie_bezduplikatów() With Sheets("IL")...
Witam, mam następujący problem. Nie jestem programistą i generalnie gubię się przy wprowadzaniu jakiś kodów, a muszę co jakiś czas modyfikować taki kod: name="TUTAJ WSTAWIAM DANE" x="TUTAJ WSTAWIAM DANE" y="TUTAJ WSTAWIAM DANE" address="TUTAJ WSTAWIAM DANE" <desc><![CDATA[<a href="TUTAJ WSTAWIAM DANE" target="_blank"><img src="TUTAJ...
Oki, tylko że jeśli postawisz kursor w danej tabeli, to masz już z autoamtu przygotowany pusty wiersz do wprowadzania danych, tak działa lista-tabela. 912568 1. Czy chodzi ci zatem o to, żeby prócz tego wiersza z gwiazdką, makro wstawiało dodatkowy pusty wiersz, jako "kolejny" (wtedy będą dwa puste, w tym jeden z gwiazdką) ? 2. Czy wystarczy może tylko,...
Ja zaczynam nauke. Chodzi o to aby makro kopiowało dane z arkusza obliczenia od komórki F4 pod warunkiem że tam sa liczby a nie puste komórki. Zakładając że w komórce F5 jest liczba 0,1, to makro ją wstawia do arkusza działki do komórki B2, po zidentyfikowaniu danych w komórce F5 kopiuje wartość przypisana(znajdującą) w komórce D4 w arkuszu obliczenia...
witam, proszę o pomoc, moja cała znajomość programowania ogranicza się do znajdowania i dostosywania formuł - kiedyś znalazłem i dostosowałem do swoich potrzeb makro do wprowadzania danych w arkusz za pomocą userform z przyciskami do przechodzenia między wierszami, wstawiania i kasowania wierszy - ogólnie bardzo fajny programik. niestety po skopiowaniu...
Witam w załącznikach dodałem przykładowe pliki bardzo okrojone ale mające pokazać o co mi chodzi. Prosiłbym o pomoc w zrobieniu makra które przeniesie dane z pliku DANE do pliku STATYSTYKA. 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...
Podmieniłem makro zgodnie z sugestią, niestety działanie nadal jest niepoprawne - mimo "użytych" tylko 5 wierszy z zakresu H5:H14 w dalszym ciągu wstawia 5 wierszy z danymi a kolejne 5 wierszy pustych. Załączam przykładowe pliki
Witam! Mam pewnien problem z markem. Przez parę dni szukałam na różnych forach informacji jak go poprawić, ale niestety nic nie znalazłam. Problem wygląda następująco. Mam makro, które generuje mi plik Worda od podstaw tj. tekst plus wstawianie danych z komórek na podstawie aktualnie zaznaczonego wiersza. Wszystko działa kiedy zapisuje tylko dokument...
no to tak takie pole kombi byłoby dobrym rozwiązaniem tylko mam problem wstawiając normalne pole kombi nie mam możliwości wpisywani tylko wyboru z listy. Natomiast pole combi Activex nie mogę zaznaczyć danych i nie działa - nie wiem czy trzeba pisać do tego jakiś skrypt w VB. I jeszcze jedno pytanie czy pole combi może wyszukiwać np po kilku numerach...
Witam, Mam dzisiaj ciekawe wyzwanie. Potrzebuje stworzyć makro, które z arkusza głównego bedzie pobierało kilka zmiennych i podstawiało je do gotowego szablonu lub tworzyło taki szablon wydruku. Poniżej wstawiam przykładowy plik i opisuje jak to ma wyglądać. W pliku mamy: A1 - nazwe projektu G1:J1 - nazwy przedmiotu G2:J2 - ilości przedmiotu G3:J4 -...
Witam. Do adamas_net chciala na początku Pana przeprosić za to ze dopiero teraz odpisuje. Jednoczenie podziekowac za makro, które Pan napisał. Makro które Pan napisał działa, tzn skanuje datę, nr dokumentu i nazwę dokumentu. Na 10 prob jakie zrobilam. 3 porazka(wg mnie ze względu na wiersze w tych dokumentach byly w innym miejscu); 7 poprawnie( w tym...
No dobra ;) Generalnie każdą formułę można wstawić makrem, wystarczy ją nagrać macro recorderem i troszkę zmodyfikować. Dla WYSZUKAJ.PIONOWO jest to coś takiego: [syntax=vb]Private Sub CommandButton1_Click() On Error GoTo myErr Application.ScreenUpdating = False Application.Calculation = xlCalculationManual With Sheets("Arkusz1") ost_wiersz = .Range("A"...
Stworzyłem coś takiego, ale nie mogę sprawdzić, bo gdzie jest błąd i pokazuje się komunikat Block If without End If, ale nie potrafię znaleźć tego błędu.[syntax=vbscript]Sub wstawianie_IL_z_załącznikami() 'te dane mają być w makrze pobierającym arkusze 'otwieranie pliku źródłowego Dim fd As FileDialog Dim wkb1 As Workbook, wkb2 As Workbook Dim tblArkusze()...
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,...
Makr działających na zasadzie WYSZUKAJ.PIONOWO można wymyślić wiele. A Ty potrzebujesz kodu, który będzie działał z Twoim konkretnym makrem. A żeby coś konkretnie doradzić, to trzeba widzieć to makro i sprawdzić jak ono działa na przykładowych danych, czego konkretnie szuka, jaki zwraca wynik itp., a przede wszystkim jaką stosuje metodę wyszukiwania....
Cześć, mam problem z utworzeniem makra do podanego przeze mnie pliku. Otóż znajdują się tam trzy arkusze: Dane, Dane(2), Do uzupełnienia. W arkuszu Do uzupełnienia potrzebowałbym rozwiązania, aby pobierając dane z arkusza Dane (2) w odpowiedni sposób wstawiać nowe wiersze, pomiędzy stare tak aby nie trzeba było szukać miejsc w arkuszu Do uzupełniania...
Witam Czy jest makro które kopiuje dane z kilkunastu plików exela do jednego pliku Excela? nie ważne czy plik jest otwarty przez użytkownika czy zamknięty. Np. plik Excela-"Janek", w arkuszu 2(ukryty przez vba)- należy skopiować dane z zakresu a3:g3(tutaj znajdują funkcje Excela z innych arkuszy tego samego pliku) do pliku Excela "DANE" do arkusza2...
Pomyśl, jak radzi kolega PRL . Przecież jeśli wstawiasz kwerendę With ActiveSheet.QueryTables.Add(Conne... to wystarczy jak na początku pętli dopiszesz wstawianie nowego arkusza (nagraj makro i przekopiuj), nadanie mu nazwy i aktywowanie (niekonieczne, bo nowy=aktywowany, ale dla porządku). Razem 3 (słownie: trzy) linijki ;) Pomocna uwaga: Nowo wstawiony...
Ok, w warunkach testowych wszystko działa - sorry nie zrozumiałem tego, że nazwa pliku jest wstępnie zdefiniowana "plik..." - mój arkusz nazywał się inaczej. Teraz jeśli będę chciał zmienić nazwę pliku to rozumiem, że kodzie muszę podmienić wszystkie "plik" na nazwę którą nadam plikom? Czy coś przeoczyłem? Chciałbym jeszcze dodać jakiś przycisk-odwołanie...
Nie do końca to rozwiązanie zaspokoi moje potrzeby. Ponieważ tabela zmienia się dynamicznie chciałbym aby w odpowiednich komórkach raportów nie były wstawiane wartości tylko formuły. Bardzo by mi w tym pomogło makro które zamieni tekst znajdujący się w komórce G15 arkusza Tabela na formułę. Jak to zrobić??
Witam! Potrzebuję makro, które w momencie gdy w pliku "plik w którym ma być makro do wstawiania" w kolumnie J (w przedziale J2:J23) znajdzie się wartość inna niż pusta komórka skopiuję dla "użytego" wiersza dane z zakresu kolumn K:Q do arkusza o nazwie identycznej z wartością w komórce J, do pierwszego wolnego wiersza w kolumnie B w pliku który ma stałą...
od razu mowie ze kompletnie nie znam sie na Makro To może trochę teorii na początek? Np Sub przyklad() sciezka = Application.DefaultFilePath & "/" plik = Dir(sciezka & "*.xls") Do While plik <> "" MsgBox plik plik = Dir Loop End Sub to będziesz w połowie drogi. Wykorzystaj też rejestratora...
Z przesłanego pliku wynika, że tylko bardzo niewielka część ofert skutkuje zawarciem umowy - co powoduje, że w kolumnie P jest "więcej dziur niż sera" :D Konieczne jest zatem (jeśli baza danych jest "chronologiczna") odwrócenie procedury wyszukiwania. Dla nowych rekordów - można to zrealizować kodem: edycji starych rekordów w celu modyfikacji wpisu...
Witam! Szukam skuteczniejszego sposobu na obliczanie danych po przefiltrowaniu. Mianowicie w kolumnie A mam nazwę jednostki, przyjmijmy, że mam tam Firma 1, Firma 2 i Firma 3. W kolumnie B mam termin przesyłania przez nich zamówień. I teraz po przefiltrownaniu Firmy A mam jej terminy które dziele na 3 części, te przesłane do 14, 30 i powyżej 30 dni....
Przepraszam, ale nie mogę dać realnego załącznika. Musiałbym go tworzyć od nowa ze wszystkimi formułami i jeszcze przerabiać. Bez danych źródłowych dostaje tylko ADR w 90% komórek bez tych danych. Oczekuję by ktoś pomógł napisać kod VBA dla funkcji goal seek który będzie podstawiał wynik ale tylko dla tych wierszy które mają podaną szukaną wartość....
Mój problem, można rozwiązać makrem? Czy znajdzie się osoba, która może mi pomóc? Dodano po 2 Mam makro do separacji liczb, oto one: [syntax=vbscript]Sub Separator() Dim Rng As Range Dim InputRng As Range, OutRng As Range xTitleId = "Karta weryfikacji" Set InputRng = Application.Selection Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address,...
Może wstaw plik z danymi dla ułatwienia temu, kto się za to weźmie. Wstawiam załącznik. Byłem w pracy i nie mogłem zajrzeć wcześniej na forum. Dane w komórkach są fikcyjne (musiałem oczyścić prawdziwe dane, gdyż nie mogę ich udostępniać), ale bardziej chodzi o zasadę działania na danych. Wierszy w tabeli jest ok. 500 wierszy i przy każdej zmianie trzeba...
Z tą aktualizacją to znowu jakieś nieporozumienie. Jeśli dane będą się często zmieniać, ale sposób ich obróbki będzie niezmienny, to należy stosować formuły i przeliczanie automatyczne. Wtedy sam Excel zadba o to, by wszystko było aktualne. Jeśli wpisujesz do komórek wartości, to w domyśle te dane nie powinny się zmieniać, albo na tyle rzadko, żeby...
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...
Witam, mam następujący skoroszyt: http://obrazki.elektroda.net/32_12676045... potrzebuję napisać makro bądź jakąś formułę która podczas wstawiania literki X w kolumnie nazwiska np. Martyka będzie przenosić cały wiersz z wszystkimi danymi do arkusza "Martyka". Kolejne zaznaczenie w kolumnie Martyka ma dodawać kolejny wiersz w arkuszu Martyka....
Witam ponownie mam jeszcze jedną prośbę jak zrobić takie makro, postaram się wytłumaczyć. Ogólnie mówiąc chciałbym żeby na początku makro sprawdzało czy w arkuszu 1 w komórce C2 znajduje się wartość jeżeli tak to tworzy nowy arkusz z tą nazwą i kopiuje zawartość z Arkusza 2 od A1:H7. Następnie skopiowane wartości porównuje - Arkusz 1 wartości od A3...
Przepraszam za blędy: Było w arkuszach 1, 2 i 3 : 0123457 011-6500-011-00003/11 Franek Powinno być : 0123458 011-6500-011-00003/11 Franek Makro w arkuszu 1 w kolumnie A szuka np. takiej warości:"0123456" Jak znajdzie to przeszukuje arkusz 2 i 3 Jak znajdzie to wstawia dane do arkusza 4w następującej kolejności: Kolumna A 0123456 Kolumna B 011-6500-011-00001/11...
Witam. Potrzebuje zrobić coś takiego: Wstawiam dane w komórce np. A1 to automatycznie kopiuje do np B1.Teraz w A1 zmieniam wartość danych to automatycznie kopiuje nową wartość do B2 i tak w kółko jak jest nowa wartość w A1 to przenosi ją w nową komórkę. Ma to się odbywać w automacie bez przyciskania przycisków. Chcę ze strony internetowej importować...
To jest to makro: Sub DataLabelsFromRange() Dim DLRange As Range Dim Cht As Chart Dim i As Integer, Pts As Integer ' Określenie wykres Set Cht = ActiveSheet.ChartObjects(1).Char... ' *********** Wyświetlenie pytania o zakres On Error Resume Next Set DLRange = Application.InputBox _ (prompt:="Zakres zawierający etykiety danych?",...
tylko że nie mam pojęcia większego o VBA i nie wiem jak zrobić lub jakiego hasła poszukać dla wyboru lub dodawania arkusza pytanie czy makro z openoffica zadziała: Sub WstawNazwanyArkusz() Dim Nazwa As Variant Nazwa = InputBox("Wpisz nazwę dla nowego arkusza:", "Nazwa nowego arkusza") If Nazwa = "" Then GoTo brak Else Sheets.Add.Name = Nazwa Exit Sub...
Przepraszam, faktycznie podałem mało informacji, ale pisząc post zakładałem, że problem jest już rozwiązany, nie szukałem pomocy, chciałem osobom, którym Excel sprawi podobne kłopoty zasugerować, co może pomóc. A to ma sens na dużym poziomie ogólności, wątpię, żeby kod tu wiele pomógł, zwłaszcza mało zaawansowanym użytkownikom makr, takim jak ja. Do...
... Jak naciśniemy w arkuszu Kosztorys pole B7 czyli to białe puste szybko dwa razy to otwiera się Listbox z wyborem danej pracy ... Wszystko działa ok ... No niezupełnie ... ' ListBox1_Click ' usuwa z komórki ' AB7 ' wartość liczbową i po zamknięciu okna nie można go już ponownie otworzyć bez wstawienia tam liczby. ... Potrzebne są tylko trzy zmiany....
rozumiem do momentu funkcji INDEKS I PODAJ POZYCJĘ a to co dzieje się w kolumnach E F i funkcje jakimi są wstawiane produkty ich ilości i ceny to czarna magia ;/ ale rozumiem ze to na zasadzie zeby wstawilo mi cale zamowienie bo gdybym wyszukiwala funkcjami INDEKS I PODAJ POZYCJE towary to powieliłoby mi we wszystkich komorkach ten sam jeden towar a...
Witam ! Potrzebuję zrobić makro które wstawi datę w kolumnie powiedzmy B kiedy w A będą dane, natomiast kiedy wstawię ""x"" w kolumnie C to wstawi dodatkową datę w kolumnie D. Wstawianie dat działa, natomiast jak zrobić aby po edycji całości i np skasowaniu danych i wyników, nie wywalało błędu i informacji o debugowaniu, brakuje mnie wiedzy o składni...
Próbuje napisać makro, ale z uwagi na brak wiedzy odnośnie najprostszych poleceń nie umiem sobie poradzić. Wydaje się, że makro jest dosyć proste. Mianowicie: 1.Istnieje ciąg wyrazów w arkuszu A (CEL) 2.Po tych wyrazach przeszukuje arkusz B (BAZA) 3.Gdy znajduje to kopiuje wartość stojącą przy wyrazie w arkuszu B. 4.Wstawia ten skopiowany wyraz w kolumnie...
To jest jakby pokłosie tego o czym pisałem z Tobą w sprawie wstawiania kodu makra. Doszedłem do wniosku, że nie bardzo poradzę sobie chyba z tym makrem wstawiającym kod. Ponieważ na innym forum zaproponowano mi, żebym podmienił arkusz, pomyślałem, że tak będzie prościej. Generalnie mój pomysł opierał się na tym, że z otwieranego pliku miałem kopiować...
Witam ponownie. szczególnie marka ,który praktycznie w większości napisał mi makro w tym programie i jego proszę o pomoc. Program hula mi super, ale ja wymyśliłem pewne usprawnienie i mimo pomocy forumowiczów nie daję sobie do końca rady. Omówię pokrótce o co mi chodzi i pokażę jak mi pomagali koledzy.Program który wysyłam jest do minimum skrócony i...
witam Potrzebuje makra, które będzie miało za zadanie uzupełnić arkusz "BAZA" pod warunkiem występowania danych w arkuszu "BAZA_ETYKIET". Jeżeli w kolumnie C arkusza "BAZA ETYKIET" wystąpi taki znak sprawy 0142-6400-0142-00000002/10, to makro ma za zadanie odnaleźć ten znak sprawy w arkuszu "BAZA" w kolumnie C, zaczynając szukać od komórki C3, w tym...
Witam.Czy znajdzie się jakaś życzliwa DUSZA? Jestem początkującym w VBA. Można powiedzieć, że dopiero zaczynam i dlatego proszę o pomoc. Jakiś czas temu znalazłem w internecie plik, który przesyłam w załączeniu. Oczywiście plik ma małą ilość danych. Znalazłem też w internecie makro do wybierania drukarek i wstawiłem je pod ComboBoxa. Teraz można wybierać...
1. potrzebuje pomysłu jak zabrać sie za makro... formatowanie danych wejsciowych ... i sprawdanie poprawności danych. Obawiam się kolego, że takie dane nie nadają się do automatyzacji obróbki przy użyciu VBA. W mojej ocenie pochodzą one z niezbyt precyzyjnego oprogramowania OCR i dlatego nawet po ewidentnie ręcznej obróbce w arkuszu AFTER mają dziesiątki...
Obrazki wstawiane są przez makro następującej treści: Do While Worksheets("Dane").Cells(NumerWiersza, NumerKolumny).Value <> "" Dim Model Model = Trim(Left(Cells(NumerWiersza, NumerKolumny).Value, 9)) If Dir(Ścieżka & Model & ".jpg") = Empty Then Worksheets("Dane").Cells(NumerWiersza, NumerKolumny + 1).Value = "brak zdjęcia" Else Dim MyPic...
Hej, podejrzyj kod w załączniku :) Najpierw dzieli on dane na zakładki, a potem kopiuje je do plików. Formatowanie nagłówka i stopki jest proste - wystarczy że zarejestrujesz makro ustawiając sobie nagłówek i stopkę, a potem zmodyfikujesz powstały kod wg własnych potrzeb. Z tą różnicą że zamiast fragmentu: With ActiveSheet.PageSetup [...] wstawiasz...
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...
można na przykład tak: Arkusz 1 komórka a1 z formułą np =DZIŚ() komórka b1 to cena komórka c1 to ilość komórka d1 formuła =b1*c1 komórka e1 wstawiamy button (makro do buttona poniżej opiszę) Arkusz 2 wiersz 1 kolumny A,B,C,D opisane jak w arkuszu 1 komórka e1 formuła =ile.niepustych(a:a)+1 Teraz będzie makro do butona: [syntax=vb] sub arhiwum() Range("A1:D1").Select...
Witam. Nie mogę poradzić sobie ze stworzeniem makra... Chciałabym aby makro łączyło tekst z komórek z zakresu C13:C21 ( z pominięciem pustych) z zachowaniem formatowania i wstawiało do komórki w innym arkuszu. Plik przykładowy z makrem. Jak dołączyć do makra, które mam makro, które połączy zakresy C13:C21 z arkusza "dodaj dane" do jednej komórki w innym...
Nie no... tak to się nie da. Aby zrobić mniej więcej to co chcesz trzeba jednak zaprząść jakieś makro. Poza tym trzeba by było zrobić jakaś systematykę w danych. Chodzi o to że opis jednego stropu masz w ok 50 wierszach a w innym przypadku wystarczy 10. Poza tym fotki. Tu trzeba inaczej podejść do problemu. Jak znajdę chwilę to może coś wymyślę (ale...
Potrzebowałem makro, które wstawia w określonym miejscu (kolumna E) hiperłącze na podstawie listy plików (kolumna B) i przyjaznej nazwy (kolumna D). Bez problemu zrobiłem makro, które działa jak należy ale korzystając z odwołań do konkretnych kolumn: Range("E" & wiersz).Formula = "=HYPERLINK(""Faktury...
Wklej do modułu i wypróbuj takie makro (zrobiłem kopiowanie, bo prościej ale możesz sobie zmienić na wstawianie): http://obrazki.elektroda.pl/6793685500_1... a usuwając "zgubisz" w końcu te sformatowane (z obramowaniem). Pomijam kwestię rozmieszczenia na stronie, tu poradzisz sobie sam ;)
Witam! Proszę forumowiczów o pomoc. Jak przerobić następujące makro znajdujące się w załączonym pliku tak, żeby: 1) Przycisk [Dodaj] umieszczał w tabeli poniżej określoną w komórce M6 liczbę wierszy o treści wpisanej tak jak w komórkach B6:K6 2) Obecnie przy dodawaniu wpisów w kolumnach C oraz F makro wstawia puste pola, a ma wstawiać dane z wiersza...
Ok, to podsyłam plik w którym mamy arkusze: dane, parametry i docelowy (widok oraz wynik pracy makra). Arkusz Dane - dane jak wcześniej (trochę więcej kolumn). 9 pierwszych wierszy zarezerwowane. Dane od wiersza 10. Arkusz Parametry - parametry na których będzie opierało się makro. Arkusz Docelowy - tutaj trochę zmian ... Każdy rekord danych ma argument...
Przecież ten skrypt/makro jest skopiowany i dokładnie opisany na: https://www.extendoffice.com/documents/e... Czy asia.asia oczekuje na pomoc czy chce aby ją ktoś wyręczył z trudu przeczytania i zrozumienia gotowca? Odkrywanie rzeczy nowych może być pasjonujące. Proponuje przeczytać wcześniejszą moją...
Cóż, masz schemat i wiesz jak to działa. Dla porównania kolejnych losowań musisz zastosować kolejne pętle. Z drugiej strony: nie widzę głębszego sensu porównywania drugiego losowania z czwartym. Lepiej wrzucić w arkusz tylko te dwa. W przypadku porównywania sześciu losowań w każdej kombinacji makro będzie miało ~1 metra :) Można podejść inaczej i warunkować...
Witam Mam mikrokontroler, który co pewien czas wysyła mi na port COM temperaturę z czujnika. np "21,4" Nie mam żadnego problemu z połączeniem COM ponieważ jeśli odpalam HYPER TERMINAL wszystko wyświetla mi świetnie, problem w tym że musiał bym za każdym razem kopiować cały tekst z terminala i w excelu obrabiać żeby sobie utworzyć wykres temperatury....
wstawianie danych makro wstawianie makro wstawianie wierszy
instalacja masztu dachu koszt ogrzewania gazem ziemnym sprawdzić przebieg bębna bizhub
Kod 25897 w Scania R420 Euro 5 2009 - przyczyny Zamienniki tranzystora C1815: 2N3904, BC547, 2N2222
