Zauważ, że arkusz niue nazywa się "mm.dd.yyyy" tylko ma konkretną datę jako nazwę więc lepiej w ten sposób: select.end ale tak też można. I druga rzecz. Ta funkcja też ma pewien błąd. Trzeba podać datę początku i datę końca. Nie wiem co chciałeś osiągnąć chyba że jakimś kodem którego akurat ja nie stosuje/nie znam. [syntax=vb] Range("H2").FormulaR1C1...
http://obrazki.elektroda.pl/3025550100_1... Mając do dyspozycji jedną matrycę 8x8 czerwonych diod LED o boku 60,2mm oraz mikrokontroler ATtiny861 pozostałe po innych projektach postanowiłem zbudować to, co każdy elektronik chociaż raz w życiu zbudować musi: zegar ;). Ze względu na charakter wyświetlacza miał to być zegar binarny, ale...
Między Q i R powinna wchodzić nowa kolumna. Niestety zdaję sobie z tego sprawę, że może to zaburzyć porządek. Wstawienie kolumny tylko dla danego wiersza jest dobre. Pytanie czy to nie przesunie porządku kolumn od R.
Na formułach można spróbować to zrobić tak Zakładając, że mamy zajęte kolumny A oraz B - wstawić pusty wiersz pustą kolumnę między nie (w ten sposób kolumna B przejdzie do C). Zakładam, że dane są od pierwszego wiersza. kolumna B1 będzie zawierać formułę =C1 Kolumna B2 będzie zawierać formułę =JEŻELI(CZY.PUSTA(C2);B1;C2) od B2 można wszystko rozciągnąć...
zwróci datę jeżeli suma w kolumnie D przekroczy zadaną wartość. Jest niemozliwe wpisac date przy pomocy funlcji np.Dzis(), poniewaz jutro formula zwraca juz inna date. Dodano po 2 Nie może być użyte VB ani macro Już może ? Nie mogę mieć pliku z makrem. (Zabezpieczenia serwera pocztowego :) ). Makro które przesłałem służy do zobrazowania jaki cel chciał...
Witam, chciałby powiazac 2 sprawy, mianowicie aby powiązać ze soba makro DATA i PARA (nalezy zmodyfikowac). Chodzi o to aby po uruchomieniu nastapywaly kolejno po sobie czynnosi: 1.odblokowanie arkusza 2. wstawienie daty w pierszym wolnym wierszu kolumny A 3. zaznaczenie tego wiersza w ktorym zostala wstawiona data i zamiana funkcji na wartości 4. zablokowanie...
Kliknij 2x w kolumnę B.
Skoro nagrało Ci się coś w rodzaju 'ActiveCell.FormulaR1C1 = "=TODAY()' to dopisz pod spodem 'ActiveCell = ActiveCell.Value' i po sprawie. To samo "bardziej po Bożemu": ActiveCell = Date Zamiast ActiveCell może być oczywiście dowolny Range(adres) lub Cells(wiersz, kolumna).
Cel jest prosty, chcę aby w każdej komórce w kolumne, wstawiało mi makro formułe do momentu kiedy np w kolumnie A będzie cokolwiek wpisane. W programowaniu nie ma 'na przykład. Dlatego pokaż arkusz wejściowy i arkusz po wykonaniu makra.:)
Cóż, w przypadku wstawienia kolumny należy skorygować makro. To nie funkcja w arkuszu, samo się nie zrobi...
wartość do przeniesienia nie jest stałe umiejscowiona. To nie jest żadna przeszkoda do rozwiązania zadania przy pomocy "przeciąganych" formuł :D można to zrobić np. tak jak na zrzucie :spoko: 1037180 Wystarczy w Twojej tabelce wstawić pomocniczą kolumnę z formułą: =LICZ.JEŻELI($B$1:B1;"wtorek")
Wypróbuj takie makro: [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column >= 2 And Target.Column <= 12 Then Cells(Target.Row, "M") = Application.UserName Cells(Target.Row, "N") = Date End If End Sub[/syntax]
No dobra ;) Generalnie każdą formułę można wstawić makrem, wystarczy ją nagrać macro recorderem i troszkę zmodyfikować. Dla WYSZUKAJ.PIONOWO jest to coś takiego: [syntax=vb]Private Sub CommandButton1_Click() On Error GoTo myErr Application.ScreenUpdating = False Application.Calculation = xlCalculationManual With Sheets("Arkusz1") ost_wiersz = .Range("A"...
Zamiast 1 lub x wstawić nagłówek czy dodatkowo?
... " a " czy mógłbyś poprawić aby wstawiało Datę w komórkach w zakresie od B11 do B2000 i Godzinę od C11 do C2000 1. " a " co to jest to " a " w " If Target <> a " ? 2. "zbiorczo", tj. hurtem (?), czy sukcesywnie w miarę wpisywania danych w tym samym wierszu w zakresie kolumn 5 do 8 ? ps: trzeba by wstawić kontrolę zmiennej "i" (wierszy)
Klasyczne pola wyboru czy opcji przy dużej liczbie kontrolek są trudne do obsługi. Sugerowałbym raczej rozwiązanie zastępcze z użyciem VBA. Coś takiego wstawiłem do przykładowego arkusza. W kolumnach B i C są tam wstawione do komórek znaki Unicode przypominające znak akceptacji i pusty prostokąt. Do obsługi tego jest makro zdarzeniowe, które reaguje...
Dalej nie bardzo wiadomo, o co dokładnie chodzi. Masz makro, które po wykonaniu zwraca w kolumnie E formuły z odwołaniami względnymi do komórek z kolumn C i D. Jeśli pomiędzy kolumny C i D wstawisz dodatkową kolumnę lub kolumny, to formuły (obecnie w kolumnie E) dostosują się do nowych adresów kolumn źródłowych i formuły będą nadal działać prawidłowo....
Witaj. Sprawdź załącznik. Checboxy zastąpione czymkolwiek w kolumnie (może być X, może być cokolwiek poza pustym polem). Poprawność stawiania xów czy innych jest sprawdzana na bieżąco, więc jeśli spróbujesz postawić iksy dla dwóch różnych zamówień to wyjdzie błąd już w momencie stawiania. Nie jestem pewien, po co numer wiersza, wystarczy że masz w tabeli...
wpisywane "ręcznie", a nie poprzez formuły - jak ogarnąć drugą część mojego problemu? Żeby wykorzystać makro zdarzeniowe :D to proponuję wykorzystać jednak inną kolumnę np. wolną obecnie kolumnę A :spoko: . W załączonym pliku proponuje w przedostatniej komórce kolumny A wprowadzić wartość 1 , a wówczas cały ten wiersz (od B do AH) zostanie wstawiony...
Musisz zadecydować kiedy data ma być zapisywana do komórki. Komórka z datą ani nie może być wynikiem funkcji, ani działania makra. To Ty masz zdecydować jakie zdarzenie zapisze datę prania w kolumnie z datami prania. a mi zależy na dniu, w którym kod kreskowy będzie zeskanowany No właśnie do tego zdarzenia dodaj zapis daty prania...
Dzięki koledze adamas_nt i jego sugestii co do "automatycznego" pobrania numeru kolumny (i wiersza w domyśle) poprawiłem nieznacznie moje makro. Wystarczy teraz wkleić w arkusz "dane" gdziekolwiek twoją tabelę z danymi (jak by ona nie wyglądała). Nacisnąć wstaw kody i kody wewnętrzne zostaną wstawione bez względu na to gdzie znajduje się tabela z danymi...
To dlatego, że w tym pliku wykorzystujesz znaki ======= jako separator graficzny, natomiast Excel po wstawieniu tego w komórkę traktuje to jako zaczątek formuły i zwraca błąd. Wystarczy sformatować kolumnę, w którą wstawiasz te komórki, na sztywno jako tekst: ręcznie lub programowo, gdzieś na początku kodu umieszczając: [syntax=vb]Arkusz1.Columns(1).NumberForm...
Chyba łatwiej zrobić dwuklik na wierszu, z którego chcesz kopiować. Równocześnie uruchamiasz makro i wskazujesz wiersz. Możesz też się upewnić, czy to właściwy wiersz. Oczywiście można też wstawić tam InputBox, tylko wtedy jak chcesz uruchamiać to makro? Jeśli chodzi o moją propozycję, to komórki docelowe wypisujesz po kolei jako adresy obiektu Range:...
Ja w tym kodzie błędów nie widzę - makro działa tak, jak je zapisałeś. Nie kończy się na wierszu 16, tylko ponieważ jest ono uruchamiana w zdarzeniu Change komórki, polecenie wpisujące coś do komórki: [syntax=vb]... Cells(c.Row, 12) = DateAdd("m", Cells(c.Row, 9), Cells(c.Row, 11)) ...[/syntax]powoduje ponowne wywołanie zdarzenia zmiany (co może wyglądać...
Niestety nie potrafię znaleźć rozwiązania Nie ma przykładowego pliku :cry: to możesz przystosować sobie do swoich potrzeb np. makro typu https://www.cognity.pl/uzupelnianie-pust... i to tak, że będzie Ci wpisywać te stringi automatycznie po zaznaczeniu kolejnej komórki w kolumnie D :D i to bez wciskania klawisza Enter...
Do nagłówka/stopki można wstawić obrazek...
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....
Poproś kogoś od obywateli, aby wykazać, jak włączyć makro trochę się obawiam, że nie jestem w stanie wytłumaczyć z mojej gramatyki w menu Narzędzia - makro - zabezpieczenie niedźwiedź średnia - Pan zdecydowała, czy umożliwić działanie makra [syntax=vb]Sub Petla() Dim isWsz As Boolean, i&, fnd$, rpl$ While Not isWsz i = i + 1 fnd = "[" & i & "]" rpl...
Witam. Potrzebuję pomocy z napisaniem makra, które będzie miało za zadanie automatyczne wstawienie nazwy urzedu po wpisaniu kodu mpk z podanych kolumn w Arkuszu2
Kopiowanie formuł jest właściwością tabeli i w zasadzie sposób odwoływania się nie powinien tu mieć znaczenia. Mnie jednak po przekształceniu zwykłego zakresu w tabelę, to od razu nie zadziałało, dlatego zmieniłem sposób odwołania. Można też raz skopiować formułę, a potem powinno już działać automatycznie. Jeśli po wpisaniu czegoś do kolumny C chcemy...
Witam, Czy ktoś jest w stanie pomóc mi w napisaniu makra które tworzyło by nowe arkusze w pliku każdemu z nich nadając nazwę z kolejnej komórki kolumny istniejacego arkusza (kolumna G dane zaczynąją się od G4). Z samym wstawieniem odpowiedniej ilości arkuszy byłbym wstanie sobie poradzić ale nadawanie nazw mnie przerosło. z góry dzięki. pozdrawiam,
Tak najprościej: On Error Resume Next 'wyłącza błąd jeżeli wpiszesz daną której nie ma w arkuszu 2 a = Sheets(1).Range("a1&quo... 'pobranie ciągu znaków z komórki A1 pierwszego arkusza w excelu kol = Sheets(2).Cells.Find(What... ' numer kolumny wpisanego ciągu znajdujacego się w drugim arkuszy excela...
Witam Mam pytanie czy jest mozliwosc zaktualizowania makra? Posiadam Makro ktore wkleja jakies formuly w obszarze 100 kolumn i 100 wiersz, potrzebuje teraz wstawic dodatkowa kolumne mniej wiecej w polowie zakresu, Iteraz co zrobic aby zapisy makra rowniez sie przesunely o ta jedna kolumne, jest taka mozliwosc????
Prawidłowo przenosi wartości wraz z datą i zmianą, jednak nie zwraca w komórkach D5 i E5 danych do formularza z którego zostały wpisane , gdzie miało pokazywać dla jakiej daty i jakiej zmiany został wyeksportowany ostatni raport - ma to na celu wyeliminowanie możliwości wprowadzania dwukrotnie tego samego zamówienia. Da radę to zrobić? I jeszcze przy...
Podbijam, Mam też podobny problem. Chciałbym by makro porównywało wartości dla danego produktu z dwóch plików, jeżeli się rożnią to by wstawił obok np. do kolumny C A to nazwa produktu B to ilość W dwóch plikach taki sam układ. W kolumnie A i B mogą być puste wiersze. Poratuje ktoś ? :) Pozdrawiam Paweł Dodano po 1 Cześć, Dziękuję, Ale mam jeszcze jeden...
Teraz makro wstawia za jednym kliknięciem we wszystkie wolne pole. Nadal nie jest to. Tamte proste makro umożliwiało mi wstawić pojedynczo wartości. Czyli klikam i wstawia wartości w C5, D5, E5, F6, następne kliknięcie to wstawienie w kolejne wolne komórki, czyli C7, D7, E7, F7. Za diabła nie wiem jak do tego podejść.
W nowym pliku bez makr działa mi dynamicznie jak chce. Tutaj w tym pliku "zeszyt1poprawki1" jakas blokada wynikająca z makr? W tym pliku masz włączone ręczne przeliczanie funkcji. W zakładce Formuły, w Opcje Przeliczania zmień "ręczne" na "automatyczne" - czy gdzie to tam masz w swoim excelu. Ta funkcja ma po prostu przepisywać wartości z kolumny F...
Makro powinno przeszukać kolumnę C i jeżeli napotka słowo "dolek" to chciałbym, żeby w kolumnie D na wysokości danego "dolka" wstawiło liczbę stojącą w kolumnie B przy poprzednim "dolku". Chciałbym też żeby to makro albo drugie wstawiało kolumnę dalej wartość tylko takiego „dołka” przy którym wartość kolumny B jest mniejsza niż przy ostatnim...
Druga część warunku pętli to przerwanie w razie powtórnego uruchomienia. Wiersz(e) należy wstawić o jeden niżej (Range("A" & i + 1).EntireRow.Insert) oraz (i = i + how_many + 1) Sub rows_influx() Dim i As Long i = 2 Do Until ActiveSheet.Range("A" & i) = "" Or ActiveSheet.Range("A" & i + 1) = ""...
Hej, udało sie trochę ogarnąć ten plik. Jednak teraz na 100% potrzebuje pomocy z dalszą rozbudową makra. Potrzebuje wstawić funkcję wyszukaj pionowo oraz chyba zapętlić pętlę po danej kolumnie. Czy ktoś da radę mi pomóc? w załączniku plik z makrem jaki udało mi sie stworzyć
Cześć. Mam nagrane makro na sortowanie tabeli ale chciałbym aby ono się automatycznie uruchamiało po wstawieniu daty (lub po prostu wypełnieniem komórki) w kolumnie C (obojętnie w którym wierszu). Czy ktoś byłby tak miły i napisałby mi taki kod? Przykładowy plik w załączniku. Makro które chcę aby się automatycznie uruchamiało ma nazwę sortTabeliDoZrobienia...
Powinieneś załączyć przykładowy plik Excela, bo za dużo jest niejasności w tym, co napisałeś. Przykładowy kod, który działa wg Twojego opisu: [syntax=vbscript]Sub AddSheets() ' zakładamy, że nazwy nowych arkuszy ' są w komórkach od B5 w dół Dim ostw As Long, w As Long ostw = Arkusz1.Cells(5, 2).End(xlDown).Row For w = 5 To ostw Sheets.Add(After:=Sheets(Sheets.Count))....
Dziękuje serdecznie za pomoc i poświęcenie swojego czasu - makro działa bez zarzutu. Pozdrawiam.
Dzięki wielkie. Makro działa. Nazwiska, tak jak pisałeś mogą się powtarzać, a nawet często są takie sytuacje gdzie nie tylko, że nazwisko jest takie samo, ale i imię oraz stanowisko. Natomiast nt kadrowy jest unikatowy, a więc wstawiłem wyszukiwanie pod względem kolumny z nr kadrowym. Dzięki jeszcze raz
Witaj, Tak, jest to możliwe. Dobrze byłoby, gdybyś wstawił przykładowy plik. Czy w docelowym arkuszu kolumna ma być zastępowana nowymi danymi, czy ma być doklejana do istniejących?
https://obrazki.elektroda.pl/4025704200_... Na czerwono zaznaczyłem Dodano po 2 Powinien skasować wartość z C3, C5 itd. Nie wstawił wiersza 6 Za to wstawił wiersz 11 nie wiadomo dla czego Dodano po 1 Dołączam plik z kopiowaniem dla wszystkich kolumn
OK. Przed pętlą For wklej: w sytuacji gdy dla któregoś wiersza dane znajdują się w którejś z kolumn H:J ale jednocześnie nie jest wypełniona kolumna E lub G Jeśli jest inaczej, trzeba to zrobić w pętli, sprawdzając każdy wiersz z osobna. Edit rano ;) Np czymś takim: [syntax=vbscript] For w = 8 To 40 If WorksheetFunction.CountA(.Range("E" & w &...
No i będzie dyskutować... :] W załączniku masz przykład, kliknij sobie. W kolumnie C dopasuje pełne nazwy do skrótów w kolumnie B. Jak już to zrobi, to skopiuj gdzieś obok kolumny B i C, zamień je miejscami, a w (pustej) kolumnie B użyj funkcji WYSZUKAJ.PIONOWO, żeby wyszukać po pełnej nazwie skrót. Już Ci nawet do drugiego arkusza przykład wstawiłem...
Pewnie można, ale to już dłuższa historia... :) Najprościej - jeżeli plik-źródło jest w tej samej lokacji - wstawić kwerendę wybierającą dane (Dane->Importuj dane zewnętrzne->Nowa kwerenda bazy danych, wybrać Excel Files * i OK, wskazać plik-źródło (można zaznaczyć "Tylko do odczytu"), a dalej z kreatora" wybrać zakładkę, rozwinąć ją krzyżykiem, wybrać...
Chamski (podwójne NOT) kod, ale działa. - najpierw wybierasz sobie "co chcesz wstawić" z komórek D1..D6 - potem wybierasz sobie "gdzie to wstawiasz" - komórki A1..A6 O pierwszej nad ranem trudno o lepszy kod :) Myślę, że koncepcję moją już znasz, przerobisz sobie "na swoją modłę" - jak będziesz chciał. Kod wklejasz bezpośrednio w kod arkusza, którego...
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 wspomnianą formułę, ewentualnie poprawiając jej...
Prawie wszystko już jasne. wg mnie pozostaje tylko makro. Czy te dodatkowe kolumny (ukryte) też docelowo maja się kopiowac do kart pracowniczych? I druga rzecz piszesz że wolisz stawiać x przy nazwisku (jest bardziej czytelne). Masz rację przy 5 nazwiskach. Ale sama mówiesz aby przewidzieć ok 20 pracowników. Dalej uważasz że przy dwudziestu nazwiskach...
To ma być harmonogram do kilku zdań wykonywanych równolegle, czy kolejne wskakuje, kiedy zakończy się poprzednie? Daty w wierszu 1 wstawiasz sam, czy program me je wstawić? Wiesz, że plik .xls ma agraniczenie do 255 kolumn, więc nie wstawisz w ten sposób nawet 1 roku (chyba że używasz Excela >= 2007 i formatu .xlsm)
Wklej do modułu pliku z linka i uruchom. Makro w tej postaci "wydłubało" 1341 wierszy. Po wszystkim wyeksportuj, lub skopiuj arkusz "Wynik" do swojego pliku. Reszta w komentarzach.[syntax=vb]Sub Yoasia() ileArk = 2 'są dwa z danymi w pliku z linku. Zmień jeśli jest inaczej. 'tu sprawdzimy czy jest arkusz wynikowy, wstawimy jeśli nie 'nie zmieniaj kolejności...
odświeżę trochę temat bo potrzebuję pewną wariację takiego przypadku: potrzebuję zrobić makro które wstawi datę w kolumnie powiedzmy B kiedy w A będą dane, natomiast kiedy wstawię ""x"" w kolumnie C to wstawi dodatkową datę w kolumnie D. Private Sub Worksheet_Change(ByVal Target As Range) With Target If .Column = 2 Then Cells(.Row, 15).Value = Now .Offset(0,...
Witajcie, Moja znajomość vba jest taka sobie od razu mówię ;) czy ktoś mógłby pomoc z takim tematem. w kolumnie A mam nazwy w kolumnie B liczby. Liczby w kolumnie B będą się cyklicznie zmieniać. Chodzi o makro, które: pobierze wartość z komórki w kolumnie B np B3 = 5 i pod B5 wstawi 5 pustych wierszy. Ktoś, coś ? Z góry dziękuję za pomoc i wskazówki!...
Nie analizowałeś :) Masz 4 kolekcje (dla każdej kolumny osobno), jedna z nich wyświetlana jest w MsgBox. Trzeba to tylko dopracować i przypisać do komórek tabeli (od końca). Sortowanie jest konieczne, żeby dane "poukładały się" wg godzin. Zmyliło cię pewnie włączenie odświeżania dopiero przy końcu makra. Edit: Jeszcze jedno: W pierwszej kolejności godziny...
Wyrzuć co niepotrzebne w procedurach Thisworbook. Powinno zostać tylko chowanie kolumn.[syntax=vb]Private Sub Workbook_BeforeClose(Cancel As Boolean) ' i tutaj wstawiłem makro ukrywające ThisWorkbook.Save End Sub[/syntax]Wykorzystaj swoje makro. Żeby ukrywanie było skuteczne, musisz wymusić zapisanie pliku. Dlatego może okazać się niezbędne automatyczne...
Działa jak się należy z tą kolumną pomocniczą, jednak niemogę wstawic kolumny pomocniczej, bo dane te nie tylko dlamnie mają być dostępne. Teraz widzę że to nie takie proste, może makro ale czy ktoć potrafi cos takiego stworzyc, z góry bardzo dziękuję.. Pozdrawiam
Witam! Potrzebuję pomocy z poprawnym wstawieniem lub modyfikacją obecnego makra. Aktualne makro po aktywowaniu kopiuje wybrane wartości z kilku różnych kart w kolejności alfabetycznej kart, jeśli w kolumnie C jest konkretny dostawca. Teraz w załączonym pliku potrzebuję w ostatniej karcie "podział na kolory" wstawić (lub przekształcić obecne) makro,...
Witaj. Dobrze by było, gdybyś wstawił przykładowy arkusz przed i po operacji, którą chciałbyś osiągnąć przy pomocy makro. Aktualnie interpretując opis wynika z niego, że chcesz po kolei wszystkie komórki z kolumny C po kolei wklejać w puste miejsca kolumny A (omijając już wypełnione komórki).
No tak... Po wstawieniu kolejnych kolumn, formuły przesuwają się w prawo i zmieniają argumenty. Musisz przeliczyć, lub podstawiać formuły w osobnej pętli.
Tak jak radził tommy zrobiłem wstawiając dodatkową kolumnę i ukrywając ją , było wszystko ok do momentu aż z makro jest brak jakiejkolwiek cyfry. Wówczas lecą błędy w następnej kolumnie. Jeśli chodzi o radę Marka to mam takie skomplikowane makra , że nie wiem gdzie to wstawić W celu zobaczenia wysyłam makra - choć pewnie dopiero z programem można by...
Witam, serdecznie poszukuje pomocy odnośnie wykonanie Makra, które by czytało dane z tabeli, wstawiało dokładnie jedna dana w dokładnie jedno miejsce oraz drukowało tak przygotowany arkusz oraz numerowało strony od 1 . Chodzi o to by Makro wzięło z tabeli z pierwszego wiersza 3 dane, z każdej kolumny inna wstawiło do następnego arkusza oraz wydrukowało...
Witam Mam do was wielką prośbę dotyczącą makra. Posiadam Excel 2013 i 2016. Załóżmy że w komórce D1 mam tekst "Utworzenie sprawy"; Załóżmy że w komórce D14 mam tekst "Utworzenie sprawy Załóżmy że w komórce D41 mam tekst "Utworzenie sprawy" Załóżmy że w komórce D65 mam tekst "Utworzenie sprawy" W komórce d1 od tej komórki makro zaczyna pracę. Jeśli 1...
Ale jaka lista (poprawność danych, lista formularzowa. AciveX)? Chodzi o to, że nie wiadomo przy jakiej akcji ma się makro uruchomić... Może na początek nagraj sobie makro: 'Format>autodopasowanie kolumn' i wstaw gdzie trzeba. Chr(10) też można, w prosty sposób, warunkowo wstawić co ileś tam znaków.
1. Klikam przycisk "Dodaj wiersz" 2. Makro dodaje jeden wiersz nad wierszem sumy zostawiając formatowania komórek. W tym przypadku numeruje z automatu kolejny wiersz w pierwszej kolumnie a drugi pozostawia pusty Uruchom sobie makro które jest w pliku to zobaczysz. Problem mam że przy wstawieniu tego makro i przypisaniu w nim zakresu "Tabela2" i tak...
Wtam, doszedłem do etapu, w którym musze wykorzysta makro. Mam 2 kolumny: A.................B dana1 || 2011-04-15 dana2 || 2011-04-16 dana3 || 2011-04-20 dana4 || dana5 || dana6 || Jak zrobić makro, które sprawi, że jeśeli w komórce A jest wpisana dana to w komórce B wstawi dzisiejszą datę która w niezmienionej formie już tam zostanie? Wierszy w kolumnie...
Jak by ktos mogl pomoc jak to zrobic i gdzie wstawic w makrze. Z pewnością. Jeśli tylko zrezygnujesz z prowizji...
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 ! Potrzebuję zrobić makro które wstawi datę w kolumnie powiedzmy B kiedy w A będą dane, natomiast kiedy wstawię ""x"" w kolumnie C to wstawi dodatkową datę w kolumnie D. Wstawianie dat działa, natomiast jak zrobić aby po edycji całości i np skasowaniu danych i wyników, nie wywalało błędu i informacji o debugowaniu, brakuje mnie wiedzy o składni...
Dzięki wielkie, Działa, aczkolwiek nie do końca jak chcę. Makro kopiuje wiersze, gdzie w kolunie G jest wartość większa niż 1, ale tylko raz. Ja chcę, aby kopiowało wiersz tyle razy ile jest wpisane właśnie w kolumnę G i tą wartość zamieniało na "jedynki". Czyli, jeżeli np. w komórce G2 mam wartość 5 to makro ma wstawić poniżej do wierszy od 3 do 6...
Prześledziłem kod na Twoim pliku i wygląda na to, że działa poprawnie, jedynie trzeba usunąć poprawność danych z wstawionej kolumny czyli, po: [syntax=vb].Range(Cells(iFrstRw, "I"), .Cells(lLstRw, "I")).Insert shift:=xlToRight[/syntax] wstawić jeszcze: [syntax=vb]Range(.Cells(iFrstRw, "I").Offset(1, 0), .Cells(lLstRw, "I")).Validation.Delete[/syntax]...
Witam Potrzebuję makro które po zliczeniu wszystkich wartości z kol. H ( arkusz1) dla poszczególnych tych samych danych z kolumny A ( arkusz1) wstawi automatycznie je w odpowiadającej porównując z kol. A komórce z arkuszu2 w kolumnie E. oraz z kol L (arkusz1) do kolumny F (arkusz2), rozbijając na poszczególne stawki vat. ma nadzieję że zrozumiale jest...
Już myślałem, że się nie doczekam na ten plik. Proponuję taki kod: [syntax=vbscript]Sub ReplaceTest() Dim i As Long Application.FindFormat.NumberFormat = "h:mm:ss" Application.ReplaceFormat.NumberFormat = "h:mm" With ActiveSheet.UsedRange For i = 1 To .Columns.Count .Columns(i).Replace What:="", Replacement:="", _ SearchFormat:=True, ReplaceFormat:=True...
Nie pochodzi z formatowania warunkowego. Wcześniej mam napisane makro, które zaznacza mi na kolor czerwony duplikaty oraz na kolor żółty puste pola w całym arkuszu danych. Teraz zadanko polega na tym, aby sprawdziło zaznaczone obszary kolorem wypisało w postaci tekstu w kolumnie wyznaczonej np: K tylko musi być po wierszach :) To makro które wstawiłem...
Witam, Temat może prosty, ale dla mnie, osoby która zaczyna pracę z VBA, dość ciężki :( Chciałbym napisać makro, które po dwukrotnym kliknięciu w wybraną komórkę z kolumn B lub C wstawił aktualną datę (dzień yyyy-mm-dd i godzinę hh-mm-ss). Dobrze byłoby gdyby po wprowadzeniu daty w ten sposób, zablokować możliwość nadpisania tejże daty po ponownym dwukrotnym...
Najpierw opis, potem problem. Przykładowy Excel 2013 o nazwie "POMOC" w nim są komórki scalone i nie scalone, niestety tak musi być. Przykładowo z folderze o nazwie "AAA" mam 2000 plików Excela o różnie zapisanych nazwach (imie i nazwisko, data itp.)a wyglądzie w środku jak plik o nazwie "POMOC".. W folderze "AAB" jest plik Excela o "BAZA". W "Bazie"...
Spróbuj np. tak - najpierw zaznaczasz dane w wybranej (pojedynczej) kolumnie, potem wykonujesz makro. [syntax=vb]Application.ScreenUpdating = False For w = Selection.Row To Selection.Row + Selection.Count - 1 Step 2 Cells(w + 1, Selection.Column).Value = Cells(w, Selection.Column).Value Next w Application.ScreenUpdating = True[/syntax] PS. Takie rzeczy...
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...
Nic nie zrozumiałem z tego zadania. W kolumnie B powinienem wstawić tak jak na zdjęciu rodzaje produktów, po przecinku, =JEŻELI(C4=1;$C$3;""), ale nie potrafię tego w poprawny i czytelny sposób przenieś do stworzenia funkcji w vba. Makro nagrywałem ale to nadal nie do końca to co próbuję osiągnąć. pozdrawiam
Działa i to super. Pytanie mam inne teraz, czy da się to tak zmodyfikować, aby to działało tylko wtedy jeżeli w kolumnie są jakieś dane, a jeżeli nie, to nic nie robi. I jeżeli po wstawieniu już wiersza to w przypadku ponownego użycia makra omija już wstawione makra i nic nie robi, a tylko wtedy jeżeli nie ma odstępu pomiędzy liczbami, jeżeli one się...
..Mam W kolumnie A 1600 wierszy np. z nawziskami i muszę w kolumnie B wstawić odpowiedni komentarz ( teskstowy ) będzie on zmienny .. Można to zrobić tak jak chcesz, za pomocą przycisków ale może są jakieś reguły wg. których dopisujesz ten komentarz? Wtedy lepiej by było napisać jakieś makro które robi to automatycznie.
Zawsze można użyć kopiuj/wklej. Mam kilkanaście dokumentów Worda Właściwie jest to kwestia skali i "powtarzania się problemu", czyli: jeżeli problem jest bardzo rozległy lub jeśli będzie się powtarzać dla różnych danych, to warto rozważyć makro. Jeśli nie, to po co makra skoro można to zrobić ręcznie? Rozwiązanie bez makr: tabela z pliku txt do Excela,...
Wracając do tematu: Jest jakiś sposób na zablokowanie funkcji RANDBETWEEN ? Mając je wpisane w całym skoroszycie gdziekolwiek kliknę losuje mi na nowo wartość. Da się to zmienić aby losowało tylko na wyraźną komendę ? I zatrzymywało się po wylosowaniu ? I czy da się to zrobić bez makra ? Bo stosowanie makra na wstawienia jako wartość po każdym losie...
Problemów ciąg dalszy.Mianowicie dziś potrzeba zaszła wstawienia nowego wiersza miedzy wiersze już wypełnione w tabeli i powstał problem. Próbuję i Makrem wstawiać nowy wiersz i za pomocą PP i nic.Wiersz owszem się wstawia ale w pierwszych trzech kolumnach nie wstawia mi użytych tam formuł.W kolumnie L,N,O,P formuły wstawiane są normalnie w nowym wierszu.Co...
Użycie modulo jest faktycznie wygodne ale tylko przy parzystej. Nie wiem dzisiaj czy nie będe miał potrzeby za jakiś czas określić, że kolumna do wstawienia godziny modyfikacji to będzie np co 3 kolumna, wówczas kiedy zmieni mi się kolumna ją poprzedzająca: |DaneA| |DaneB| |Wstaw czas modyfikacji DaneB| DaneC| |DaneD| |Wstaw czas modyfikacji DaneD|...
Witam serdecznie, Potrzebuje pomocy w napisaniu marka, poniewaz sam nie potrafię. Tabela: W kolumnie T w kolejnych wierszach są wpisane jako tekst ścieżki na dysku. Czasem jest to jedna ścieżka, a czasem dwie lub trzy oddzielone ";" (średnikiem). Czyli ścieżki to takie główne wartości oddzielone ";" średnikami. Makro: Makro ma przeszukiwać tekst (wartości)...
Witajcie. Potrzebuję pomocy. Mam arkusz kalkulacyjny który zbiera codziennie ceny z moich sklepów. 4 sklepy. Układa je w kolumnach wg nazwy towaru. Chciałbym zrobić tak że jednego dnia (automatycznie lub ręcznie) jak wszystkie dane będę miał pełne i aktualne, Google sheets skopiuje je do nowego arkusza. Na zasadzie takiej żeby przesunął stare dane o...
No sumy częściowe jak najbardziej mi pozwolą posortować i zsumować odpowiednią kolumnę. Chyba nie dość dokładnie opisałem w czym rzecz ;-) Suma, 30 (pusty wiersz) Miałem na myśli makro, które znajdzie wiersz podsumowujący i wstawi poniżej pusty wiersz (lub 2, 3 wiersze ...) poniżej. Dokładniej, muszę popracować w dwóch, trzech wierszach poniżej nad...
Dzień dobry, Chciałem się włączyć do dyskusji, chociaż trudno zaproponować szybkie rozwiązanie przy tak dużej liczbie danych. Nie chcę proponować VBA, są pewnie lepsi od tego specjaliści, natomiast formuły Excela można na pewno zoptymalizować. Ale najpierw pytanie, czy w przykładzie kolumna I w arkuszu "wynik" zawiera spodziewany wynik? Warunek jest...
Poniższe makro wstawi tą formułę w 20 komórek poniżej zaznaczonej komórki: i : [" & i & ".xls]. To tak na przyszłość, jakbyś chciał to kiedyś zmodyfikować.
Witam forumowiczow, Siedze nad dosc prostym makrem, ktore przeszuka kolumne G; jesli znajdzie tam wartosc "oplaty licencyjne" to w kolumnie R wstawi wartosc "koszty". Kod, ktory napisalam - oczywiscie - nie dziala. [syntax=vb] Sub FindAndReplace() Dim rCell As Range Dim xCell As Variant Set rCell = Sheets("YTD2012").Range("g2", Range("G65536").End(xlUp))...
...mógłbym przenieść automatycznie piosenki do określonych katalogów - makro na przeniesienie plików też już posiadam. To makro, w oparciu o InStr, na kolegi miejscu bym rozbudował. W kolumnie C wpisywałbym wyniki (rozumiem, że arkusz ma być czymś w rodzaju rozpiski (filtrowanie/sortowanie). Rozważyłbym również możliwość porównywania w drugą stronę....
Ktoś tu kiedyś sortował "merglowane". Zerknij tutaj: [url=http://www.elektroda.pl/rtvforum/to... Przy niewielkiej ilości wierszy, łatwiej (ale bardzo nieefektywnie) byłoby wstawić 3-wiersz, szukać MAX'a i podstawiać... Edit 21:10 Och, postanowiłem sprawdzić, jak bardzo nieefektywne (załącznik) ;)
Tam w tej komórce z FZ występuje numeracja pierwsze Fz to FZ1 ale nie wiem czy numer tutaj ma znaczenie. Ma o tyle, że do tej pory sprawdzałem, czy wartość komórki = FZ, teraz trzeba sprawdzić, czy w łańcuchu znaków, będącym wartością komórki, znajduje się fragment FZ. Dodatkowo w komórkach A pod fz znajdują się głównie cyfry bądź puste pole więc może...
Witam, Jestem początkujący jeśli chodzi o VBA, czy ściślej rzecz biorąc nagrywanie makr. Znalazłem na forum podobne tematy, ale nie byłem w stanie na ich bazie wywnioskować jak naprawić swój problem: Z pewnej tabeli kopiuję do nowego pliku określoną liczbę kolumn, jednak liczba wierszy jest zmienna. Po zaznaczeniu całości w nowym pliku wybieram wstawienie...
W załączniku znajdują sie dwa arkusze: "DANE" i "WZÓR". W arkuszu"WZÓR" jest przykład o co mi chodzi. W arkuszu "DANE" w kolumnie A jest jakiś zakres danych(danych będzie tysiące i w tym problem) W kolumnie C arkusza"DANE" należy wstawić jakieś dane. Zastanawiam jak rozwiązać aby w kolumnie C wstawić te dane szybko i sprawnie? jak robię zakres od 1-20...
Dzięki bardzo. Do szczęścia mi brakuje aby efekt makra robił się na arkuszu "wynik" a wartości były brane z arkusza dane. No i prosiłbym o wskazówkę jak zrobić kolejne sumy dla pozostałych kolumn "cena" (w tej chwili suma liczy się dla kolumny indeks)
Jak to zwykle bywa przyszły komplikacje, których z moim poziomem zaawansowania nie jestem w stanie samodzielnie rozwiązać. Sęk w tym, że program, który będzie podlegał ewidencji czasu, może być otwierany kilkukrotnie. Właśnie, dlatego chciałbym, aby makro dodatkowo sprawdzało czy komórka przypisana do daty jest pełna (już znajduje się w niej czas),...
makro kolumny klimatyzacja wstawienie sumowanie kolumny makro
budowa silnika rowerowego podciśnienia odkurzacze schematy ładowarek uniwersalnych
odkurzacz electrolux ultra silencer instrukcja telewizorów thomson
Kod F95 w RF Smart - przyczyny i rozwiązania Kompresor 50l i klucz Parkside 310Nm - czy to działa?
