Poproś kogoś innego.
Myślę, że najlepsze wyniki czy nie od końca, ale od początku [syntax=vb]Sub Wstawianie_wierszy() Dim i As Long, r As Long, c As Long Application.ScreenUpdating = False i = 2 r = i While Cells(i, 11) <> Empty If Cells(i, 11) <> Cells(i + 1, 11) Then Rows(i + 1).Insert For c = 5 To 7 Cells(i + 1, c + 3) = Application.WorksheetFunction.Sum(Range(...
Wygląda mi to na jakieś "kombinowanie" i, znając życie, nie będzie to działało tak, jak chcesz - bo zaistnieją jakieś warunki, których teraz nie przewidzisz, ale tak na szybko można próbować takim makrem, jak w załączniku. Cała "sztuka" to dodawanie / usuwanie wierszy od końca, żeby zakres się w pętli nie przesuwał. Usuwanie zakłada, że usuwasz wiersze,...
Witam Jestem dopiero na początku nauki programowania w języku VBA. Potrzebuję pomocy w temacie kasowanie pustych wierszy. mam napisane Do While Cells(wiersz, kolumna) = "" Rows(wiersz).Select Selection.Delete shift:=xlUp wiersz = wiersz - 1 Loop Jeżeli w kolumnie 1 jest pusty wiersz to usuń cały. tak miało działać.' jednak usuwa mi tylko 1 wiersz a...
Nagraj makro usunięcia scalenia, wstawiania wiersza, ponownego scalenia i zapętlij...
w przykładzie zeszyt3 [syntax=vb]Sub Wstawianie_wierszy() Dim i As Long, OstWrs As Long OstWrs = Cells(Rows.Count, 1).End(xlUp).Row 'ile wierszy Application.ScreenUpdating = False For i = OstWrs To 2 Step -1 If Cells(i, 1) <> Cells(i - 1, 1) Then Rows(i).Insert Next i Application.ScreenUpdating = True End Sub[/syntax] A tu kod z nazwą - ale nie...
to sobie zobacz: [url=https://www.youtube.com/watch?v=ash...
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:
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...
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
Dzień dobry, Jaka kompletna świeżynka w VBA i proszę o pomoc. Próbuję napisać makro, które będzie wstawiało pusty wiersz, jeśli w kolumnie E znajdzie pełną komórkę. Ten pusty wiersz ma wstawić pod wierszem, w którym znajduje się ta pełna komórka. Napisałam coś takiego: [syntax=vbscript] Sub Wstawianie_Wiersza() Dim BL As Range Dim xCell As Range Set...
nie ma sensu pisać takich komentarzy Nie ma sensu wysyłać obrazków zamiast przykładowego pliku Excela. niedozwolone rozszerzenie Spakuj go i umieść na forum. W jaki sposób zrobić Copy z parametrem Destination? ma powstać baza danych Nienajlepsze rozwiązanie. P.S. Używaj proszę znaczników przy wstawianiu kodu.
uzupełniam kolumnę C i poniżej w tabelach automatycznie dodają się wiersze z tym tekstem co powyżej. Dokładnie podobny mechanizm mam na myśli :D , ale oparty na formułach, oraz na automatycznym ukrywaniu pustych wierszy (realizowane prostym makrem Worksheet_Change) :idea: 989747 Jak widać na zrzucie wstawiam pierwszą literę nowego surowca, zatwierdzam...
Witam, Mam następujący problem: w arkuszu Excel mam dane z datami w kolumnie A od komórki A2 w dół. Dane są w porządku malejącym, ale mają luki - tzn. np. po 26/01 czasami jest od razu (bez pustego wiersza) 24/01. Chcę napisać makro, które w takim wypadku wstawi odpowiednią ilość pustych wierszy w miejscach, gdzie brakuje dat. Póki co mam kawałek kodu,...
Witam. Szukam na google i nie mogę znaleźć jak to zrobić. Chodzi mi o następujące rozwiązanie: Mam Form1 i Form2. Na Form1 znajduje się TextBox1, TextBox2, TextBox3, TextBox4, TextBox5, TextBox6 oraz Button1. Na Form2 znajduje się DataGridView1 oraz Button2. Teraz chodzi mi o to żeby po wpisaniu danych do sześciu TextBoxow na Form1 kliknąć Button1,...
Dlaczego każdy znak planszy wpisałeś osobno :?: Plansza powinna być wyświetlana na podstawie tablicy lab. Poziomy możesz zrealizować tak: [syntax=cpp]int (*lab)[56]; int plansze [][10][56] = { { {1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, }, {1,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1, }, {1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1, }, {1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,....
Cześć, Mam problem. Muszę porównać Stary plik z Nowy. Chciałbym, aby w kolumnie D w pliku Nowy wstawiała się wartość z pliku C dla danego zamówienia + plus komentarz np "Uwaga zmiana ilości z "wartość ze starego pliku" na "wartość z nowego pliku". Dodatkowo w kolumnie E pliku Nowy wklejały się wartości nie występujące w plik Nowy. Przykładowo w Nowym...
Witam! Szukam funkcji która wyszuka i wstawi mi (obok siebie) komórki (zawartość komórki) z wiersza pełnego różnych informacji. Np Wiersze (między pełnymi komórkami jest różna ilość pustych komórek): 3 22 4 88 cw d aa 7 31 2 75 ah e bb Potrzebuje aby wyglądało to tak: 3 4 aa 7 2 bb Czyli chcę aby wstawiło mi wartość pierwszej niepustej komórki, trzeciej...
Witam eksperci. Moja przygoda z vba zaczęła się jakiś czas temu, ale nadal raczkuję w tym temacie i wciąż natrafiam na przeszkody. Proszę o pomoc w tym temacie-mam tabelkę: Load NumberPartNumber 111111111aaaadddrrrr 2222222sssskkkk 33333wwww 44444444mmmmaaaaa 5555555xxxxccccvvvvmmm 666666ssssjjjjoooo 77777777bbbbbgggg load to kolumna A part-B Numer...
Tematowi już parę razy się się przyglądałem jednak "zawiłość" tematu wpływa na czas jaki można temu poświęcić - a nie mam go za dużo. Wbrew pozorom wcale nie kierował bym się w tym przypadku żadnym losowaniem tylko normalną kolejnością zmian przy spełnieniu określonych warunków (kolejna wyższa - najbliższa z możliwych - jak nie ma możliwości wyższej...
nagrałem dodawanie wiersza i wstawiłem w po else w miejsce exit sub ale tutaj zdaje się powinienem wstawić warunek sprawdzający tabelę z ofertą taki, że jeśli tabela nie ma pustych wierszy to wówczas na końcu dostawia nowy wiersz. Po nagraniu rejestratorem otrzymałem taki kod: Dodano po 8 Jeszcze pytanie: w kodzie, który mi podesłałeś miałem przypisane...
Właśnie wrzuciłem to makro do arkusza; po uruchomieni u Basic wyskakuje mi błąd etykiety Compare; Nie powinien napisałeś Compare z dwukropkiem ? If (Sheets("Arkusz1").Cells(i, j) = "") Then Return Pomijamy puste komórki (ja akurat sobie przygotowałem arkusz rzadko zapełniony. Jeśli nie masz pustych komórek, możesz tę linię pominąć. Jak mam tę cześć...
Hmm a jeśli wykorzystałam poprzednie makro, które napisałam, które wstawia dodatkowy wiersz jeśli suma>20 i odwołuje się do niego. Natomiest nowe makro ma wyszukiwac pustego wiersza i wklejać do nowo otwartego pliku zakres 1:pusty wiersz do określonej zakłądki AERO. Mam coś takiego, ale wyrzuca mnie(po wstawieniu Breakpointu) w odwołaniu do otwarcia...
Trzeba poskładać wszystko i dopiero drukować. Coś w stylu a co to znaczy pagebr = 42 ??? skąd ta wartość??? i poco w szablonie usuwać resztę pustych wierszy???
Witam, Próbuję napisać swoje pierwsze MAKRO w VBA i ugrzązłem w połowie pracy. Dlatego też proszę o pomoc w celu naprowadzenia na rozwiązanie problemu. Celem programu jest przetwarzanie danych z jednego skoroszytu i zapisywanie ich w drugim. Na dane składają się uszeregowane w interwałach miesięcznych dane spółek notowanych na GPW z uwzględnieniem kryterium...
Chcesz wstawić formułę wyszukaj w kolumnę G w zależności od danych w kol A? [syntax=vb]ost = Cells(Rows.Count, 7).End(xlUp).Row + 1 ost2 = Cells(Rows.Count, 1).End(xlUp).Row Range("G" & ost2 & ":G" & ost).FormulaR1C1 = "=VLOOKUP(RC[-6],'Previous week'!C[-6]:C,7,0)"[/syntax]
2 – Jest możliwe aby w kolumnie Kartony była podświetlona komórka zawierająca najwyższą wartość ALE z wyłączeniem tras zaznaczonych jako Anulowano i Przeniesiono? Ustawiłęm dla całej kolumny formatowanie Warunkowe -> Reguły dla pierwszych/ostatnich -> 10 pierwszych elementów i zmień z 10 na 1. Sprawdziłem, oznacza na czerwono (można zmienić)...
Potrzebuję linijkę kodu Masz już coś "napisane"? Mam makro które w momencie otwarcia pliku B w pliku A tworzyło odwołania za pomocą formuły = &scieżka&nazwapliku do konkretnych komórek. Dzięki temu w Pliku A miałem aktualne dane. Ale pojawia sie problem natury takiej że gdy plik będzie edytowany przez kilka osób naraz to wtedy nie jest w stanie sam...
Cześć, Tak się zastanawiam czy istnieje sposób na założenie filtra tak by pokazywał dany zakres np. A1:a100 i filtrował nawet jeżeli komórki są puste ? Między wartościami są puste komórki, a chciałbym aby w filtrze było widać wszystkie wartości, nie tylko do pierwszej niepustej komórki. Do tej pory w kolumnie obok wstawiłem spacje. Zrobiłem to też w...
Mam głupi problem. Po wpisaniu segregatora danych do arkusza próbowałem je uporządkować przy pomocy tabeli. Niestety coś poszło nie tak i tabela z pustymi danymi wstawiła mi się w miejsce danych. Wszystkie dane zniknęły, a operacji tej nie można cofnąć :( W każdym wierszu arkusza pisze teraz =TABELA(B40;E43). Czy można w jakiś sposób odzyskać nadpisane...
Witam, Mam arkusz kalkulacyjny, który zawiera dane wyglądające w następujący sposób: Imię, naziwsko (xxxx xxxx / użytkownik) Telefon Mail Takich danych jest kilka tysięcy. Szukam sposobu, aby usunąć z arkusza duplikaty (ponieważ niektórzy użytkownicy się powtarzają) z zachowaniem unikalnego słowa. Większość użytkowników ma podane imię i nazwisko, więc...
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 komórki aż za tabelkę. Wydaje mi się że w przypadku kolumny J ten...
Witam Przygotowuję aplikację do tworzenia dokumentacji pielęgniarskiej. Jednym z formularzy jest bilans dobowy płynów. Pielęgniarka na zmianie nocnej oraz zmianie dziennej wprowadza dane. Czyli dziennie dodają dwa wpisy. Dnia następnego sytuacja się powtarza, aż do momentu wypisania pacjenta. Na raporcie pobierane są wszystkie rekordy dot. bilansu płynów...
Nie chcę nikogo obrażać ani się wywyższać itd. Liczę na pomoc, jak w pierwszym poście niestety muszę sie posiłkować goal seekiem gdyż wynik końcowy jest sumą bardzo wielu zmiennych opartych na formułach. Dałem taki przykład aby niepotrzebnie nie wprowadzać zamieszania. Zakres komórek zmienianych pokrywa się z moim arkuszem roboczym i operacje na tych...
Witam, stanąłem przed taką oto zagadką: Tabela excela: A......B......C......D abc.001...002...1sdd def..002...001...4asd mnh.002 ghi..003...004....3sda jkl...004...003....2asd Chcę ten arkusz posortować tak, żeby kolumna C wraz z odpowiednimi wartościami w D pokryła się z kolumną B: A......B......C......D abc..001..001..4asd def..002...002..1sdd mnh.002...
No to tak. Sprawdzałem bardzo dawno temu- mniej więcej w zeszły czwartek. Nie działało dobrze. Teraz jeszcze raz. Zaremowałem puste przerwanie i wstawiłem w przerwanie od ADC TIFR |= (1 << TOV1); Źle chodzi. Pokazuje co 1s napięcie z pierwszego kanału a z drugiego 0.00. W DS piszą o Trigger source jako o zdarzeniu TIMER1 overflow. str.218. Wysoce...
Poszukuję programu, który podobnie jak np. edytory HEX wyświetli mi zawartość pliku, ale wierszami podzielonymi na takie części-klocki jak dana sieć p2p rozdziela przy przesyłaniu. Nie chodzi nawet o wyświetlenie całej zawartości zero-jedynkowej, wystarczy, że w wierszu pojawi się suma kontrolna danego part-a. Przykładowo wiele plików sieci torrent...
excel wstawianie pustych wierszy wklejanie pustych wierszy usuwanie pustych wierszy
kompakt schemat kabel radiotechnik oscyloskop galaxy samsung schemat
Saeco HD8917 – wyłączanie przy starcie zaparzacza, kondensatory, mostek, silnik Renault Espace III - Brak świateł i sygnału
