Da się to zrobić w ten sposób: 1. wpisać dane kwota netto w kilka wierszy np od 2 do 5, 2. przeciągnąć formułę przeliczenia euro od wiersza 2 poza wiersz 5 o kilka (np 5) wierszy w dół. w miejscach gdzie nie było w wierszach danych kwot netto w kolumnie przeliczników pojawi się 0. 3. zaznaczyć obszar komórek z zerami i nacisnąć "del", nie poprzez usuń...
[syntax=vb]Sub numery() Dim wz As Worksheet, rs&, re&, i&, j& Dim bs As Range, bd As Range Set bs = ThisWorkbook.Sheets("baza").Range("B1:C1... 'platform, tara Set bd = ThisWorkbook.Sheets("start").Range("B1:C... 'wagony Set wz = ThisWorkbook.Sheets("wykaz_zdawczy") wz.Activate rs = 17 'wiersz poczatkowy re = wz.Cells.Find("podpis").Row...
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.
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 w kilku arkuszach jednocześnie 3. czy istnieje możliwość...
Jeśli formuła jest w tabeli Excela, to się kopiuje. A jeśli chodzi o dodawanie załącznika, naciśnij pole "odpowiedz" pod postem. Pod polem na wpisanie odpowiedzi jest pomarańczowe pole "Dodaj załącznik", które należy kliknąć, a potem dodać plik. Tylko ten serwis nie przyjmuje plików .xlsm. Więc albo plik .xlsx, albo .xls. Pliki .xlsm trzeba zarchiwizować...
Witam Tabela z uprawami - po wprowadzeniu działek do arkusza (kolumna C i D) okazuje się ze na niektórych polach jest więcej niż jedna uprawa. Wtedy wstawiam wiersz poniżej danej działki i wpisuję kolejne uprawy na danej działce (tylko kolumna E, G, F, natomiast C i D zostają puste w tym wypadku). Podobnie z usuwaniem zbędnych wierszy w danej działce....
Jeden z options - create objekt EXCEL - zrobić kopię z arkusz1 - Liczba wierszy i dodać kolumnę z datami. Następnie zaimportować w Access. Można inaczej. Po każdym imprtcie (jak teraz) - UPDATE <table> SET data_od WITH <data z TextBox> WHERE data_od IS NULL kolumny data_od data_do musi już być w bazie danych przed tym
Potrzebuję gotowego makra, które będzie dodawało mi nowe wiersze. Może ktoś da radę pomóc. Mamy przykładowo w kolumnie D takie wartości: 1 D 2 5 3 1 4 30 5 8 6 100 Makro miałoby teraz dodawać pod spodem tyle wierszy ile jest napisane w tej kolumnie - 1. Np. Mamy w komórce 2D wartość 5 to pod spodem trzeba dodać 4 puste wiersze. w komórce 3D mamy 1 to...
Chcę uzyskać przeniesienie całych wierszy z Arkusza1 do Arkusza2 jeśli zostanie spełniony określony warunek. Jeśli w kolumnie stan pojawi się wartość "Zakończony" to całe wiersze mają być przeniesione do Arkusza2, natomiast w Arkuszu1 wykasowane. W załączniku plik Excel (at)ElektrodaBot
Witam forumowiczów, Potrzebuje pomocy w napisaniu programy w VBA. Mianowicie: w excel-u mam listę produktów(kolumna 'b') i ilość(kolumna 'c') Potrzebuje wydrukować tylko wiersze zawierające jakąś liczbę w kolumnie ilość oraz kolumnę SKLEP i DZIEŃ, DATA. Proszę o pomoc - jeżeli będą to komendy proszę podajcie jak ich używać http://img714.imageshack.us/img714/9899/...
Mam plik csv do importu do sklepu no i powinien on posiadać ID numer, ale trzeba go dopisać. Otwieram plik w excelu i mogę tam dopisać na początku każdego wiersza te numery jednak to nie o to chodzi żeby robić to ręcznie prawda? jakiej komendy itd użyć żeby excel dopisał do początku każdego wiersza "1|" ? Dla wyjadaczy to prościzna, ja sie na tym nie...
Witam. Siedzę już dwie noce nad makrem i nie mogę go ruszyć. Temat: Arkusz z tabelą danych A12:I12 wielkość tablicy 30000. Mam Stworzyć drugi arkusz który by pobierał całe wiersze z pieszego. Ponadto , kolumnie In są warunki utworzenia nowych arkuszy. Reasumując tyle ile będzie różnych zmiennych w I tyle będzie nowych arkuszy. Reasumując Sortowanie....
Mam pytanie jak zrobić w Exelu suwaki rozwijane "+" i "-" które powodują rozwijanie kilku wierszy pod daną komórką..
Mam już gotowe tabele, bardzo długie, muszę teraz u góry kaźdej strony dodać wiersz "z przeniesienia", ale tak, aby dane liczbowe z tego wiersza nie sumowały się z resztą danych. Bardzo proszę o pomoc.
Witam, mam następujący problem znalazłem takie oto makro które świetnie działa, ale oczywiście nie u mnie (ja go nie napisałem, jeśli chodzi o makra to jestem zielony) [syntax=vbscript] Sub Dodaj_Wiersz() Dim lOstRw& Dim sForm$ lOstRw = Cells(Rows.Count, 1).End(xlUp).Row Rows(lOstRw).Offset(1, 0).Insert (xlShiftDown) Rows(lOstRw).Copy Rows(lOstRw).Offset(1,...
Potrzebuję pomocy z napisaniem makra, które będzie miało za zadanie automatyczne wstawienie nowego wiersza w przypadku gdy dane w komórkach wykraczają poza kolumnę H i przeniesienie do niego tej zawartości poza kolumną H z powyższego wiersza. W załączniku plik przedstawiający co chciałbym osiągnąć.
W excelu mam kolumnę z danymi. Wygląda to mniej więcej tak: A1 suma (A2:A4) A2 1 A3 2 A4 3 A5 suma (A6:A7) A6 2 A7 2 Mój problem polega na tym, że różni użytkownicy wprowadzają dane w w komórkach A2, A3 itd i jeśli im brakuje wierszy sami je dostawiają na dole i wpisują nowe dane. Niestety pojawia się problem z sumowaniem, bo zapis w komórce A1 widzi...
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 PrzejdźDoOstatniego1() Dim ile...
Witam! Przyznam, że nie jestem nawet średniozaawansowany w Excelu. Muszę utworzyć kilkaset nowych wierszy w arkuszu. Posiadam plik z około 22000 wierszy. Na nowym arkuszu chciałem utworzyć jedną komórkę, w którą podawałbym wartość. Ta wartość miałby być odszukana w tym wielkim pliku (arkuszu) i miałaby pociągnąć wartości z kilku komórek (np. G,H,Z)...
Witam, czy jest możliwość napisania formuły, dzięki której po dodaniu nowego wiersza automatycznie Excel powieli wartości kolumn z poprzedniego?
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 to kwestia jednorazowa to nie poruszał bym w ogóle...
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! Koledzy potrzebuję z pliku ok 4 000 rekordów (częściowo powtarzających się) uzyskać unikalne wiersze. http://obrazki.elektroda.pl/8438790500_1... jeżeli w kolumnach B;E;F są te same dane należy złączyć A;H;I. Potrzebuję tego do korespondencji żeby adresat kol B dostał list oznaczony zapisem z kol A;H;I. Robiąc to manufakturą jest...
Źle to opisałem. Szerokość stałą wiem jak uzyskać, choćby nawet dopisując ją do For i = 1 To 24 Chodzi mi o to, żeby zautomatyzować (nie musieć określać go ręcznie poprzez edycję tej funkcji) zakres np j = 1 to X gdzie X to ilość wierszy, która może być zmienna, w zależności od tego ile makro zaimportuje z pliku wejściowego. Jestem jeszcze zielony w...
Prot, mógłbyś wyjaśnić jak miałoby działać to makro, które przywołałeś? Pokazałem tylko, że istnieje możliwość wywołania makra przy zmianie którejkolwiek wartości formuły w obserwowanej kolumnie. ale wtedy wychwycenie wiersza, w którym nastąpiła zmiana jest znacznie trudniejsze niż proste x=Target.Row Twój kod wychwytuje wiersz, w którym nastąpiła...
W Twoim opisie coś nie gra :cry: Jeżeli w kolumnie G ilość w pierwszym wierszu jest np. liczba 9... Ma skopiować dane z wiersza powyżej . To znaczy, z którego wiersza ma kopiować jeśli zmiany wprowadzasz w "w pierwszym wierszu" :?: :D Wierszy mam około 2 000 tyś 2 mln wierszy to musisz pomieścić w dwóch tabelach wykorzystując całą wysokość arkusza (jeden...
Jedyne operacje jakie są planowane na tym pliku to: - dodawanie usuwanie i ukrywanie odkrywanie wierszy - kopiowanie wierszy poprzez zaznaczenie całego i wklejanie w ten sam sposób wartości do nowego dodanego wiersza (tutaj wiem już że skopiowane wartości z zaznaczonego całego wiersza i wklejenie ich do nowo utworzonego nie są zapisywane w historii...
Jak uważasz, ale osobiście wolałbym mieć wszystko pod ręką, w jednym arkuszu. W załączniku "po mojemu" z blokadą zakresu. W innym przypadku: w A1 wpisz =PRODUKTY!A1 i rozciągnij na zadany zakres, a w opcjach wyłącz wyświetlanie zer.
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...
[syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$C$2" Then Application.ScreenUpdating = False nw = Sheets("Baza").Cells(Rows.Count, "A").End(xlUp).Row + 1 Range("A2:C2").Copy Sheets("Baza").Cells(nw, 1).PasteSpecial xlPasteValues Range("A2").Select Application.CutCopyMode = False Application.ScreenUpdating =...
Witam ! Mam problem, z uwagi na to, że excel widzi komórkę jako tekst poprzez poprzedzenie tego tekstu apostrofem, potrzebuję rozwiązania jak dodać apostrof automatycznie do wszystkich komórek naraz. Mam oko 2500 wierszy i nie bardzo mi się chce do każdego wpisywać to ręcznie. Dzięki z góry
Ojojoj! Toż to trzeba oprogramować ponownie od podstaw... Zaczynając od "lista = Range("Baza!B:B").Value" - tablica ma rozmiar = ilości wierszy w arkuszu = 1 048 576 w Excel 2007. Rozumiem, że do 'TextBox1' wpisywane będą kryteria do filtrowania listy 'ListBox2' zawierającą listę artykułów z "Bazy". Filtrowanie listy wielokolumnowej realizował kiedyś...
potrzebujesz pomocy z kodem w VBA czy szukasz kogoś kto napisze całe makro? Dodano po 1 Przygotowałem w zasadzie bardzo proste makro: Kopiuje Twój arkusz "x1" (nazwałem go "Template") i w nim zmieniam tylko dane. Nazwę nowego arkusza biorę z arkusza "Wyświetlenie odczytów" z kolumny A czyli "Lp." ale idzie to łatwo zmienić w kodzie (dodałem tam komentarz)...
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...
Witam, Sytuacja wygląda następująco. Mam pliki "Stan magazynu" oraz "Komponenty" . W pierwszym z nich muszę zrobić sumaryczne zestawienie części będących na magazynie, liczbę ich sztuk, koszta, zapotrzebowanie itd. W pliku "Komponenty" znajdują się zakładki ("Blachy stalowe", "Blachy aluminiowe", itd...) odpowiadają przykładowym numerom komponentów...
np. tak: Dim koniec as integer koniec=cells(9, 24).value '<--- pobiera wartość z X9 jako koniec for x=1 to koniec Tu jest to, co ma być w pętli next x
Zobacz Dim so As Long so = Sheets("Start").Cells(Rows.Count, "A").End(xlUp).Row + 1 Cells(so, 1) = so- 1 Cells(so, 2) = textbox1 Cells(so, 3) = textbox2 Cells(so, 4) = textbox3
OKNO -> zablokuj okienka następnie dodajesz usuwasz tyle wierszy i kolumn ile potrzebujesz i jak potrzebujesz aby nie były przesuwane podczas edycji. Pozdrawiam
To zależy ile docelowo przewidujesz wierszy w tabelce. Jeśli nieokreśloną, to tylko VBA...
Jeśli piszesz, że nie znasz się na VBA, to dlaczego chcesz to robić w VBA? Przecież do tego wystarczy prosta formuła: [syntax=text]=LICZ.JEŻELI(D$1:D1;$D$1)[/... kopiujesz w dół jak daleko potrzeba. A żeby to zrobić w VBA należałoby opisać jak to dokładnie ma działać, czy jednorazowo, czy ma śledzić wpisywanie nowych danych i dodawać numerację...
jak zrobić żeby tyle ile razy kliknę na guzik "dodaj nowy materiał" dodawał tyle nowych wierszy ???
Kolega coś nie kuma z tymi liczbami porządkowymi. Dlaczego nie jest zadeklarowana zmienna 'a' , przecież ona przechowuje kolejny numer wiersza? Skoro kursor na starcie ustawia się w komórce F4 to dlaczego kolega nie liczy wierszy od tego kursora do miejsca wpisywania pierwszej danej? W moim przykładze było to a= b-2, gdzie: a - to wyliczony numer wiersza...
Korzystam z podobnego rozwiązania ale potrzebne jest też formatowanie warunkowe (aby zaznaczać tylko zakres wiersza). Zaznaczanie aktywnego wiersza za pomocą formatowania warunkowego i VBA 1. Zaznaczanie aktywnego wiersza Definiujemy nazwę: AktywnyWiersz=0 Wpisujemy formułę w VBA w sekcji Worksheet - SelectionChange Private Sub Worksheet_SelectionChange(ByVal...
Dodałem jeszcze możliwość ukrywania kolumn z niepotrzebnymi dniami w miesiącu, aktualizację dni miesiąca na pasku jak również zmiana koloru na szary dni sobota i niedziela. UWAGA!, nie zmieniaj (nie dodawaj nie usuwaj żadnych kolumn i wierszy) bo to spowoduje że makro będzie niepoprawnie działać
W [syntax=vbscript]w = Cells(Rows.Count, "A").End(xlUp).Row + 1[/syntax] masz numer wiersza kolejnej wolnej komórki w kolumnie A, użyj go np. [syntax=vbscript]Cells(w, "A").Value = Date[/syntax]
Jak dodajesz wiersze do tabeli, to zawartość wierszy pod spodem przesuwa się w dół, ale wysokości wierszy pozostają bez zmiany (nie przesuwają się). Jest tak dlatego, że poza obrębem tabeli (w innych kolumnach) może być inna zawartość wymagająca innej wysokości wierszy. Żeby przesunąć wszystko w dół wraz z wysokościami wierszy trzeba wstawiać całe wiersze....
Witam, Problem, który dla wielu z Was może być banalny, jest dla mnie trudny, ponieważ mam małe doświadczenie z Excelem. Jednak poprawienie tego pomogłoby mi w mojej pracy. Chciałbym, aby "Arkusz1" automatycznie pobierał informacje z "Arkusza2", tak jak zaznaczyłem kolorami. Tekst z kolumny A (arkusz2) miałby służyć jako "wyzwalacz" w komórce B5 w...
Dziekuje za informacje. Niestety takie formatowanie wprowadza dany znak na koncu calego wiersza, nie na koncu kazdego paragrafu (linijki) w wierszu....
dziekuje widzę, to teraz zagadka co mam zrobić żeby zwiększyć ilość kolumn ??? bo zwiększam np. do 13 i dodaje licz jeżeli i w komórce A3 zmieniam zakres to error...
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...
Jest super, zamieniłem tylko nazwy arkuszy i działa. Czy jeżeli moja formatka jest w formie utworzonej i nazwanej tabeli, to mogę zmienić w kodzie w taki sposób, żeby dodawało wiersze w tabeli? W tym momencie dodaje mi dodatkowe wiersze pod tą tabelą.
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...
ok rano to jeszcze zobaczę ale wydaje mi się że nie przejdzie bo muszę osobno do każdej komórki przypisywać formatowanie. A jak mam 5000 wierszy...Dodaje przykład...
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ć ręcznie. Gdyby istotne było, żeby tabela się automatycznie...
Jeśli w tych dwóch poniższych zostawię sobie odpowiednią ilość miejsca, można na formułach. Miałem na myśli, iż w pierwszej mam 10 pozycji, dodaję ręcznie 5 wierszy, uzupełniam kolumnę C i poniżej w tabelach automatycznie dodają się wiersze z tym tekstem co powyżej. A jeśli usunę wiersze w pierwszej tabeli i zostawię 4 wiersze, to poniżej też będę miał...
excel2003pl wyszukiwanie po kilku znakach / modyfikowanie / dodawanie nowych Witam poszukuję rozwiązania dla mojego problemu dotyczącego wyszukiwania mam listę osób i rozegranych z nimi pojedynków Przykładowa lista: osobawygralprzegralremis poddanyz kim gacek11200ozon pinki kajko rak44-3000kosa lipa rety taki_jaki0111fanty azory sepy Co będzie mi potrzebne...
Czyli ustawiasz kursor w którymś z wierszy, naciskasz przycisk i ma się dodać wg wartości w tym wierszu? Oj, żebyś żonie nie uprzykrzył ;) Nie rozsądniej byłoby zrobić to za pośrednictwem formularza? Wybierasz z pól kombi (stan w podglądzie) i dodajesz pod przyciskiem. Update 7:50 Coś jak w załączniku. W ostateczności wykorzystaj makra...
W załączonym arkuszu sprawa jest prosta (same liczby). Liczysz zajęte wiersze + przecinki. W treści natomiast, dopuszczasz tekst i tu jest już mniej prosta. Musiałbyś rozbić ciąg, sprawdzać czy fragmenty są liczbą i warunkowo dodawać do sumy... Przy ilości przecinków >3, bez VBA, robi się dość skomplikowana.
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 nazwy dodawać dowolną ilość kolumn do zadania i do pracowników....
No właśnie nie do końca wiem jak napisać tą procedurę. Próbowałem kilka kombinacji i zawsze coś było nie tak, jeszcze raz dodaję plik
Zapewne problem tkwi w (partokrotnym) "sztywnym" odwołaniu do komórki $O$23 w formule. Skopiuj formułę do pierwszego wiersza. Zaznacz tą komórkę i bylejaką inną obok wciśnij CTRL+H i zamień $O$23 na komórkę gdzie masz "stałą" 24:00 np O2 ale pamiętaj o dolarach czyli $O$2. Następnie skopiuj tą komórkę z poprawioną formułą w dół. Myśle że jasno - jak...
Proszę o przykładowe makro kopiujące pierwszy wyfiltrowany wiersz z listy do nowego arkusza. W nowym arkuszu wklejane wiersze muszą dodawać się jeden pod drugim wraz z datą ich kopiowania.
Poczytaj w pomocy o argumentach funkcji. W drugim przypadku wyszukujesz w wierszach a nie w kolumnach. Można zastosować bardzo podobną funkcję do poprzedniej WYSZUKAJ.POZIOMO, stosując kolumnę pomocniczą do określenia numeru wiersza (trzeci argument). W G3 (celowo dwa wiersze więcej, żeby nie dodawać, bo dane są od trzeciego wiersza tablicy) =PODAJ.POZYCJĘ(F3;K$2:K$6).....
Ech, pomyliłem. Nie tłumacząc zbyt wiele. Wpisz w K10: =J10+(13-WIERSZ())/100+I10/10 i przeciągnij w dół. Zasada się nie zmienia, ale wartości chcemy od zera w górę. Dodajemy mały ułamek wiersza i dodajemy duży bilansu. Jeśli bilans ujemny - zmieni się znak (ułamka) na minus i przesunie w tabeli na koniec "równych". Tu: ManU na końcu http://obrazki.elektroda.pl/7520329700_1...
Function zapas(tydz, wiersz) Application.Volatile 'Excel 2k7 'Application.Volatile = True 'Excel 2k 'trochę tu latania po arkuszu :) 'szukam wiersza zawierającego tekst wt = Cells.Find(what:="Dni robocze", lookat:=xlWhole).Row 'określam pierwszą kolumnę z wielkością produkcji / zółta tabelka zKol = tydz - Range("C5")...
dodawanie wierszy excel dodawanie wierszy przyciskiem makro dodawanie wierszy
starego skanera palnik kotła firmware thomson
zmywarka whirpool mruga start pilot cosmo
Sterowniki do starszych głośników Logitech - jak je znaleźć? Siemens DHT210 – brak grzania wody mimo napięcia na grzałkach, diagnostyka 3-fazowego podgrzewacza