dodanie takiego makra jak poniżej, nie wyświetla mi napisu "hello" Popełniasz błędy: - wprowadzając "prywatne makro arkuszowe" do modułu uniwersalnego :cry: , jeśli to samo makro wkleisz do modułu arkusza "zamówienia" i dokonasz zmiany treści komórki - zamiast ujętej tam formuły wprowadzisz tam 1 - to uzyskasz Twój pożądany efekt - "hello" :D ; - nie...
Witam, temat będzie dotyczył mojej wyszukiwarki. Dzięki Waszym uwagom udało się zrobić to, co chciałem. Natomiast teraz próbuję napisać formularz, który będzie dopisywał nowe filmy do już istniejącego arkusza. Na ten moment proszę jedynie o nakierowanie mnie jak do tego podejść (jakich funkcji użyć i co po kolei). Formularz już mam, deklarację zmiennych...
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...
Witam. Jestem początkujący w VBA więc proszę o wyrozumiałość. Szukam pomocy przy wykonaniu kodu który ułatwi mi pracę z formularzem, a mianowicie chciałbym kod który: 1wszym kliknięciem przycisku DODAJ 1. Skopiuje wartość z komórki B1 Arkusza1 do komórki D5 Arkusza2 (to zrobiłem samodzielnie) (wartośći B1 Arkusza1 zdefiniuje listą rozwijaną) 2gim kliknięciem...
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, mój problem z excelem brzmi jak w temacie: chodzi mi o samoautomatyczno przenoszący się wiersz do innego arkusza po wpisaniu odpowiedniej wartości... szukałem trochę na różnych forach i ten temat wydaje się być najbardziej pasujący do moje problemu: http://www.elektroda.pl/rtvforum/topic19... Nie znam się specjalnie na vba i nie wiem jednak...
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)...
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ąć.
Witam, stworzyłem prostą funkcję która znajduję wszystkie warianty w tabeli: [syntax=vbscript]Function Wyszukiwanie(wartosc As String, Zakres As Range, Kolumna As Integer) As String Dim i As Integer For i = 1 To Zakres.Rows.Count If Zakres.Cells(i, 1) = wartosc Then WyszukajWszystkie = WyszukajWszystkie & Zakres.Cells(i, NrKolumny) & ", " End If Next...
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?
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...
Dzien dobry. Zalaczam plik Excel. Na gorze mamy automatyczny przycisk NEW LINE, i chodzi o to, ze wciskajac ten przycisk tworzyl sie nowy wiersz z zawartoscia formul. Czyli majac, np. 100 osob i klikajac kolejno na NEW LINE aby otwieral sie wiersz kolejny po juz istniejacym. Na dzien dzisiejszy mam tak ze otwiera sie zawsze wiersz "2", tak jak zreszta...
Cześć wszystkim forumowiczom, Potrzebuję makra/innego rozwiązania w Excelu. Chciałbym, żeby w momencie wstawiania nowego wiersza do tabeli: 1) aktualizowała się l. p. 2) aby formuły w pozostałych wierszach (również formuły na polach ukrytych) zmieniały się kolejno "obejmując" inne komórki. Najłatwiej byłoby mi to pokazać np. na Teams poprzez udostępnienie...
Mam 24 arkusze w excelu w każdym zamieszczam faktury i po około 5 tabel różnej wielkości analizujących te faktury po numerze faktury i nazwie umowy, rozdzielających je na miesiące oraz wynagrodzenia zależnie od grupy zawodowej. Dane przenoszone są do ostatniego arkusza gdzie są podliczane. Potrzebuje kodu tak jak w temacie, ponieważ w ciągu roku może...
Mam takie pytanko: czy jest możliwość stworzenia takiego makra, żeby wstawiało puste wiersze, ale nie przed kazdym kolejnym wierszem jak we wzorze poniżej jest tak: 1 wrocław 2 kraków 3 kraków 4 kraków 5 warszawa 6 warszawa a chciałabym, żeby było tak: /pusty wiersz/ 1 wrocław /pusty wiersz/ 2 kraków 3 kraków 4 kraków /pusty wiersz/ 5 warszawa 6 warszawa...
Witam, czy jest możliwość napisania formuły, dzięki której po dodaniu nowego wiersza automatycznie Excel powieli wartości kolumn z poprzedniego?
Dzień dobry, mam podobny problem. Chciałabym, aby po wyborze Imienia z listy rozwijanej pojawiło się okienko do wpisania nazwy i hasła lub tylko hasła dla danego użytkownika. Jeśli użytkownik wpisze poprawna nazwę i hasło to pojawi się nowy wiersz nad wpisem (to już mam), ale jeśli nie wpisze poprawnie danych to zawartość wiersza się wyczyści z danych...
Cześć, jest zupełnie początkująca. Potrzebuję makra, które doda mi wiersz w prawie każdej zakładce (zakładek mam 31). Mam przycisk, zarejestrowałam makro, ale jak wiadomo przycisk mi działa tylko do jednej zakładki. Sub Makro3() Makro3 Makro Rows("5:5").Select Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove End Sub I w tej jednej...
Nie do końca wiem o co ci chodzi. Jeżeli chcesz aby po skopiowaniu komórek funkcje/wzory odnosiły się do nowych komórek ale w tym samym "ułożeniu" jak do komórki kopiowanej trzeba pozbyć się znaków $ (dolara) w funkcjach/wzorach (np: A10 + B10) [Znak $ wstrzymuje zmianę kolumny lub wiersza lub kolumny i wiersza przy kopiowaniu] Jeżeli chcesz zrobić...
[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 =...
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.
To jest tylko około 2 000 rekordów. Ma kopiować dane ze wszystkich komórek z wiersza powyżej. Wstawianie nowego wiersza ma być tylko , jeżeli w kolumnie G w komórce jest liczba >1. Np. jezeli jest liczba 5, to ma dodać 4 wiersze, a w wierszu gdzie jest 5, to ma zamienić liczbę na cyfrę 1. Chcę aby to można było zrobić na dodany przycisk odśwież. (ma...
Masz dwa przykłady, wybierz sobie pasujący lub skoryguj pod własne potrzeby. 912573 Przyjrzyj się nazewnictwu przycisków, ale nie temu na samych przyciskach, tylko ich nazwom kodowym - w nazwie każdego z nich znajduje się nazwa tabeli, której dotyczy - to identyfikator: 912574
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...
[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...
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ń...
Witam! Od czasu do czasu korzystam z VBA lub po prostu rejestruję proste makro, żeby ułatwić sobie pracę. Ostatnio natrafiłem na problem. Zarejestrowałem proste makro ułatwiające dodawanie kolejnych odczytów do tabeli w arkuszu, który jest częścią większego skoroszytu, ale innych makro w nim nie ma. Ku mojemu zdziwieniu okazało się, że makro czasem...
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
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
To zależy ile docelowo przewidujesz wierszy w tabelce. Jeśli nieokreśloną, to tylko VBA...
Witam mam podobny problem w Excelu 2016 mianowicie mam zwykłą tabelę w której przykładowo kolumny A, B i C sumują się w kolumnie D, na dole tabeli jest zwykła formuła SUMA która sumuje wszystkie wiersze z kolumny D. Teraz jak w ramach tabeli dodaję nowy wiersz to nie kopiuje mi się automatycznie formula z kolumny D (która zlicza A,B i C). Pewnie można...
OKNO -> zablokuj okienka następnie dodajesz usuwasz tyle wierszy i kolumn ile potrzebujesz i jak potrzebujesz aby nie były przesuwane podczas edycji. Pozdrawiam
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ę...
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...
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....
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ć
Ź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...
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...
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...
jak zrobić żeby tyle ile razy kliknę na guzik "dodaj nowy materiał" dodawał tyle nowych wierszy ???
Dziekuje za informacje. Niestety takie formatowanie wprowadza dany znak na koncu calego wiersza, nie na koncu kazdego paragrafu (linijki) w wierszu....
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...
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...
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...
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
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....
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...
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...
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
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ą.
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).....
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.
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")...
Zacznij od "surowych" funkcji, następnie dodawaj/odejmuj... Np dla startu od D7 trzeba odjąć 6 wierszy i 1 kolumnę: http://obrazki.elektroda.pl/9304772400_1... Edit: Zapomniałem o tym "WZ" :) ="WZ "&WIERSZ()-6&"/"&...
Nie mam pod ręką excela, więc zrobiłem w Open Office W excelu będzie dokładnie tak samo http://obrazki.elektroda.net/28_12255347... W pierwszym wierszu stałe. Formuły w kolejnych kolumnach: kolumna A - czas z krokiem dt A3 =0 A4 =A3+dt A5 =A4+dt itd....... kolumna B napięcie wejściowe B3 =A*SIN(2*pi*f*A3) B4 =A*SIN(2*pi*f*A4) itd....... kolumna...
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...
Witam wszystkich mam poważny problem z dodawaniem nowego wiersza za pomocą przycisku. Stworzyłem tabelkę, która zawiera wiele list rozwijanych i funkcji jeżeli to coś tam. Przycisk z odwołaniem do Makra dodaje mi kolejny wiersz zachowuje listy rozwijane ale nie przenosi funkcji i pojawiają się puste komórki. Czy może ktoś wie jak powinno wyglądać prawidłowe...
Idealnie, Dziękuję Ci bardzo ;] Dokładnie o to mi chodziło. Mógłbym Cię jeszcze prosić o dodanie do tego kodu, opcji która dodawałaby date kopiowania w 17 kolumnie kopiowanego wiersza?
Czyli wstawianie arkusza opanowane. Teraz mamy wpisywać *jakieś* dane w jakiś sposób. Można założyć, że linia po linii (ale to założenie wynikające tylko z kontekstu wcześniejszych postów). W jaki sposób działa teraz wpisywanie do jednej linii? Makro, które już Kolega posiada zaczyna wpisywać od komórki, która jest aktualnie zaznaczona i wypełnia ileś...
Nie wiem, czy da się osiągnąć taki efekt jak zamierzasz. Trzeba by było wymyślić jakieś sprytne makro. Standardowo Excel potrafi ukryć wszystkie puste wiersze, a tu należałoby pozostawić pierwszy pusty odkryty. Myślę, że lepiej wykorzystać te mechanizmy, które zostały przygotowane, a nie walczyć z Excelem. Tu należałoby wykorzystać tabelę Excela. Ona...
Logika mogłaby wyglądać następująco: w kolumnie masz kolejne numery raportów dotychczas wydrukowanych sprawdzasz ile kolejnych wierszy w tej kolumnie jest niepustych, dodajesz kolejny wpis w pierwszym wierszu pod spodem o wartości n_1
Witam, zdaję sobie sprawę że moje pytanie jest banalne, ale mam następujące pytanie. Gdy już ustawię listę rozwijalną w pozycji "Imię i Nazwisko" to czy da się zrobić tak aby dane w pozostałych kolumnach zmieniały się zależnie od osoby którą wybiorę ? Mówiąc krótko, tak jak widać na obrazku, czy da się i jeśli tak to jak zrobić tak że zmieniaj pozycje...
excel dodawanie wiersza dodawanie wiersza excel dodawanie wiersza
xperia grzeje gasną światła skoda fabia pralce candy wymiana łożysk
Komunikat 14400 w Volkswagen Polo 6N 2008 - co oznacza? Lotto.pl: Czy odsłonięcie zdrapki bez logowania jest płatne?
