Oto plik. Potrzebuję jak napisałem wyżej: jeśli znajdę nazwisko w kolumnie B i pasujące do niego imię w kolumnie C to wartość z komórki ( wiersz ten sam co nazwisko, kolumna K) powinna wklejać się np. w innej zakładce. Zauważ, że to samo nazwisko pojawia się kilkukrotnie, więc trzeba to zrobić bez powtórzeń. Trochę to skomplikowane. Dzięki z pomoc Janek
Temat prosty, ale mało znany, dlatego pozwalam sobie na prościutki wywód, ta funkcja jest często bardzo przydatna. Mamy dane w dwóch kolumnach, zaznaczamy je jako blok, kopijuemy do bufora, klikamy na komórkę, do której będziemy wklejać i wklejamy specjalnie - zaznaczając opcję http://obrazki.elektroda.net/25_12682625... Pozdrowionka
Tam w tej komórce z FZ występuje numeracja pierwsze Fz to FZ1 ale nie wiem czy numer tutaj ma znaczenie. Ma o tyle, że do tej pory sprawdzałem, czy wartość komórki = FZ, teraz trzeba sprawdzić, czy w łańcuchu znaków, będącym wartością komórki, znajduje się fragment FZ. Dodatkowo w komórkach A pod fz znajdują się głównie cyfry bądź puste pole więc może...
Otwórz w Access tabele do której chcesz wkleić dane, ctrl +a, ctrl+c, otwórz excel nowy arkusz ctrl+v, wytnij wszystkie wiersze oprócz nagłówków kolumn (pierwszy wiersz) , edytuj dane dodawaj, zmieniaj co chcesz, kolumnę id pozostaw pusta. Gdy skończysz zaznacz i skopiuj arkusz, w Access zaznacz ostatni wiersz w tabeli i ctrl+v, jeśli typy danych itd...
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...
Na początku musisz ustalić długość kolumny, którą będziesz przeszukiwać tzn. ostatnią niepustą komórkę. Możliwe jest to za pomocą: Application.WorksheetFunction.CountA(... Do wyszukania wartości użyć można: Selection.Find() Cały wiersz zaznaczasz za pomocą: Rows().Select Zaznaczony wiersz kopiujesz: Selection.Copy Wklejasz: Range().Select...
Intersect(Target, Columns(...)) zwraca zakres komórek typu Range(), będący wspólną częścią - w przypadku zdarzenia Worksheet_Change - obszaru, który uległ zmianie (Target) oraz wybranej kolumny (Columns(...)). Tym obszarem który uległ zmianie (Target) może być tylko jedna komórka (np. kiedy wpisujesz w nią wartość ręcznie), ale też zakres komórek (np....
Na przykład dodaj jeszcze jedną kolumnę przy wierszach które mają być liczone wpisz 1, w kodzie dodaj jeszcze jeden if który sprawdzi czy jest jeden jeśli jest to liczy jeśli nie to następny wiersz, lub po ostatnim Next do wartości p. K. i dodajesz tyle ile ma być pominiętych wierszy, np i =i +10 i jeszcze raz wklejasz swój kod który sprawdzi następny...
Można w ten sposób: 1. Wykorzystajmy kolumnę DA jako pomocniczą. W DA4 wklejamy =MOD(WIERSZ();2) przeciągamy w dół do DA229 i wiemy, który wiersz jest parzysty, który nie. 2. W komórkę H4 =JEŻELI(ORAZ(I4<>"&qu... i przeciągamy do H213 3. W J215 =JEŻELI(SUMA.ILOCZYNÓW((J4&#...
Najprościej byłoby zastosować jakąś pętlę w VBA, ale można próbować po "excelowskiemu". Np dołożyć jeden arkusz roboczy, w którym tworzymy tabelę i szukamy wyniku, a w głównym dać tylko odwołanie... Całość oparta jest o funkcję ZNAJDŹ i jeśli nie ma tekstu z kolumny A w dowolnym wierszu kolumny B, to funkcja zwróci #ND! Na podanych przez Ciebie danych...
Robisz zmienną, która odczytuje z określonej komórki wartość czyli ilość wierszy do wklejania i kolejne zmienne z wartościami do wklejenia. Wierszy = Cells(wiersz, kolumna).Value
Podmień linijkę wklejania. Podaję cały blok copy-paste dla porównania kolRight = Range("d2").End(xl... Range(Cells(wrsLeftTop, 4), Cells(wrsLeftTop + 1, kolRight)).Copy Range(Target.Address).Offset(... 1).Select Selection.PasteSpecial Paste:=xlPasteFormats Application.CutCopyMode...
Działa. Do wyznaczenia 'nowej' kolumny jest brany pod uwagę wiersz 1. Cells( 1 , Columns.Count).End(xlToLeft).Column Dopasuj to sobie.
Wklej do modułu pliku z linka i uruchom. Makro w tej postaci "wydłubało" 1341 wierszy. Po wszystkim wyeksportuj, lub skopiuj arkusz "Wynik" do swojego pliku. Reszta w komentarzach.[syntax=vb]Sub Yoasia() ileArk = 2 'są dwa z danymi w pliku z linku. Zmień jeśli jest inaczej. 'tu sprawdzimy czy jest arkusz wynikowy, wstawimy jeśli nie 'nie zmieniaj kolejności...
Witam Mam pytanie czy jest mozliwosc zaktualizowania makra? Posiadam Makro ktore wkleja jakies formuly w obszarze 100 kolumn i 100 wiersz, potrzebuje teraz wstawic dodatkowa kolumne mniej wiecej w polowie zakresu, Iteraz co zrobic aby zapisy makra rowniez sie przesunely o ta jedna kolumne, jest taka mozliwosc????
Funkcja ADR.POŚR może służyć do odczytania danych z pliku otwartego w tej samej instancji Excela. W tym przypadku to się nie przyda. Bez VBA czy innych dodatkowych narzędzi nie da się tego zrobić w sposób trywialny. Istnieją sposoby "drogą okrężną". Najpierw trzeba przygotować teksty odwołań, potem zamienić formuły na wartości i wreszcie aktywować uzyskane...
Rzeczywiście można bez pętli. To pozostałość bo pierwotny kod pozwalał wybrać liczbę kolumn jaką chcę się dodać. Po przemyśleniu stwierdziłem że może prościej będzie kopiować ostatnią kolumnę? Zamieniłem tę linijkę "ws1.Columns(iCol).EntireColumn.Insert" na "ws1.Columns(iCol).EntireColumn.Copy ws1.Columns(iCol)" i ładnie działa tylko zależy mi na tym...
Ten kod jest niejasny. Mylisz pojęcia skoroszyt (Workbook) i arkusz (Worksheet). Skoroszyt może zawierać kilka arkuszy. Taki fragment jest błędny. [syntax=vbscript]Dim Formualarz As String Dim Rejestr As String ThisWorkbook.ActiveSheet = Formularz Workbooks.Open Rejestr Workbooks(Formularz).Activate Workbooks(Rejestr).Activate [/syntax]Co dokładnie...
tu masz makro kopiujące te dane z arkusz1 z komórkek b5:b10 do aktywnego arkusza do kolumny D [syntax=vb]Sub macro1() Worksheets("Arkusz1").Range("B5:B10").Co... Range("D:D").PasteSpecial End Sub[/syntax] Reszte musisz bardziej sprecyzowac bo nie bardzo czaje, nowy wiersz czyli do kolejnej kolumny?
vcarter - w pierwszym poście przedstawiłeś kod, w którym wystarczy tylko zmienić wklejanie całej zawartości pliku na odczyt wiersz po wierszu i umieścić wszystko w pętli. VBA posiada wbudowane funkcje. które radzą sobie z własnymi oraz niektórymi obiektami systemowymi, w przeciwieństwie do Np Basica w Open Office, gdzie niemal wszystkie obiekty wymagają...
Cześć, od kilku dni próbuję zaktualizować kod VBA tak aby dane z zakładki KWERENDA (tylko z kolumn od A do H) wklejały się do zakładki REJESTR PROTOKOŁÓW w pierwszy wolny wiersz w kolumnach A:H . Dodatkowo przed kopiowaniem nakładam filtr tak aby skopiowały się tylko konkretne wiersze. Jak w zakres destynacji wprowadzam np Range("A1", "H1") to kopiuje...
WOW - to działa normalnie nie wierze :) nigdy nie mogłem skumać programowania a dało by radę byś dorzucił jeszcze takie 3 rzeczy - żeby dodawał kropkę do 1. 2. bo ją ucina po konwersacji - przy cenie pokazuje się taki trójkąt zielony ukazuje się wykrzyknik żółty i tam ciskam na konwertuj na tekst; mogę to zaznaczyć jakoś w całości żeby był tekst czy...
Sprawdź takie makro: Cells(CC, 3).Cut zastąp linijką Cells(CC, 3).Copy . Makro działa od pierwszego wiersza, jeśli pierwszy wiersz Twojej tabeli to nagłówek, początkowe parametry CA oraz CC zmień na numer wiersza, od którego zaczynają się faktyczne dane. Makro działa do momentu napotkania pierwszej pustej komórki w kolumnie C.
Tak tez probowalem,ale Jak w komorce zaznacze archiwizuj wiersz i ten wiersz zaznaczam, wycinam, w drugim arkuszu znajduje pierwszy wolny wiersz i wklejam. Super tylko, ze jak zrobic ,by wycial ten z zaznaczona komorka i znalazl pierwszy wolny wiersz. W tym drugim arkuszu. By tam wkleic. Ok probowalem makro zrobic nawet na zasadzie, by w tym drugim...
Potrzebuję pomocy przy stworzeniu makra do kopiowania zakresu komórek z Arkusza1 do Arkusza 2. Wybieram np. komórkę Arkusz1:D7. Makro kopiuje komórki C7, D7,E7,F7,G7 i H7 i wkleja je do Arkusza2(C15, H15). Wybieram drugą komórkę np. Arkusz1:D25 i makro wkleja zaznaczony obszar do Arkusza2 w kolejny wiersz(C16, H16). Makro powinno działać tylko przy...
Witam Jak napisać makro które będzie przeszukiwało kolumnę A i B http://obrazki.elektroda.pl/4124127900_1... Jeżeli w kolumnie B będzie więcej niż jeden ciąg znaków to dodaje wiersz i scala komórki jak na zdjęciu poniżej wartość z komórki A wkleja do scalonej komórki a wartości z kolumny B z danego wiersza wkleja do oddzielnych komórek...
A czy makro nie może być przerwane w momencie kiedy napotka pierwszą pustą komórkę w kolumnie A? Na ten moment makro długo działa chyba z uwagi na to czyszczenie kolumny B. W moich danych nie ma pomiędzy pustych komórek, tak jak w twoim pliku. Np. wklejam do pliku 100 wierszy (ciągiem, nie ma pustych pomiędzy) i te 100 ma ponumerować. Co więcej: Za...
Witam Mam pewien problem z kodem vba, zaznaczam jestem początkujący i jeszcze wszystkiego nie umiem. Napisałem taki kod który mi formatuje w pliku wiersz od B do N w przypadku kiedy jest spełniony warunek w kolumnie S, czyli w moim przypadku kiedy w Kolumnie S w jakimś wierszu jest liczba 30 wtedy formatuj na pomarańczowy wiersz od kolumny B do N itd....
To jest NIE-SA-MO-WI-TE! Działa! Excel/programowanie jest przepotężne. Robiłem ten "kod" za pomocą nagrywania makro oraz dodawałem coś od siebie, żeby to działało automatycznie. Asem w kodowaniu VBA nie jestem, ale jeżeli mój działał, to działał, a że działał tak sobie, to zwróciłem się o pomoc do (jak widać) odpowiedniej grupy użytkowników. (^_^)...
Witaj This Workbook , ale niestety nic się nie dzieje.
Dzięki za sugestie Wcześniej wyrzeźbłęm wklejanie do nowego wiersza Został jeszcze wybór danych z aktywnego wiersza Sub Kopio_aktyw_wiersza() ' ' Kopiowanie danych z aktywnego wiersza kol. A do D ' ' kolumna = 1 ostatnia = Cells(Rows.Count, kolumna).End(xlUp).Row Range("A4:D4").Select 'zakres do kopiowania zawsze w aktywnym wierszu kol. A do D Selection.Copy...
wkleiłem w każdy wiersz tą formule Z Twoją odpornością na wyjaśnienia można stracić cierpliwość :cunning: Przecież wyraźnie pisałem: wybraną formułę (albo tą długą, albo tą krótką naszego mistrza) wklejasz do komórki N4, zaznaczasz tą komórkę, "łapiesz" za uchwyt i przeciągasz ją wzdłuż całej kolumny N (od wiersza 4 do 19) Obejrzyj sobie te formuły...
(at)PRL już tłumaczę 1. W arkusz BAZA wklejam dane. 2. Uruchamiam makro 2.1 Makro ma zadanie sprawdzić kolejność liczb 2.2 Jeżeli znajdzie brakującą liczbę/liczby to wstawia w ten arkusz "BAZA" nowy wiersz/wiersze i w ten nowy wiersz/wiersze wstawia brakującą liczbę/liczby i zaznacza na kolor zielony 2.3 wstawione liczby przenosi do arkusza"brakujące"...
Mam nadzieje, ze bedzie widac. Jak otworze excela, prawy przycisk rozwija okno opcji itd. Jeśli zaznacze dowolną komorkę i kliknie gdziekolwiek ppm - dalej rozwija sie okno opcji. Jesli zaznacze te 4 kolumny i ctrl C - wtedy klikajac PPM okno opcji od razu sie chowa (ledwo co sie rozwija i znika). Wystarczy potem zaznaczyc inna randomową komorke i ctrl...
Cześć, Zwracam się z prośbą o pomoc, ponieważ potrzebuję napisać makro, które kopiowałoby wybrany wiersz, od pola B2 w Arkuszu1 (to wiem jak to zrobić) a następnie wklejałoby go w następne. Tu zaczynają się schody, ponieważ nie chcę na sztywno wpisywać zakresu wklejania. Warunek ma być następujący, jeżeli w kolumnie A (NAZWA DOSTAWCY), nie ma żadnej...
WItam Mam taki o to problem. Jest tabela w ktorej muszę zamianić miejscami dwa wiersze, tzn. jeden jest na samej górze a drugi po środku. Da się je jakoś zamienić miejscami? Próbuje w następujący sposób: dostawiam na chwile na samym dole jeden wiersz odpowiednio już podzielony na komórki, następnie zaznaczam interesujący mnie wiersz i wybieram kopiuj....
Witam, potrzebuję pomocy w napisaniu makra, które jeśli znajdzie w przeszukiwanej kolumnie liczbę - to skopiuję odpowiadający jej wiersz i wklei obok... Pokaże na przykładzie: https://obrazki.elektroda.pl/9481950800_... Mam plik z czterema kolumnami - makro powinno przeszukać kolumnę C (wiersz po wierszu - max.300 wierszy) i jeśli znajdzie...
http://obrazki.elektroda.pl/3150320100_1... Z uwagi na problemy z generowaniem czcionek do moich projektów opartych na LCD np od Nokii 6610 i 6800 napisałem swój własny programik, który ułatwia tą czynność. Programik (oczywiście darmowy) napisany jest przy użyciu darmowego środowiska Lazarus dostępnego zarówno dla Windowsa jak i dla...
W przykładzie użyłem kolumny pomocniczej. Tu podpowiem: w komórkę E2 wklejasz formułę =LICZ.JEŻELI(A$2:A2;"Razem konto") i przeciągasz w dół do końca zakresu. Na wynikach w tej kolumnie opierasz całą resztę. Najpierw funkcja PODAJ.POZYCJĘ, gdzie argumentem "wartość szukana" jest funkcja WIERSZ(). Jeśli komórka wynikowa ma być w...
Nie wiem, ale z Twojego pliku widać, że można tutaj zastosować bardzo prosty trick rozwiązujący ten problem - wprowadzenie na początku tabeli dodatkowej kolumny z identyfikatorem (numerem) trasy Umożliwi to dokładne wychwycenie wszystkich wierszy z określonym identyfikatorem Powiem szczerze nawet o tym myślałem, ale po pierwsze arkusz generowany jest...
Chciałbym, żeby to makro wyszukiwało mi ostatni wolny wiersz i tam wklejało dane z plików, czyli: [syntax=vb]wiersz = Sheets("dArk").Range("C65536").End(xlUp)... + 1[/syntax] Niestety moja znajomość VBA jest na razie (mam nadzieje :D ) na niskim poziomie i dołączenie tej części kodu wywala mi błąd. Druga rzecz. Pobierane dane nie zawsze są tej samej...
Cześć, mam makro, które wkleja mi konkretne wartości z różnych kolumn z pliku Dane do nowego pliku. Niestety nie umiem przerobić tego makra tak, żeby otwierać ten plik z którego wklejam tylko raz. Bo teraz za każdym razem przy kopiowaniu z kolumny A muszę otworzyć plik, a potem jak kopiuję z kolumny C znowu otwiera mi się okienko w którym muszę wybrać...
Witam, Makro zwraca błąd method range of object _global failed. Prośba o pomoc - co jest nie tak?[syntax=vbnet][/syntax] Sub copy_nazwy_kolory() Dim i As Integer, j As Long, wynik As Long, wiersz As Long, zakres As Variant Dim kol As String wiersz = ActiveSheet.UsedRange.Row + ActiveSheet.UsedRange.Rows.Count zakres = Range("f1:f" & wiersz) For...
cześć, napisałem makro które kopiuje mi dane z nowo otwieranego pliku do tego, które chce. Tylko że robi to w wersji jeden do jednego, a ja potrzebuję rozwiązania na przesunięcie tych danych do innej kolumny tak aby dane nie były wklejane dla mnie w kolumnie A tylko B. Macie jakieś proste rozwiązanie na to? [syntax=vb] Sub Makro1() ' ' Makro1 Makro...
WIELKIE DIĘKI Crayou twój pomysł mi pomógł, po małej modyfikacji : w pierwszej linii napis miga co sekundę a w drugiej licznik liczy sekundowo bez migania. Jest OK. Wklejam może komuś się przyda. [syntax=c]#include <LCD.h> #include <LiquidCrystal.h> #include <LiquidCrystal_I2C.h> LiquidCrystal lcd(12, 11, 5, 4, 3, 2); void setup()...
Mam 2003 Ale w każdej wersji kopiowania (jedna kolumna, dwie kolumny, jeden wiersz itd)kopiuje mi wraz z tabelką. Jak zaznaczę oddzielnie każde A (trzymając ctrl) nie mam tabeli ale a są rozdzielone znakiem nowego wiersza a nie tabulatorami. Kombinuje różne sposoby zaznaczania i wklejania i nie mogę uzyskać tego co pokazałeś. Po takim skopiowaniu możesz...
Ja bym tu zastosował taki (mniej więcej) algorytm: 1. wklejam oba cenniki jeden pod drugim, przy czym w czwartej kolumnie nowy rok zaznaczam (może to być wartość "2013", może też być jedynka albo "v" - nie ma znaczenia) 2. sortuję całość wg indeksu, wpisy o tych samych indeksach znajdą się jeden nad drugim - sąsiadująco, 3.Teraz program powinien przepisać...
Twoja koncepcja [syntax=vb]Sub trzeci() Dim a As Double Dim b As Double Dim c As Double Worksheets("dane").Select 'Start tabeli z danymi a = 2 'Start wklejanych wierszy b = 2 'Start przeszukiwanych kolumn c = 1 'Wykonuj w poszczególnych kolumnach (c) dopóki nie będzie pustego nagłówka While Len(Cells(1, c).Value) > 0 'Jeżeli nagłówek kolumny jest...
Witajcie Szukam sposobu by skanując produkt, zaznaczyć komórkę w odpowiednim rzędzie i kolumnie. Rozkład jest taki: A1 - zeskanowany numer z "Numer porządkowy" (A4:A10) B1 - zeskanowana waga C1 - ilość tabel F1 - wierszu z porównanego kodu (A1 z zeskanowanym) Schemat przebiega tak: zaznaczam komórkę (np: A1) -> skanuje (wkleja skan) w zaznaczoną komórkę...
Witam, Potrzebuję makra, które będzie kopiowało i wklejało zawartość wiersza w którym: Jeżeli w kolumnie G komórka zawiera wartość to wstaw <pod nią> wiersze n-1 i skopiuj dane z tego wiersza. Czyli w komórce g8 pojawia się wartość 3 to makro wstawia pod 8smym wierszem 2 puste i kopiuje cały wiersz 8 do wstawionych wierszy. Mam nadzieję że dość,...
Witam wszystkich. Potrzebuję napisać macro, w którym: 1. Z Arkusza początkowego kopiuje wartości (nazwy dostawców) do osobnego Arkusza. 2. Przycina te wartości do wskazanej ilości znaków (tak, żeby mogły stanowić nazwę Arkusza). 3. Otrzymany wynik zwraca do pierwszego Arkusza w miejsce oryginalnych wartości. 4. Wracamy do nowego arkusza, w którym nazwy...
wklejać wiersz wklejać puste wiersz numerować wiersz kolumna
hikvision monitor nieobsługiwany delonghi spienianie schemat podłączenia żarówek
wymiana linki drzwi zmywarka diagbox lexia
Falownik off-grid 5-7 kW: Qoltec, Growatt, Deye, Victron – modele i ceny 2024 Peugeot 106 1.4 – lokalizacja bezpieczników świateł, skrzynka, numery, amperaż