Witajcie, mam dość według mnie ciężki temat do zrobienia, częściowo poruszany w tym wątku. Chciałbym aby makro kopiowało dane uzupełnione przez pracowników z poszczególnych arkuszy do Arkusza PH1 i wklejało dane jedno pod drugim. Czyli sprawdzało który wiersz jest ostatnim w którym już są dane w PH1...
Witam.Proszę o pomoc w napisaniu kodu makra dotyczy: kod makro do excela działanie: skoczyć do ostatniego wiersza arkuasz1,zaznacz ostatnie 2000 wierszy, kopiuj i wklej do arkusz2. problem:arkusz1 powiększa się o kolejne wiersze Za rozwiązanie z góry dziękuję
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...
1b. Kod ma kopiować wszystkie na prawo arkusze z tego samego pliku i wszystko wrzucać do arkusza zbiorczo z ostatnim wierszem. Może opisze od początku moje działania: Mam plik XXX, w którym jest jeden arkusz o nazwie Panel. W nim mam różne porobione przyciski z makrami. Pierwszy przycisk pozwala...
Kolego. A co ja Ci wysłałem? Mam pytanie korzystam z bardzo podobnego kodu poniżej, ale pojawił się problem po skopiowaniu np 10 wierszy z arkusza 1 i następnie kopiowaniu kolejnych linii z arkusza 2, linie z arkusza 2 nie wklejają się w pierwszy wolny wiersz pod tymi 10-cioma z arkusza 1...
Nagraj makro.
Dziękuję Ci bardzo Makro działa dokładnie tak jak chciałem. Mam tylko jeszcze jedną prośbę mógłbyś mi wysłać ten plik jeszcze raz ale z dokładnym opisem w makrze co i dlaczego ? Mam kod działa, ale chciałbym zrozumieć dlaczego i móc zastosować ten mechanizm w innych celach :). Tak czy inaczej jeszcze...
iersz, który zamykam Co oznacza zamknięcie wiersza? to w sumie oznacza umowne w tym przypadku zamknięcie sprawy - najpewniej wpis w komórce np z datą zamknięcia sprawy. Zamiarem jest, że przy zmianie w tej komórce uruchomi się makro które poda monit, czy przenieść wiersz do pliku docelowego. Również...
[syntax=vbscript] Sub FZ() r = 1 'kolejny sprawdzany wiersz (row) rstart = 0 'numer pierwszego w serii wiersza do którego wklejam wartości, jednocześnie numer wiersza kopiowanego rend = 0 'numer ostatniego w serii wiersza, do którego wklejam wartości c_from_start = 1 'początek zakresu (nr kolumny)...
Hej. Jak dla mnie widzę tu tylko makro w Excelu. Niestety programista ze mnie kiepski, więc coś tam próbowałem wymyślić, jednak nie gwarantuję, że będzie działać idealnie. [syntax=vb]Sub Makro1() Const MaxR = 20 ' maksymalna ilość powtórzeń If ((Selection.Rows.Count < 2) Or (Selection.Columns.Count...
Sprawdzasz ostatni wiersz w arkuszu. np tak: ostatni = Cells(ActiveSheet.Rows.Count, 1).End(xlUp).Row Robisz pętle FOR od numeru wiersza nagłówka np 3 do ostatniego wiersza arkusza, czyli np tak: FOR x=3 to ostatni ... NEXT x w środku pętli warunek IF że jak komórka kolumny P równa...
Witam, podczas tworzenia makra natrafiłem na problem z którym nie mogę sobie poradzić. Makro miałoby za zadanie z wszystkich arkuszy o nazwie "Protokół x" zrobić zestawienie w jednym arkuszu oraz z "delikatnymi" zmianami odnośnie rozmieszczenia w kolumnach. Na chwilę obecną nie idzie źle - mam...
Witam, Mam problem z edycją Makra (poskładanego z kilku znalezionych, nieco edytowane). Makro tworzy już dodatkowe arkusze zmieniając ich nazwę. Wybiera i zapisuje dane od 2 wiersza w nowych arkuszach. Chciałbym jednak by zaciągał również pierwszy wiersz z arkusza "OPIS" jako nagłówek. Zależy mi...
Witam, mam taki problem z dopisywaniem poszczególnych konfiguracji w tabeli arkusza Excel z poziomu SolidWorks. Chciałbym, żeby makro dopisywało wiersz z konfiguracją o jeden większą niż poprzednia, interesują mnie tylko trzy ostatnie znaki, np. 099, lub 078, lub 088. Problem pojawia się przy dojściu...
Dzień dobry, Wydaje mi się, że sprawę załatwi nadanie zakresowi roboczemu nazwy, pod warunkiem, że nie będzie się usuwać ostatniego wiersza ani ostatniej kolumny, a dodawać nowe również przed ostatnim wierszem i przed ostatnią kolumną, a nie za nimi. Poza tym nagłówki kolumn też trzeba aktualizować...
Witam, mam problem z napisanie makra które chowałoby wiersze po kolei, tzn. jeden przycisk chowa 4 wiersz, po kliknięciu go ponownie chowa się także 5, po ponownym kliknięciu jeszcze 6 i tak dalej, drugi przycisk odrywa te wiersze od tyłu, czyli jeśli ostatni schowany wiersz to był wiersz nr 6 to go...
Właśnie to pozwoliłem sobie zmienić w przesłanym przykładzie w makrze kolegi adamas_nt Wpisz zamiast ostatniWiersz = 100 to ostatniWiersz = Sheets("Arkusz1").Cell... 1).End(xlDown).Row Wtedy makro samo policzy ile jest wierszy i będzie się...
Rozwiązaniem będzie: zainteresować się funkcją Dir Tak właśnie jest zrobione w powyższym pliku: Nie bardzo rozumiem co tam jest napisane. Z tego co widzę to podaję ścieżkę w kodzie, a kod jest zbudowany tak że jeszcze muszę wybrać jakiś folder i tego nie rozumiem. Udało mi się przerobić...
Witam! Mam makro, które mi obrabia dane z tabeli przestawnej i wyświetla je jako kolumny i wiersze (przyrost danych jest jako kolejny wiersz). Pytanie brzmi. Jak napisać makro, które zmieni mi zakres danych wykresu kołowego na jeden wiersz w dół? Np. Dziś jest tak: ActiveChart.PlotArea.Select ActiveCha...
Do szczęścia brakuje mi tylko żeby nie wyskakiwało pytanie o przechowywanie danych w schowku i zapisywanie zmian w plikach ze wzgledu na różnicę wersji offica. 1. Application.CutCopyMode = False po linii z Paste 2. Nagraj makro zapisywania pliku w odp. wersji i wyciągnij z niego argument FileFormat:=xlCoś....
Nie działa, a wstawiłem makra do mojego pliku źródłowego. Proszę skopiować ten makro całkowicie z pliku Pana jeszcze jedno. To również została skopiowana? Const LastR As Long = 5000 'Ostatni wiersz z formul Dodano po 46 Po pierwsze było: '''******************************...
Witam Jestem niestety początkującym użytkownikiem Excela Szukam makra w VBA które pomoże mi skopiować ostatni wiersz razem z formułami które są w wybranych kolumnach i arkuszach. Stworzyłem arkusz w którym używam kolumn A-S, mam 24 wiersze, chciałbym aby w momencie wypełnienia ostatniej kolumny...
Hej. W zasadzie czytałem Twój kod, ale jak spojrzałem na te dane w arkuszach to stwierdziłem, że nie będę tego rzeźbić, bo łatwiej by było od nowa napisać. Ale pokieruję Cię trochę. 1. To, że jak przeklejasz wartości i np wskakuje Ci 1luty to łatwo możesz obejść zamieniając format na tekstowy, najlepiej...
Rzeczywiście - nie tu deklaracja początkowych zmiennych a i b Tak powinno być [syntax=vb]Sub trzeci() Dim a As Double Dim b As Double Dim c As Double 'Worksheets("dane").Select 'Start przeszukiwanych kolumn c = 1 While Len(Cells(1, c).Value) > 0 'Jeżeli nagłówek...
To makro będzie w miarę proste, wystarczy w pętli sprawdzać kolejne komórki w pogrupowanej kolumnie, a jak dwie kolejne się różnią - skopiować zakres od...do: [syntax=vb]Private Sub CommandButton1_Click() On Error GoTo myErr Application.ScreenUpdating = False Set wsdane = ThisWorkbook.Worksheets("dane")...
"Zawsze chcesz wstawiać nowe wiersze jako przedostatnie (pomiędzy cyfrą 2 i 3 w kolumnie A)? " Tak, bo pomyślalem ze tak bedzie najłatwiej odnajdywac ostatni wiersz na podstawie formatu pogrubienia i wstawiac wiersz i rozszerzac analogicznie w kolumnie B scalona komórke by mieściło sie w tych mini...
Zakres to dosyć szerokie słowo... Może to być zmienna ilość wierszy, kolumn, jednego i drugiego, początkowego wiersza, początkowej kolumny bądź kombinacja powyższych. Przypuszczam że chodzi Ci o najprostszą formę ze zmienną ilością wierszy, wtedy możesz użyć coś takiego do ustalenia ostatniego wiersza,...
Tak napisałem i właśnie miałem się pochwalić ale mnie ubiegłeś. Jest jeszcze jest problem. Mam tabelkę w zakładce Arkusz1. Tab. ma 2 kolumny: Nazwa, Opis. W każdej jest n wierszy z danymi. Dane z każdego wiersza powinny przenosić się do zakł. pdf do określonych komórek i powinien następować wydruk,...
Oj rzeczywiście. Na próbce ~2000 wierszy makro, na mojej maszynie (przed uruchomieniem należy usunąć dane z kolumny B/Arkusz1), potrzebuje... mnóstwo sekund. Twój pomysł, zdaje się, przedni. "Poruszając się" od ostatniego wiersza w górę, po posortowanej kolumnie, makro działa jakby, hmm... nieco...
Witam, tym razem mam taki problem. Istnieje w formularzu tabelka. Zawiera w sobie powiedzmy ok. 20 wierszy z danymi. Mój problem polega na tym czy możliwe jest: 1. automatyczne dodawanie wierszy wraz z formułami przez formularz kiedy osiągniemy ostatnią pozycję. 2. czy można to zrobić automatycznie...
Jak macie zainstalowany MS konwerter z 2007 do 2003 to widać makro. ... Dla niego OstW to wiersz 30 ponieważ jest pusty. ... U mnie pokazuje (pomimo pustych) powyżej 7690 Na razie rozgryzam funkcję a możesz w dwóch zdaniach opisać funkcję Unik.Add? A "błąd" jest w tym że cały komunikat ma...
Po naciśnięciu na przycisk commandbutton, otwiera się "Wstawianie hiperłącza", po wybraniu pliku, dodaje adres do następnej wolnej komórki w wybranej kolumnie. Wprawdzie makro nie działa poprzez okno "Wstawianie hiperłącza", ale wstawia łacza, podepnij je sobie pod przycisk. [syntax=vb]Sub Dodaj_Hiperlacze() Dim...
Chodzi o to aby uzupełniało te komórki w których wpisy są na czerwono, i jeszcze jeden problem: patrz dwa ostatnie wiersze(żółte), są to wiersze, które występują w zestawieniu jeden pod drugim i w tym drugim wierszu coś źle liczy.
Budujesz sobie string'a, mamy Np SourceData:="Arkusz1!R4C1:R111C29" ... że argument jest w cudzysłowach - znaczy jest typu String. String możesz złożyć z kilku części, używając znaku "&" - Np SourceData:="Arkusz1" & "!R4C1:R" & "111" & "C29" i tu zamiast Np numeru wiersza możesz podstawić...
i nie ma prawa ( choćby ze względu na średnik ) poprawione odnośnie ostatniego wiersza Sub Makro1() kolumna = 1 ostatni = ActiveSheet.UsedRange.Rows.Count For i = 1 To ostatni Cells(i, kolumna).Select If ActiveCell.Value <> ActiveCell.Offset(1, 0).Value...
Nie rozumiem czemu ma to służyć. Masz 5 komórek do wypełnienia zarówno po lewej, jak i po prawej stronie rysunku, Zablokuj pierwszy wiersz arkusza "BAZA" i wpisuj bezpośrednio w nim. Prosto i bez problemów. Jeśli jednak wolisz coś ambitniejszego, to poszukaj na forum. Potrzebujesz znaleźć Nr ostatniego...
Co masz na myśli pisząc że "nie działa"? U mnie działa zgodnie z opisem... Komentarze do poszczególnych linii: [syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) 'w zdarzeniu przy zmianie w arkuszu If Target.Address = "$A$1" Then 'jeżeli adres komórki której dotyczy zmiana = A1 ...
Witam Potrzebuje aby makro, ktore kopiuje mi wiersze pokazywało mi ostrzeżenie jeżeli liczba wierszy kopiowanych jest mniejsza niz 24 Chyba wiem jak uzyskać liczbę wierszy ale nie wiem jak zrobić aby msgbox pokazywał sie tylko przy warunku ostatni wiersz jest różny od liczby 24 a jeśli jest spełniony...
Procedura pierwsza Co ci źle działa? maks czy procedura sprawdzająca? Wg mnie maks działa bez zarzutu. Natomiast co do procedury sprawdzającej: Kolega adamas_nt dał Ci przykład, który w twoim przypadku nie do końca się sprawdzi niemniej pokazuje zasadę sprawdzania danych które podał użytkownik. Przyznam...
Och, akurat piłem kawę i rozmyślałem nad konstrukcją z wykorzystaniem msoFileDialog [syntax=vbscript]Set fd = Application.FileDialog(msoFileDialogFold... fd .AllowMultiSelect = False .InitialFileName = ThisWorkbook.Path 'dowolna ścieżka Np "C:\folder\" .Title = "Wskaż folder" ...
U mnie działa bez zarzutów - sprawdź w swoim źródle danych, czy aby po ostatnim wierszu nie masz jakiś pustych (usuń je). Ewentualnie zawsze możesz skorygować RecordCount o 1. Jeśli chodzi o drukowanie do PDF, to: - ściągnij i zainstaluj PDF Creator, - uruchom go, w Drukarka->Opcje->Autozapis...
Jeżeli chodzi o arkusz źródłowy to wstaw w pętle przepisująca dane np to: [syntax=vbnet]If Worksheets(zrodlo).Cells(pr_wrs + x, 8) = "OW1" Or Worksheets(zrodlo).Cells(pr_wrs + x, 8) = "OW2" Then Worksheets(zrodlo).Cells(pr_wrs + x, 33) = 1[/syntax] Czyli: [syntax=vbnet]Su... Przeksztalc() Dim...
Utknęłam. Moje makro filtruje wiersze ze statusem New i je kopiuje, następnie otwiera drugi plik i dokleja te odfiltrowane wiersze i usuwa duplikaty. Jak zrobić, żeby dla każdego nowego wklejonego wiersza w ostatniej kolumnie (AE) dodawana była data?
może źle się wyraziłem chodzi mi o obszar roboczy widocznych będzie tylko część wierszy po odfiltrowaniu reszta jest ukryta jak w nowym załączniku czy da się coś takiego zrobić podejrzewam że będzie potrzebne makro, ale pewności nie mam. nowy załącznik raz jeszcze nie chce w filtrze odznaczać...
Mam problem z dopisaniem do Arkusza1 (WuZetka) do komórki E9 kontrahenta wybranego z Comboboxa. Pewnie dlatego, że pod przyciskiem WSTAW nie masz żadnego kodu... ;) Wstaw go - kod będzie podobny do tego, który podałem jako ostatni, a nawet prostszy, bo znasz adres komórki, do której chcesz wstawiać. ...
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...
zmieniłem kod tak jak poradziłeś dodałem jeszcze zmienną LI która powoduje że makro nie mieli od początku ale od ostatniego wiersza. Jest poprawa ale nadal nie działa zbyt szybko. Teraz nie wiadomo w którym momencie jest. Ile zostało do końca Kod po modyfikacjach: [syntax=vb]Sub Przycisk1_Kliknięcie() With...
Cześć, mam plik w którym znajduje się lista kodów pocztowych miast. chce napisać makro które po zliczeniu do ostatniego wiersza ile jest kodów stworzyłoby mi nowe pliki excel o nazwach z kolumny kod niestety to co mam obecnie tworzy mi tylko jeden taki plik i wyrzuca błąd: [syntax=vbscript]Columns("A:A")...
Niech zgadnę - ten kod z dodatkowym kopiowaniem 7 komórek w każdym wierszu działa strasznie wolno i chcesz zrobić to na raty? Tak czy inaczej: na końcu makra trzeba przechować numer ostatniego wiersza z pliku źródłowego, a skoro i tak coś jest przechowywane, to można też zapamietać numer ostatnio...
Pomyśl. Zaczynasz od A1 (i=1, k=1), dojeżdżasz do ostatniego wiersza kolumny C, następnie (zewnętrzna pętla) sprawdza A2 (i=2), to jaka powinna być wartość zmiennej "k"? Odpowiedź: znowu jeden (k=1 przed drugą pętlą, zbędne przed pierwszą)... Druga sprawa masz w sumie dwa warunki: cells(i, "A")=...
Jeżeli jednak chcesz wpisać do aktywnej komórki formułę łączącą dane z arkusza wsh, z ostatniego wiersza i kolumny 9 to należy to zapisać następująco:[syntax=vb] Row_komorki = ActiveCell.Row Column_komorki = ActiveCell.Column ActiveCell.FormulaR1C... = "='" & wsh.Name & _ "'!R[" & ost_w - Row_komorki...
Super nie znałem tej komendy do tej pory. Udało mi się napisać następujący kod, który jak już zdążyłem sprawdzić, wydaje się, że działa. [syntax=jezyk_programowania]D... cyCells As Range Set cyCells = Columns("E:E").SpecialCells(xlCellTypeVi... For Each Cell In cyCells ...
Korzystając z ciekawostki kolegi PRL chciałbym przestawić rozwiązanie mojego problemu z kilku postów wyżej. Chodzi o to, że po usunięciu pozycji dwuklikiem móc cofnąć operację usunięcia wiersza. Makro poniżej sprawia, że po podwójnym kliknięciu w arkuszu "szablon" w pierwszej kolumnie w danym wierszu...
Dziekuje za odpowiedz z kursu napewno skorzystam i wezme sie za prace... poszedlem troche na latwizne i udalo mi sie przerobic czyjes makro i smiga wysmienicie moze komus tez sie przyda pozdrawiam Sub OperacjeHurtowe() Dim wbkSkoroszyt As Workbook Dim i As Long, szukWiersz As Long, wiersz...
Ogólnie tu jest kwestia poprawnego żonglowania Do while Cells(i,1) <> "" (czyli określenie ostatniego zapisanego wiersza) , warunku if i poprawności adresacji komórki przez liczbę( czyli dla celnego określenia użyj sformułowania Sheets(" [syntax=vbscript] Dim i, c, d As Integer Dim dzien...
Sub sumki() Dim czas As Variant kolumna = 1 'dowolna ostatni = ActiveSheet.UsedRange.Rows.Count For wiersz = 1 To ostatni Cells(wiersz, kolumna).Select wzor = ActiveCell.Value czas = ActiveCell.Offset(0, 1).Value For wiersz2 = wiersz + 1 To ostatni ...
Witam Zastanawiam się czy jest możliwość, aby makro skopiowało mi tyle arkuszy ile jest wypełnionych wierszy w arkuszu głównym. Dokładnie chodzi o to, że mam arkusz "Dane", w którym są podane pewne informacje dot. klientów (1 klient=1 wiersz) oraz arkusz "1", w którym są formuły pobierające dane z arkusza...
Dzień dobry. Za pomocą Logo AcessToll pobieram wartość licznika do Excela. Udało mi się stworzyć arkusz, który generuje trend z ostatnich 100 próbek pobieranych co 60sec, czyli mam informację z ostatnich 100 minut. Aby mieć dane z całego dnia, potrzebuje makra lub formuły, która będzie przepisywała...
(at)lanzul Tak jestem pierwszy raz. Mimo wszystko dziękuję za wsporacie o pomoc!!! Toja edycja makra dziła proawidłowo - ale resultat jest ten sam. Formułe Range("D2").FormulaR1C1 = "=""+""&RC[-1]" przeciaga az do ostatniego wiersza w skoroszycie. (zostają same "+" w momencie kiedy kończą się...
Dzień dobry, Dziękuję za wyjaśnienie w kwestii sumy liczb nieujemnych. Tak jak myślałem, chodzi o to, żeby co najmniej jedna wartość była niezerowa, więc jeśli liczby są nieujemne, właściwym kryterium jest suma. Formuły z ostatniego postu znowu nie rozumiem, bo w tej wersji, którą Pan załączył w komórkach...
Witam, mam mały problem z rozgryzieniem makra. Docelowe działanie: Komórki B5 i B6 decydują o ilości produktów oraz ilości elementów z których się będzie składał każdy z elementów (w tej wersji każdy z produktów składa się z tej samej liczby elementów). Po wpisaniu odpowiednich wartości i nacisnięciu...
Jeszcze mam drugie pytanie, w którym momencie trzeba zastosować ? To był tylko przykład żebyś zrozumiał jak działa pętla. Do komórek się odwołujesz .cells(numer wiersza, numer kolumny), są też inne sposoby, ale na razie stosuj ten. Pętlę zastosuj jakąkolwiek np: [syntax=vbnet] dim...
Witam! Mam plik raportu do którego przenoszę dane na zakończenie pracy z pliku „plik testowy” oba pliki znajdują się w różnych lokalizacjach – w załączniku oba pliki na wzór – ogólnie przenoszonych danych jest ok. 30 wierszy z różnej ilości kolumn dla maszyny 1 i maszyny 2, ale...
Cześć, Piszę do Was, bo może ktoś miałby pomysł jak rozwiązać pewne kwestie, nad którą się zatrzymałem robiąc makro. Sprawa wygląda tak, że jest arkusz 'umowy', gdzie są umowy, etapy ich realizacji i inne dane. Na ich podstawie makro obrabia dane i wprowadza je do zakładki 'faktury' i pojawia się...
Witam, Proszę o pomoc w napisaniu makra, które będzie usuwało całe wiersze, w których data będzie starsza niż 2016-05-02 (kolumna z datą to kolumna B) we wszystkich arkuszach. Znalazłam na jakiejś stronie kod z pętlą, która przechodzi przez wszystkie arkusze, ale nie potrafię napisać kodu odpowiadającego...
Program masz "prawie" gotowy. Pomyśl, potrzebujesz odwołać się do Nr wiersza komórki spełniającej kryteria (tutaj zmienna "abc", zadeklarowana jako 'Range'). Będzie to wartość właściwości 'Row'. Następnie należy znaleźć lub określić Nr ostatniej w wierszu. Zadziałaj podobnie (metoda End), jak masz...
Dzień dobry. Googlowałem, googlowałem, szukałem na tym forum ale nie potrafię znaleźć odpowiedzi na podobny problem. Zrobiłem formularz w excelu, który ma za pomocą makra kilka zwijanych części. Dokładnie są to wiersze, które w zależności od wartości jednej komórki są widoczne lub nie. Problem w...
Witam. Poszukuje informacji jak napisać makro lub przykładu takiego makro które przeszukiwałoby kolumnę A i jeżeli znajdzie dwie lub więcej komórek które mają ten sam numer (przykład numeru: 1.1.15.202) gdy znajdzie chciałbym by wówczas dodało do siebie wartości z tych wierszy (wiersz zawiera 12 komórek)...
Witam, Mam do napisania makro, które będzie kopiować dane z pewnego arkusza (nazwa arkusza nie zmienia się, ilość danych również) z dużej ilości plików o zmiennej nazwie (liczba skoroszytów może się zmieniać). Pierwszy problem polega na określeniu ostatniego niepustego wiersza w każdym z tym plików...
Propozycja makro łączącego komórki tak jak chciałaś. Makro wykorzystuje dane z kolumn H i I, zastępuje formuły w komórkach scalanych. Usuwa formuły w kolumnie J (aby umożliwić modyfikację danych w razie potrzeby). Nie ingeruje w formatowanie warunkowe, które było już ustawione w arkuszu. Makro jest...
Witajcie, Napisałem makro kopiujące cały wiersz. Problem mam z tym, ze jak bierze już dany wiersz do kopiowania w którym są checkboxy i kazdy z nich ma jakieś odwołanie, to wkleja wiersz ponizej już z tym odwołaniem. Nie wiem jak zrobić aby odwołanie się nie kopiowało, a checkbox tak. Poniżej wklejam...
Witam, mam prośbę o zrobienie makra dla poniższego zadania, a mianowicie w arkuszu ABC są dane, które należy skopiować do arkusza XYZ w odpowiednie kolumny, ale na podstawie wyboru odpowiedniej daty z arkusza ABC kolumna G i nazwiska osoby też z arkusza ABC z kolumny B (najlepiej przy...
Witam! Mam w pliku Excel arkusz dla każdego tygodnia roku kalendarzowego o nazwach T-01, T-33, T-43 itd. W arkuszu posiadam makro do szybkiego tworzenia nowego arkusza przenoszące układ i formatowanie obecnego arkusza i dodatkowo przenoszące do nowo tworzonego arkusza wiersze dla których wartość w...
Po modyfikacji wg Twoich sugestii kod się uprościł :) i działa jak trzeba Wielkie dzięki :) Sub Kopio_aktyw_wiersza() ' Kopiowanie danych z aktywnego wiersza kol. A do D kolumna = 1 ostatnia = Cells(Rows.Count, kolumna).End(xlUp).Row aktywny_wiersz =...
Czy jest to operacja powtarzalna, to znaczy będziesz w przyszłości ponownie zrzucać tych 25 arkuszy do jednego arkusza? Bo jeśli nie, to, moim zdaniem lepiej to zrobić na piechotę, kopiując dane z poszczególnych skoroszytów do jednego. Można wcześniej np. ustawić różne kolory tła dla poszczególnych...
Musiałoby być cos takiego, sprawdź Sub CopyCount() Const wrt01 As Single = 72 Const wrt02 As Single = 15 Const wrt03 As Single = 13 Dim i As Integer, licznik As Integer, ark As String ark = "Arkusz2" ' nazwa arkusza docelowego licznik = 2 'pierwszy wiersz ark docelowego Sheets(ark).Range&...
Sortowanie załatwiłem przez nagranie makra i skopiowanie tego co chciałem jak tutaj: Range("A:I").Sor... Key1:=Range("B2"), Order1:=xlAscending co do wyszukiwania ostatniego wiersza z nazwiskiem możesz zrobić w pętli przez porównanie. Np (dla wierszy...
Cześć, Chcę stworzyć makro, który sumuje dane w komórkach kolumny P i w momencie gdy suma przekroczy 20 wstawia pusty wiersz. Po czy sprawdza dalej, aż do ostatniej aktywnej komórki. Makro, które utworzyłam nie wyrzuca mi błędu, ale jedyne co robi to przechodzi od komórki P1 do pierwszej pustej. [syntax=vbscript]Function...
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...
Dziękuję za odzew . Przekładowy plik w załączniku. Makro dochodzi do momentu zaznaczenie tabeli w Arkuszu2 i skopiowania na kolejny Arkusz3 i wyskakuje błąd. 1. Za pierwszym wywołaniem działa poprawnie, przy kolejnych jest błąd, prawdopodobnie chodzi o nazewnictwo "Arkusz1", "Arkusz8" itd., czy istnieje...
Witajcie, mam dość według mnie ciężki temat do zrobienia. Chciałbym aby makro kopiowało dane uzupełnione przez pracowników z poszczególnych arkuszy do Arkusza PH1 i wklejało dane jedno pod drugim. Czyli sprawdzało który wiersz jest ostatnim w którym już są dane w PH1 i wkleiło je pod nimi. I tak...
Faktycznie, to usuwanie danych na początku chwilę trwa... U mnie jakieś 30s. Ale dalej mi się nie podobają te funkcje na 600.000 wierszy: popraw je na: [syntax=vb]ost_allegat_list = Sheets("Part of Allegat List").Cells(Rows.Count, 1).End(xlUp).Row With Range("H4:H" & ost_area_A) .FormulaR1C1...
Witam Dopiero zaczynam z Vba Exel i mam problem z przyśpieszeniem swojej pracy. Mam 2 arkusze. W pierwszym uzupełniam wiersze od (a2:h22) oraz komórkę "k1". Po włączeniu makra chcę by komórki z podanego przed chwilą zakresu dopisywały się w drugim arkuszu od "a2:h" a komórka "k1" żeby skopiowała...
Mała przeróbka makr: 912681 Wiersze można dodawać ze ściśle określonego zakresu, który sam sobie ustalasz ("If ilewrs > 10 Then Exit Sub"). Usuwanie wierszy tylko pojedynczo, od ostatniego, aby zachować porządek.
Cześć, Proszę o pomoc w napisaniu makra, które jeśli w arkuszu1 w kolumnie A, w jakimś wierszu będzie znajdować się literka "W" to wtedy skopiuje komórkę znajdującą się w tym samym wierszu w kolumnie B, wklei ją do arkusza2 w ostatnim wolnym wierszu w kolumnie A i usunie cały wiersz skąd została skopiowana. Bardzo...
Moje skrypty są troche słabe, coś tam znalazłem w necie, troche poprzerabiałem i nawet działa, nie działa natomiast usuwanie wiersza jeżeli w kolumnie A mam coś takiego: "05-lut-2016 17:23 Start Template Page 3" z tego wszystkiego zawsze w zawartości stałe...
witam, potrzebuje pomocy na utworzenie makra - postaram sie dobrze wytlumaczyc tabela 1 : kolejnosci rozladunkow- ktore zmieniaja sie w trakcie pracy mamy max 10 rozladunkow na auto. 1 kolumna- klient, 2 kolumna- tempteratura, 3 kolumna- kod trasy tabela 2 : lista wszystkich klientow...
Witam, potrzebuję makro do Excela w VBA. Łamie sobie głowę, żeby to napisać i może ktoś umiałby to poskładać w sposób logiczny w makro. Z góry mówie, że to wygląda na dość obszerne makro ale myśle, że dla kogoś kto dobrze ogarnia VBA nie będzie z tym miał problemu. Dla mnie jest to troche ciężki temat...
Chcialabym aby po nacisnieciu przycisku wstawil mi sie nowy wiersz pod zoltym wierszem i i zeby zwaratosc zoltego skopiowala sie do tego wstawionego i tak z kazdym kolejnym. nagralam takie Makro: [syntax=vbscript]Sub Makro3() ' ' Makro3 Makro ' ' Rows("6:6").Select Selection.Insert...
Teraz możemy to przeanalizować: Makro "Save" wywołuje procedurę "kopiuj_wartości" z trzema parametrami: co kopiować, Nr wiersza docelowego określonego w pętli Do (ostatni niepusty w kol "C" arkusza "REPORT") i Nr kolumny docelowej. Jeżeli chcesz wykorzystać je w tej formie, to docelowy plik (NN.xls)...
Witam, Mam makro jak w ostatnim fragmencie kodu w temacie: Makro rozwiązało problem z tego tematu, jednak pojawił się kolejny - otóż muszę w puste komórki w kolumnie A1 wstawić takie daty, żeby w kolumnie była ciągłość. Kod: Sub rows_influx() Dim i As Long i = 2 Do Until...
Dodano po 20 Musisz określić ostatni zapisany wiersz w danej kolumnie, np. poprzez (dla kolumny A): a jak zrobić, żeby sumowało z zakresu od kolumny M do S? (wybacz trywialne pytanie) Dodano po 23 [syntax=vb]Sub gr0() ' ' gr0 Makro ' ' Sheets("gr 0").Select Dim lOstRw& ...
Witam! Bardzo proszę o pomoc, mam następujący problem chciałbym aby makro wstawiało pusty wiersz po określonej liczbie w moim przypadku chodzi aby wiersz pusty był wstawiany przed ostatnią liczbą mniejszą od 1 000 000 (wartości zawsze posortowane są malejąco) np mam taki ciąg: a 6 541 237 b ...
To nie ma związku z formułami. W wierszu oznaczonym poprzednio komentarzem 4) zamiast lw było wpisane 12, więc pętla w ogóle się nie wykonywała (od 13 do 12 nie ma żadnej wartości). Poza tym ponieważ lw szuka ostatniego zajętego wiersza w kolumnie A, a w tym ostatnim wierszu była teraz formuła zwracająca...
Witam Opiszę problem w punktach: 1. Wczytuję kolejną pozycję do arkusza i wyświetlaną w ListBox na UserForm 2. ListBox zawsze ustawia się na pierwszej pozycji i żeby zobaczyć ostatnią wczytaną pozycję muszę pionowym suwakiem zjechać w dół. Pytanie: Czy można napisać makro, jeżeli się da, aby ostatnia...
VBA nie obsługuje polskich nazw formuł, tylko ich angielskie odpowiedniki. Najprościej zrobisz to tak, że włączasz rejestrator makr, wpisujesz w Excelu formułę i kończysz rejestrowanie. Potem przechodzisz Alt+F11 do kodu, wchodzisz w moduł i odnajdujesz ostatnie zarejestrowane makro. Z niego kopiujesz...
Pisząc kod jak poniżej: Private Sub Worksheet_Change(ByVal Target As Excel.Range) If Target.Address = "$A$1" Then wszystko działa tak jak chciałem, ale tylko w zakresie podanej komórki. A czy można i jak zapisać aby działało w całej kolumnie? I jeszcze jedno pytanie: Wiersz = ActiveSheet.Cells(ActiveSheet.Rows.Count...
Powiedzmy że działa - potestuj. Trochę info o pliku: Podstawa: Makro sprawdza w nagłówku (w wierszu drugim) gdzie jest tekst "Zadanie" i "Grupa interwencyjna" jak również w wierszu trzecim szuka ostatniej niepustej komórki. (po tym rozpoznaje ile jest poszczególnych kolumn. Jeżeli zmienisz...
Cześć, Jestem totalnym laikiem jeśli chodzi o makra, dlatego chciałbym się dowiedzieć jak zrobić takie makro w Excelu, które umożliwiłoby tworzenie listy osób dzwoniących w danym dniu. W tym celu stworzyłem w Excelu dokument z 3 zakładkami. W pierwszej zakładce "Input" chciałbym wprowadzać unikalny...
Witam, Mam następujący problem w Excelu: w arkuszu "Basic" mam dane w dwóch kolumnach - A i B. Od A2 i od B2 (wyżej tytuły). W kolumnie A mam kolejno daty (codzienne) od najnowszej do najstarszej (lata 2002-2010). W kolumnie B odpowiadające datom wartości zmiennej. Chcę skopiować dane z kolumny...
Proszę o pomoc w rozwiązaniu takiego zadania. Jest to swego rodzaju harmonogram. Mamy kolumnę liczb posegregowaną wg. określonej kolejności, chciałbym aby od pierwszego wiersza następowało sumowanie z warunkiem aby suma = 1000, jeśli np. wiersz1 + wiersz2 <1000 to dodajemy wiersz3 itd. Jeżeli suma...
Rozumiem, że nazwy funkcji na angielskie trzeba zmienić. Bo polskich wersji funkcji to chyba jeszcze nie ma? Gdyby ktoś chciał wiedzieć, to ta formuła mnoży numery wierszy w zadanej kolumnie przez 0 jeśli komórka w tym wierszu jest pusta lub 1 jeśli jest zapełniona. Następne wybiera maksimum ze zbioru...
Jak już chcesz usuwać wiersze z zakresu, to wykonaj pętlę od ostatniej zapisanej do pierwszej komórki - mniej problemów. Po drugie: te selecty to są zupełnie niepotrzebne. To makro może być w następującej postaci: [syntax=vb]Sub usun() Dim lLstRw As Long 'ustalenie ostatniej zapisanej komórki...
Hej Zacząłem właśnie uczyć się samemu VBA i utknąłem z jednym problemem. Moje Makro ma a zadanie przy każdym uruchomieniu wyszukać ile wierszy jest zapisanych w pliku w kolumnie D i w tylu też wierszach w kolumnie T wpisać cyfrę "1". Zrobiłem pętle która przechodzi do pierwszego pustego wiersza...
Słuchaj ja trochę namieszałem - przyznaje. Pierwsze sprawdzanie duplikatów wprowadzone przez kolegę adamasa sprawdzało duplikaty gdy w kolejnym wierszu wystąpił ten sam numerze i i ten sam magazyn. Ja stwierdziłem że jeżeli i tak pokazujesz nazwę sklepu (magazyn zastępujesz sklepem) więc poprawiłem...
Witam, (at)JRV >> Sprobuj do exportu ActiveSheet.PageSetup.Orientation = xlLandscape Jest inna metoda trzeba dodać formatowanie stron, ale trzeba je dodać przed zapisaniem obszarów w Array (po zapisaniu obszarów w Array formatowanie stron działa tylko dla pierwszego zakresu). [syntax=vbscript]With...
Błąd pojawia się na linijce Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats... Operation:= _ xlNone, SkipBlanks:=False, Transpose:=False Wtedy w arkuszu DANE OD PLANISTY przechodzi na ostatni wiersz arkusza pomimo tego że wcześniej zaznaczył od wiersza...
Sprawdziłem, że samo makro po skopiowaniu jest składniowo poprawne. Logicznie nie sprawdzałem, bo nie mam danych. Niemożliwe żeby wogóle nie działało. Postaw kursor na procedurze i wciśnij F8. Idzie? Pewnie tak, to znowu F8 i popatrz którędy idzie i dlaczego ucieka z pętli. W linijce, gdzie coś jest...
Witam, Jestem totalnym amatorem w pisaniu makra i utknąłem w miejscu. Problem polega na tym, że potrzebuję aby ostatnia wypełniona komórka z kolumny A została skopiowana do końca danych w kolumnie B. Za każdym razem będzie różna ilość wypełnionych wierszy w kolumnie B dlatego nie mogę ustawić zakresu...
Witam Czy ktoś miałby chwilkę i mógłby mi pomóc? (może być makro lub jeśli się da to funkcje z arkuszem pomocniczym). Mam problem z kopiowaniem wierszy i ich dublowaniem do gotowego arkusza. Mam skoroszyt, który zawiera 3 arkusze robocze: "Re_1", "Re_2" , "Re_3" oraz arkusz wynikowy "Wynik". Do...
Witam, więc mam taki problem. Mam kilka arkuszy restauracyjnych w Excelu podobnych do tego: Teraz wprowadzam ilość porcji... Excel przelicza mi wartość itd...ale, jak mówiłem jest kilka arkuszy działających tak samo (Napoje, dodatki , desery), no i ostatni podsumowanie. No i właśnie w tym ostatnim...
Podmień Jak zwyklę w punkt :) dziękuję . Działa Jeszcze ostatnia rzecz i stawiam kratę dobrego piwa ! A czy można (pewnie można) dołożyć warunkowanie które będzie uruchamiało różne makra na podstawie zawartości kolumny A w aktywnym wierszu. Wpisując w kolumnę D=AWARIA lub SPRAWNY lub WARUNKOWO...
:) Ale nie ma tego złego ... Ściągnąłem od ciebie metodę sprawdzenia ilości wierszy. Do tej pory zawsze robiłem to w pętli warunkowej dopóki ostatnia komórka nie była pusta. Tak samo tu chciałem zrobić. A tak w jednym wierszu kodu można zamknąć takie sprawdzenie. :) Miło tak czerpać wiedzę....
Bardzo dziękuję!! Jeżeli chodzi o nawiasy, to miałem na myśli: - wstawienie na początku wiersza, bez spacji przed pierwszym wyrazem, znaku "<" - wstawienie po drugim wyrazie, bez spacji, znaku ">" - wstawienie przed ostatnim ciągiem znaków, bez spacji, znaku "(" - wstawienie na końcu...
A już myślałem, że jakiś ciemny jestem :) A gdyby tak zastosować (tablicowo) naszą ulubioną w ostatnim czasie MAX? Próba na pierwszym pliku kolegi marek003 : Gdzie w S1 wpisujemy po prostu A i dalej (przez Ctrl+Shift+Enter) =JEŻELI(CZY.BŁĄD(WYSZUKAJ.PIONOW...
To chyba masz rację ;). Zacznij od podstaw. End Sub kończy całe makro, więc powinno być ostatnim wierszem. [syntax=vb] Sub Przenies() Dim Wzorzec, Przebieg Wzorzec = " " Przebieg = 2 Do While Wzorzec <> "" Wzorzec = Cells(Przebieg, 5).Value If Wzorzec = "Wstrzymany"...
A musi być makro? Zrobienie makra to żaden problem . Ciekawym zagadnieniem jest jak zrobić to bez makra :) W załączeniu twoje obliczenia bez makra niestety z kolumnami pomocniczymi (niestety "coś za coś" co prawda można je ukryć ale... muszą być by to działało ale z drugiej strony można kopiować...
Zakładając, że makro uruchamiasz przy aktywnym arkuszu wynikowym, konstrukcja powinna wyglądać mniej więcej tak ostWrs = tu szukamy ostatniej niepustej komórki w arkuszu wynikowym For Each sht In ThisWorkbook.Worksheets If sht.Name <> "tu nazwa arkusza wynikowego" Then ostWrsArk...
To nie wchodzi w grę twoje pierwsze rozwiązanie jest lepsze. Myślę, że stworzę ok 50 kolumn wstawie je jako grupę co umożliwi mi jej schowanie.a w linijce[syntax=vb]For a = 7 To 0 Step -1[/syntax] a zamienie na 49 i bedzię super. Miałbym jeszcze jedno pytanie dotyczące tego pliku. Czy jest możliwość...
Rejestrator makr nie działa? 50% potrzebnego makra uzyskasz w ten sposób. Następnie poszukaj wyszukiwania ostatniej niepustej (jest mnóstwo tematów) i uzupełnij (zmodyfikuj)...
Aha. Już ostatnie pytanie. Jak to wygląda jeśli dane w pliku txt są rozdzielone przy pomocy spacji albo przy pomocy tabulatora? Dziękuję Ci bardzo za pomoc. Dodano po 15 Już wiem jak to zrobić. Dziękuje serdecznie !
Dzień dobry, Jeśli Pan zaznaczy zakładki kilku arkuszy (na dole ekranu), kolejne zakładki: kliknąć pierwszą i ostatnią z klawiszem Shift, dowolne wybrane: kliknąć każdą z klawiszem Ctrl (po zaznaczeniu powinny być białe) to wszelkie operacje wykonywane w jednym z zaznaczonych arkuszy będą powielane...
Nie ma na to automatycznych funkcji Ale ... da się zrobić i to dość szybko jeżeli każda z cyfr występują zawsze 5 razy Aby to ładnie zrobić wykorzystaj funkcję podaj.pozycję() z zerem jako ostatni parametr i w powiązaniu z funkcją indeks() powiększając tą znalezioną pozycję danej cyfry od 0 do 4...
[syntax=vb]iLastPos = GetFirstEmptyRow(ThisWorkbook.Worksheets... - 1 [/syntax] Adamas, właśnie autorowi napisałem, że brakuje ww funkcji. Gdzieś ją posiał... A funkcja najzwyczajniej zwraca ostatni wiersz z podanego arkusza, jak widać.
W nowszych wersjach jest zapewne "Ten skoroszyt". W załączniku jest już wklejone. Jeśli tylko 1-szy arkusz i tylko jeden warunek, to może filtrem go (w załączniku)? Jak już pisałem, przypisać dane z (jak wynika z opisu, ostatniego) wiersza, to żaden problem. Za to wzorów druków PZ jest w Internecie...
Jeżeli chodzi o przetwarzanie obszaru zawierającego puste linie to oczywiście jest to możliwe. Wystarczy znaleźć numer ostatniego zapisanego wiersza (Cells(Rows.Count,1).End(xlUp).Row), a potem w pętli analizować wiersze. Puste pomijasz, nagłówkowe chyba też (zależy od dalszych wyjaśnień). Reszty zupełnie...
Bardzo dziekuję za pomoc. Dodano po 2 Ok. Działa. Dzięki. PS. Możecie polecić jakiś podręcznik/ stronę inernetową w której są opisane polecenia VBA i ich zastosowanie tak aby można byloby się uczyć samemu? Dodano po 16 Z kolumną J jednak nie dokonca jest w porządku ponieważ aktualizuje...
Witam, Mam zarejestrowane takie oto makro: Sub Makro4() ' ' Makro4 Makro ' ' Columns("A:D").Select Application.CutCopyMode = False Selection.Delete Shift:=xlToLeft Columns("G:G").Select Selection.Delete Shift:=xlToLeft Range("A1").Select ActiveWorkbook.Worksheets("BI").Sort.Sor...
Witam, Mam problem z wolnym działaniem makra ukrywającego niepotrzebne komórki, przejście makra przez ok 300 wierszy zajmuje ok 10 sekund, niestety jest to za długo. Kod Sub Rozwiñ6_Zmienianie() Dim rn As Range Application.ScreenUpdating = False 'Range("a1").Va...
Witam, tworzę plik excela do wydań produktów z magazynu do poszczególnych działów. W arkuszu 1 mam nazwy działów, w których każdy jest połączony hiperłączem do osobnego arkusza do ostatniego wolnego wiersza: =HIPERŁĄCZE("#magazyn1!A"&(MAX(JEŻELI.BŁ...
Dziękuję za ostatni kod bardzo mi pomógł. Mam jeszcze jedną pewnie ostatnią prośbę. Chciałbym że dla każdego pliku w katalogu po operacji zapisania pliku, excel sprawdził jedną kolumnę w której raz na jakiś czas pojawi się "+" i jeśli się pojawi to żeby nazwa pliku została zapisana do worda. (Tak żebym...
Ależ to wcale nie musi być kłopotliwe. Wystarczy wykorzystać jedno ze zdarzeń arkusza związane z jego aktywacją i w nim: - znaleźć ostatni wiersz do zablokowania - zaznaczyć blokadę we właściwościach komórki powyżej znalezionego wiersza - zablokować arkusz Ot cała polityka. Stosując to w pozostałych...
Witam, mam pytanie dotyczące makra vba w excelu. W jaki sposób można znaleźć wartość ostatniego wiersza i dopisać wartość o 1 większą w pierwszym pustym wierszu, czyli np. komórki A5(ostatnia pełna) i A6(pierwsza wolna). Czy da się tak zrobić dla jednego wiersza piątego, ale w kilku kolumnach jednocześnie?...
Witam Szanowni forumowicze, mam pewien problem z pętlami którego nie mogę rozwiązać. Mam listę ( kilka tysięcy pozycji) dotyczącej rezerwacji miejsc noclegowych. Arkusz w załączniku. Gdy klient dokonuje rezerwacji powstaje jeden wiersz ze statusem zatwierdzona w kolumnie rezerwacja, jeśli rezerwacja...
[syntax=vb][/syntax] czesc nie wiem jak sie do tego zabrac, ale potrzebuje makro do obrobienia pliku: poniewaz liczba zakladek sie zmienia a ja potrzebuje okreslone zakladki skleic jako jedna, chcialabym miec opcje ktora pozwoli mi wybrac o ktorej zakladki (czasem od 2 czasem od 3....itp)w excelu do...
W załączniku są pliki końcowe, które bedą używane i teraz fajnie by było, gdyby znalazły się jeszcze następujące rozwiązania: 1. W pliku czerwony1 , jeśli dodatkowo wartości w kolumnach M i U zostaną zmienione na kolor czerwony , to nie zważając na to, czy w kolumach odpowiednio AM i AQ są...
Nie wiem czemu nie mogę uruchomić makra z przycisku? Kurcze pierwsze chodziło od cjancik ale to ostatnie nie. Wyskakuje komunikat o ustawieniach osobistych, które mogą być usunięte. Czy to makro ustawia dane w pierwszy wolny wiersz?
Witam. W jaki sposób można makrem, zaznaczyć komórki obok wypełnionych? Dokładnie chodzi o to, że w kolumnie B, mam jakieś dane (mogą być też puste komórki między wypełnionymi) i chciałbym, aby makro zaznaczyło w kolumnie C, cały zakres, od wiersza 2 do ostatniego, który jest wypełniony w kolumnie B.
Mam takie makro j.n.: [syntax=vbscript]Sub sprawdzanie_poprawności() Range("H3:H200").Select With Selection.Validation .Delete .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _ xlBetween, Formula1:="=$B$3:$B$1117" .IgnoreBlank = True ...
Cześć, spróbuj takie makro Super działa! Jaką pętlą rozwiązać zadanie jeżeli formuły będą w 3 lub 5 kolumnach i powiedzmy ostatnia zawszę będzie w tej samej np M. Pozdr,
Cześć! :) Mam taki problem: Mam plik Excela z listą osób: Liczba porządkowa (kolumna B), imię i nazwisko (kolumna C), potem miesiące (od stycznia do grudnia) i suma w kolumnie P. Chciałbym zrobić makro, za pomocą którego wyskoczy mi InputBox, w którym będę mógł dopisać na końcu listy nową osobę....
Witaj Dołożyłem przycisk uruchamiający makro. Pozdrawiam
Cześć Od kilku dni rozkminiam makro, które pomoże mi zautomatyzować pracę. Co tydzień pobieram dane z różnych arkuszy kopiując do jednego arkusza. Żmudne i nudzące zajęcie. Nie jestem programistą, ale z pewnością da się to jakoś ogarnąć makrem. Dla zobrazowania pokazuję fragment pliku. To czego...
witam serdecznie! mam duzy problem z excelem, bardzo prosze o pomoc. szczegoly: posiadam duza baze danych w formacie xls do przetworzenia. sklada sie ona wlasciwie z 2 kolumn: data i wartosc. w polu data znajduja sie tylko dni robocze; weekendy i dni wolne sa pominiete. i teraz tak, potrzebuje...
Jeśli masz tych wzorców kilka (np. 4), nie ma potrze by stosowania makr, wystarczy kilka funkcji (logicznych i tekstowych), w następnym kroku (np. na następnym arkuszu) wyniki możesz zebrać tak, aby nie było między nimi pustych wierszy - takie zapisy pojawiały się już na Elektrodzie - z tego, co pamiętam...
Przecież do tego nie potrzebne Ci jest żadne makro. Sama napisałaś Problem dotyczy genralnie wypelnienia kolumny B funkcja wzgledem wszystkich niepustych wierszy (ciagly obszar od A1) w kol. A. Korzystając z przykładowego pliku stwierdzam, że wystarczy w komórce B1 wpisać: =+A1 Po podwójnym...
Witam, próbowałem już kilku sposobów na rozwiązanie mojego problemu, ale niestety nic konstruktywnego nie udało mi się stworzyć. O co chodzi: pragnę stworzyć makro które kopiowałoby wybrane elementy z Arkusza1 Przykład: 1) mamy Arkusz1 z ID klienta (powiedzmy, że mamy 1000 pozycji) , przypisany...
Witajcie experci excelowi ponownie Kolejny raz potrzebuje Waszego wsparcia. Mam następujący problem do rozwiązania: Są kolumny z datami, wg poniższego przykładu: U V W X Z 2011-03-08 2011-03-08 2011-03-09 2011-05-20 2011-03-08 ...
"Podświetlam" tzn zmieniam kolor czcionki? Nie ma tu nic typu "Selection", natomiast warunkiem jest kolor wypełnienia =Range("L4"). Rozumiem, że makro ma sprawdzać co już jest skopiowane, kopiować tylko wybrane (jak? kolor tła, zaznaczenie) rekordy i zmieniać kolor czcionki na jakiś inny niż poprzednio....
Witam, mam w excelu kilka arkuszy (styczeń luty...) w których występują tabele danymi o transakcjach sprzedaży różnych artykułów w danych miesiącach. Wierszy w każdym arkuszu jest różna ilość W kolumnie C określony jest rodzaj artykułu (oznaczenie: a, b, c, d, e), w kolumnach D, E, F, G mam wpisane...
