Sprawa 1 Trochę niejasna. Czy chcesz sformatować w arkuszu komórkę Cells(x, "S") jako walutową, czy chcesz taką sformatowaną wartość dołączyć do wiadomości, czy jedno i drugie? Bo to są rzeczy niezależne. Jeśli sformatować w arkuszu, to kod: [syntax=vbscript]Cells(x, "S").NumberFormat = "#,##0.00 zł"[/syntax]lub ręcznie. Jeśli chcesz sformatować wartość...
Czy nie wystarczy zaznaczyć komórki już sformatowanej prawidłowo. Skopiować i teraz wkleić specjalnie (w miejsce komórek jeszcze niesformatowanych - możesz zaznaczyć wszystkie) z zaznaczoną opcją -> "użyj wyłącznie motywu źródłowego"
Zrobiłem bez makr. Może ktoś Ci przerobi na makro. Łącze do formantu w komórce bieżącej, formatowanie niestandardowe ukrywające wpis ;;; formatowanie warunkowe określające kolor. Niestety łącza nie dają się kopiować, bo są zawsze adresami absolutnymi, nawet jeśli się je zapisze bez dolarów.
W prosty sposób można tylko w dodatkowej kolumnie D, w której byłby wyliczany postęp jako ułamek. W kolumnach B i C można to zrobić, ale trzeba dla każdej komórki podać osobną formułę, bo przy definiowaniu tego typu formatowania nie można używać adresów względnych, zatem nie można skutecznie kopiować komórek sformatowanych tak, aby każdy wiersz był...
Jeżeli chodzi tylko o określenie położenia zaznaczonej komórki to jest to ActiveCell i odpowiednio do potrzeb .Address, .Row, .Column.
Witam jak zmienić w exelu 2003 domyślnego koloru obramowania komórki z czarnego na inny kolor? Chodzi o komórkę która jest widoczna zaraz po uruchomieniu programu. Czy jest to w ogóle możliwe? Tak, to jest możliwe. 1. Nagraj makro formatowania komórki. Prawdopodobnie trzeba je będzie trochę przerobić, ale to zostaw na później. Najważniejsze abyś przy...
Użyj OLEAutomation , załączam przykładową app którą dawno temu napisałem w ramach "testów" . do uses dodajesz ComObj ,a jak byś chciał więcej metod dla obiektów Excela to trzeba szukać to z helpem od VBA. Jak byś był zainteresowany formatowaniem komórek to nagrywasz sobie makro w Excelu potem dajesz wyświetl kod i patrzysz co i jak :) ,aha dołączam...
Możesz wykorzystać "formatowanie warunkowe".
Czy ktoś ma pomysł na to aby nie zaznaczał całych kolumn A:G tylko aby zaznaczył od komórki A4 do komórki GX Taki efekt możesz uzyskać poprzez wstawkę kodu: [syntax=vbscript]Set thisWb = ActiveWorkbook Set wksK = thisWb.Worksheets("Kosztorys") Lastrow = wksK.Cells(Rows.Count, 1).End(xlUp).Row wksK.Range("A4:G" & Lastrow).Copy[/syntax] ale efekt takiego...
Ciekawa sprawa... Przecinek jakby z innej bajki i nie chce się formatować komórka. Spróbuj w pętli: [syntax=vb]Sub Makro() Dim c As Range For Each c In ActiveSheet.UsedRange If Right(c, 1) = "*" Then c = Val(Left(c.Value, Len(c) - 1)) c.NumberFormat = "0.00" End If Next End Sub[/syntax]
Niestety Run-time error '1004': Metoda PasetSpecjal z klasy Range nie powiodła się.
Sprawdź załącznik. Powinno być dobrze, jeśli nie pominąłeś jakiegoś wariantu. Nie wstawiałem kropek jako separatorów tysięcy, bo to nie jest polski standard. Jeśli chcesz, zrób sobie formatowanie niestandardowe. Makro Konwersja w module uniwersalnym.
W drugą stronę jak najbardziej. Ale jeśli kolor wypełnienia wstawiasz ręcznie z palety (nie w wyniku formatowania warunkowego), to pozostaje makro lub funkcja użytkownika (też w VBA) z wykorzystaniem Interior.ColorIndex zakresu. Excel nie ma wbudowanych funkcji odwołujących się do właściwości formatowania komórek.
Jeżeli chodzi o przenoszenie formatowania to excel właściwie nie ma żadnych funkcji. Można to zrobić jedynie poprzez makro (VBA) lub "pisaniną" poprzez formatowanie warunkowe i to w excelu 2007 i powyżej, bo niższe mogą mieć tylko max 3 warunki. Ten kto zna jako-tako programowanie w VAB może sobie poradzić. Ten kto nie ma pojęcia na początku upadnie,...
a proszę zerknąć na screena co tak naprawdę kod zrobił Myślałem że to zamierzone (bo nie znam całego kodu) - choć jak się teraz okazuje nieświadomie. (więcej szczęścia :) ) Użyłeś odwołań względnych - poza tym formatowanie warunkowe ma pewne mankamenty jeżeli chodzi o adresowanie bo odwołuje się do zaznaczonej wcześniej komórki (a w makro nie ma żadnego...
Oto projekt. Początkowo Pan otworzyć i odczytać z makrami.(na otwarcie i zamknięcie książki) i poprawi stałych (bo nie mogę odgadnąć nazwy plików). Następnie skopiuj makra do prawdziwych plików Interesuje mnie jak długo potrwa pracy makro, ponieważ kopiowanie w komórki z formatowaniem (kolor, czcionki) zajmuje znacznie więcej czasu niż w komórki niesformatowany....
zapisz makro jak formatujesz komorke, potem tylko wystarczy odpalic to makro po wybraniu konkretnej wartosci z listy.
Witaj. Należy użyć formatowania warunkowego z określeniem funkcji, na podstawie której robiony jest format. Jeśli posiadasz Excela w wersji 2013 lub nowszej, to ma on wbudowaną funkcję CZY.FORMUŁA, która rozróżnia czyw komórce jest wpisana liczba/tekst, czy wartość jest obliczona na podstawie formuły rozpoczynającej od "=" - i o takie rozróżnienie chyba...
Witam. Nie mogę poradzić sobie ze stworzeniem makra... Chciałabym aby makro łączyło tekst z komórek z zakresu C13:C21 ( z pominięciem pustych) z zachowaniem formatowania i wstawiało do komórki w innym arkuszu. Plik przykładowy z makrem. Jak dołączyć do makra, które mam makro, które połączy zakresy C13:C21 z arkusza "dodaj dane" do jednej komórki w innym...
Dzieki za zainteresowanie się tematem, ale już ten problem rozwiązałem i no nawet lepiej niż mi się wydawało, że da to się zrobić :). NIepotrzebnie komplikowałem sprawę z makrem można to rozwiązać odpowiednim formatowaniem komórek.
Do zabawy można, do pracy raczej nie, bo to ktoś będzie musiał edytować, a nie tylko przeglądać. To jest za dużo zachodu, żeby tak to formatować za każdym razem, chyba żeby napisać makro. Twórcy Excela nie przewidzieli takich fanaberii. W każdym razie wszystkie komórki pionowo muszą być wypełnione, a scalenie jest nałożone w sposób niestandardowy przez...
Rzeczywiście przy odrobinie złej woli można to makro wprowadzić w błąd :cunning: Żeby ograniczyć tą możliwość - zamień jeszcze kod "With Selection.Cells" na "With Target.Cells" :ok:
U mnie działa (oprócz kopiowania wysokości komórki z tym że tego nie ma w kodzie). Możesz podać cały komunikat błędu? Jest możliwość wciśnięcia przycisku "debug" Jeżeli tak to którą linie kodu wskazuje żółta strzałka (zaznaczenie)? Przy każdym formacie wyrzuca błąd. Jak nie formatujesz inaczej to też? A możesz jeszcze podać jak sformatowałeś komórkę?
Skoro chodzi o zbędne spacje wiodące to użyj USUŃ.ZBĘDNE.ODSTĘPY(), potem przekopiuj tylko formaty do wyniku funkcji i masz tak jak trzeba :) Oczywiście kopiowanie formatowania można zrobić w VBA, wystarczy nagrać sobie makro podpiąć pod skrót lub przycisk i po problemie. Tu jeszcze archiwalny temat z podobnym problemem https://www.elektroda.pl/rtvforum/topic3...
Zapis w systemie amerykańskim to właśnie mm/dd/rrrr i tak właśnie operuje na datach VB (jeśli nie odziedziczy formatowania). Zamiast pobierać (dzisiejszą) datę z komórki, zastosuj funkcje VBA: Date, Date-6. Możesz ewentualnie formatować "w locie" Np: Format([Y3], "dd/mm/yyyy")
Pkt. 1 wystarczy funkcja Jeżeli. Pkt. 2 tu już trzeba raczej makro, albo formatowanie warunkowe (tylko kolorowanie błędnej komórki)
Nie wiem, w której wersji Excela ma być realizowana ta mapa, ale od wersji 2010 można wykorzystać właściwość DisplayFormat, która uwzględnia formatowanie warunkowe.
Witam. Dokładnie o to mi chodziło , bardzo dziękuje . Tylko jeszcze jedno pytanie a dokładniej : przy kopiowaniu do pliku B, zmieniają mi się również formaty w komórkach ( na te z pliku A) czy da się skopiować tylko wartości tak aby nie zmieniać formatowania komórek w pliku B ???
Spróbuj procedury zdarzeniowej. Np [syntax=vb]Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Intersect(Target, Range("K5:K13")) Is Nothing And Target.Count = 1 Then For Each kom In Range("B3:F7") If kom.Value = Target.Value Then kom.Font.Bold = True Else kom.Font.Bold = False End If Next End If End Sub[/syntax]Wklej w kod arkusza,...
Super, wszystko działa tak jak chciałam. Dziękuję za pomoc :-) Dodano po 59 formatowanie dopisałam :-)
Nagraj makro i zobacz co w nim jest.
Napisałam makro które między innymi zmienia formatowanie kolumny, jeśli znajdzie komórkę z wartością "Kod". Makro działa dobrze gdy komórka "kod" zostaje znaleziona, ale gdy jej nie ma wyrzucą błąd. Jak mogę zmodyfikować to makro, żeby w przypadku nieznalezienie komórki "Kod" przeszedł do dalszej części instrukcji? Z góry bardzo dziękuję za pomoc! Cells.Find("Kod").Select...
Jeśli system zero-jedynkowy, to zsumuj i jeśli >3, koloruj. Bez VBA zrealizujesz przez formatowanie warunkowe...
Jak musiałby wyglądać skrypt do rozróżnienia komórek z zawartością liczb / komórki z liczba z literą. Chodzi o to, że niektóre wartości liczbowe nie chcę oceniać . zastosuję wtedy wpis do komórki w postaci mieszanej np. 6/mm . Tym samym skrypt nie powinien formatować już takiej komórki. Formatować winien tylko te z zawartością liczb Inna sprawa
Witam Rejestratorem nagrałem poniższe makro wstawiające formatowanie warunkowe. Chciałbym jednak, żeby to makro sprawdziło warunek i ewentualnie zmieniło kolor komórek a nie wstawiało formatowanie warunkowe, ponieważ formatowanie warunkowe zastosowane nadmiernie, zamula. Chodzi o to, że makro miałoby sprawdzić czy wartość w komórce "C81" podzielona...
Zliczanie komórek o innym kolorze tła jest możliwe wyłącznie makrem. Jednak nawet makro nie obliczy kolorów jeżeli są one zmienione formatowaniem warunkowym. W makro, w twoim przypadku, trzeba by było zliczać tak samo jak w warunku formatów. Proponuje ci, w przypadku rozwiązania zastosowanego przez kolegę adamas_nt , w jakiejkolwiek komórce wpisać =LICZ.JEŻELI(G1:I3;"<="&C5)...
Wielkie dzięki za to makro - jest świetne. Właśnie o to mi chodziło. A co należy dopisać aby makro kopiowało wiersze z formatowaniem. W niektórych komórkach mam też hiperłącza, a są kopiowane jako tekst. Jeszcze raz dziękuję za pomoc!
A po co do tego makro? Można to zrobić prostą formułą w kolumnie I: =if(isblank(h1);na();now()) Kolumnę formatujesz jako "czas" i tyle.
A nie możesz przed wklejaniem wartości odciąć literkę G np. formułą: =FRAGMENT.TEKSTU(A1;2;1) Btw. Jak to zrobiłeś? Napisałeś jakieś makro? Żadnego makra - prawy klawisz, formatuj komórki, niestandardowe. Formatowanie jest tak zdefiniowane, że do kazdej cyfry dopisuje podczas wyświetlania na początku literkę "G".
Witam, Mam problem z porównaniem komórek które posiadają inne formatowanie. Próbowałem ominąć to funkcją TEKST natomiast nie dało to żadnego skutku. Proszę o pomoc jaką funkcję mogę użyć lub jak mogę napisać makro w tym celu. Pozdrawiam
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...
Nie wiem, co to znaczy "działało automatycznie". Nic się nie dzieje automatycznie. Każdy proces trzeba jakoś uruchomić. Teraz zrobiłem wklejanie przez Ctrl+v. Komórkę do wklejenia trzeba zaznaczyć. To będzie dotyczyć wszystkich komórek. Kopiowanie z formatowaniem można zrobić z menu głównego lub podręcznego.
Spróbuj zamienić: [syntax=vb]Selection.PasteSpecial Paste:=xlPasteAllUsingSourceTheme, Operation:=xlNone _ , SkipBlanks:=False, Transpose:=False[/syntax] na: [syntax=vb]Activesheet.Paste[/syntax] Sprawdź również formatowanie komórek.
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 zapisane w module uniwersalnym. Działa w arkuszu aktywnym....
Jeśli jest taka potrzeba... Nagrałem makro w Wordzie i wyszło coś takiego [syntax=vbscript]Sub Makro1() ' ' Makro1 Makro ' ' Selection.TypeText Text:="ala i as" Selection.Style = ActiveDocument.Styles("Nagłówek 1") Selection.TypeParagraph Selection.TypeText Text:="poszli w las" Selection.Style = ActiveDocument.Styles("Normalny") Selection.TypeParagraph...
Prosiłem o załącznik, żeby było wiadomo jaki jest układ danych i żeby było na czym przetestować zaproponowany kod. Czy te poszukiwane komórki stanowią ciąg kolejnych komórek, czy są rozmieszczone w kolumnie losowo, rozdzielone innymi komórkami (z innym formatowaniem)? Czy w kolejnych kolumnach jest tyle samo wypełnionych komórek (przynajmniej z grubsza),...
A zrób tak: zaznacz WSZYSTKIE komórki (CTRL+A), prawym, Formatuj, Ochrona ODZNACZ "Zablokuj". Teraz zaznacz chronione komórki, zaznacz "Zablokuj" - i ew. "Ukryj", to tylko ukrywa formuły... Narzędzia->Ochrona->Chroń arkusz, zahacz co chcesz lub pozostaw domyślne dwa pierwsze, restrykcyjne ograniczenia.
Przekreślenie jest efektem formatowania tekstu w komórce. Wyniku formuły nie można w ten sposób formatować. Pozostaje makro - nagraj przekreślenie i będzie prawie gotowe. Glównie chodzi o przypisanie tekstu i sformatowanie: Characters(Start:=1 lub 6, Length:=5).Font.Strikethrough = True lub False. Po mojemu, oprogramować należy arkusz z M/K przy Worksheet_Change.
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...
Mnie te makra nie zawiesiły Excela ani razu, ale testowałem je na wersji 2007 i 2010. Być może problem jest spowodowany przez połączenie wklejania danych ze schowka z wstawianiem komórek. Jeśli formatowanie komórek nie ma znaczenia i kopiowane są stałe (tak to przynajmniej wygląda w przykładowym pliku), to może zrezygnować z kopiowania na rzecz przypisywania...
Sprawdź takie makro: Cells(CC, 3).Cut zastąp linijką Cells(CC, 3).Copy . Makro działa od pierwszego wiersza, jeśli pierwszy wiersz Twojej tabeli to nagłówek, początkowe parametry CA oraz CC zmień na numer wiersza, od którego zaczynają się faktyczne dane. Makro działa do momentu napotkania pierwszej pustej komórki w kolumnie C.
Cześć, Potrzebuję pomocy z EXCEL'em. Czy da się zachować w nowej komórce formatowanie źródłowej komórki (różne czcionki, kolory tekstu) bez użycia makra? Oczywiście komórki połączone odnisieniem. Jeśli makro, czy jest ono bardzo skomplikowane i mniej, więcej jak powinno wyglądać? Chodzi o bardzo wiele komórek, w których występuje tylko tekst, miałyby...
A musi być makro? Bo najprościej to zrobić formatowaniem warunkowym, wybierając opcję "niepuste". Formatowanie warunkowe jest dynamiczne, więc zmiany zawartości komórek będą od razu uwzględnione. Tylko jeszcze kwestia formalna: co uważasz za puste komórki? W formatowaniu warunkowym Excel uważa za puste również komórki zawierające pusty tekst oraz same...
Lanzul a czym Twoje rady różnią się od moich? Dokładnie o tym samym pisałem. Ukrywane są kolumny od D (w vba jest makro które je ukrywa) czyli mają szerokość "0" oraz zablokowane są okienka. Powoduje to że w arkuszu wstawiana jest pionowa jak i pozioma czarna linia, która zakrywa obramowanie komórek.
Nie jest to sortowanie, ale może wystarczy ci dodać kolumnę z rankingiem. (w przypadku dwóch takich samych wyników będzie np dwóch z nr 3 ale nie będzie 4 tylko od razu 5) Można dodać jeszcze formatowanie warunkowe i "kolorować" złotem pierwsze miejsce sredbrem drugie i brązem trzecie. (tego nie ma w załączniku ale myśle że to nie problem) W innym przypadku...
Tak jak wspomniał kolega adamas_nt - załącz przykład (jeżeli to excel2007 i wyżej spakuj plik) lub napisz warunki jakie są wpisane w formatowaniu warunkowy. Wtedy da się określić czy formuły excelowskie to ogarną czy trzeba będzie pisać makro. Jeszcze raz powiem - nie da się makrem (i inną formułą) znaleźć zmianę barwy komórki zmienionej za pomocą formatowania...
1. Załóż filtr w oryginalnej tabeli (niepuste) -> zaznacz całą tabelę i wtedy dopiero kopiuj dane . Może nawet lepiej wklejać "tylko wartości" niż dane z pełnym formatem każdej kopiowanej komórki. Zrobisz to w jednym ruchu zamiast korzystać z pętli (2000 razy). Po nagraniu makra można edytować zaznaczony zakres tak, żeby najlepiej nam odpowiadał. 2....
Na początek nagraj makro czynności "Chroń Arkusz", odznaczając wszystkie opcje. Spróbuj wykorzystać nagrany kod.
Nie wiem czy to zadziała na Excelu 2002, ale możesz sprawdzić przykład z załącznika. Oparty na "zwykłych" formantach formularza - checkboxach. Jak klikniesz prawym -> Formatuj formant to we właściwościach masz Łącze Komórki, gdzie możesz ustawić powiązanie formantu z komórką - to ta pierwsza część. Druga - do checkboxa można przypisać makro, które zaznaczy...
automatycznie skopiowały się poniżej tabelki To spróbuj wykorzystać makro powiel() (uruchamiane skrótem ctrl+p ) :idea: :D z załączonego pliku. Dla pewności działania konieczne jest formatowanie ilości (Qty) jako liczby, a nie jako tekst :cry: (jak w Twoim przykładzie) :!: 1026922 1026916
"Clear" będzie działać tylko że usunie również formatowanie (kolory, ramki itp). Proponuje jednak: Worksheets("Przyrządy pomiarowe").Cells(x, 9).Value = "" Lub Worksheets("Przyrządy pomiarowe").Cells(x, 9).ClearContents
Nie umiem tego połączyć z makrem które napisałeś. :cunning: Najgorsze jest to, że w poprzednio zaproponowanym pliku nie dostrzegłeś "najważniejszego" triku - umożliwiającego przeróżne obliczenia i ich kombinacje działające w każdym miesiącu dowolnego roku - tzn. odpowiednie niestandardowe formatowanie komórek z datami :!: :please: Spróbuj tego makra...
Dzień dobry, Wydaje mi się, że niepotrzebnie się Pan obraża, bo moje pytanie chyba jednak było zasadne - w nowej wersji usunął Pan to godzinowe formatowanie i teraz wiadomo, że chodziło Panu o liczby całkowite. Lepiej wyjaśnić wątpliwości zawczasu aniżeli zrobić coś nie tak i później poprawiać. Pana problem wcale nie jest banalny i pewnie dlatego nikt...
Mam problem aby zrobić jako makro kopiowanie do dowolnej komórki wartosci z komórki formatowanej jako data i z funkcją DZIŚ. Chodzi o to że w pliku potrzebuje wstawić w jedną kolumnę (kol. C) aktualną datę (ale jeśli zrobiłbym z funkcji dziś to codziennie ta data by się aktualizowała dlatego chodzi mi tylko o wartość formuły). Zrobilem komórkę z funkcją...
Witaj Ponieważ wiemy tylko zakres wejściowy jest nieznany, gdzie wynik, Załóżmy, że R3. znaleźć komórki z największą wartość - colrez=Application.WorksheetFunction.Mat... i skopiuj format do klatki wyniku R3 - Range("S3:AD3").Cells(colrez).copy Range("R3").PasteSpecial xlFormats Application.CutCopyMode = False Oczywiście...
Formatowanie warunkowe - formula =DZIŚ()<wygaśnięcia (zielony) komunikat - makro do zdarzenia na otwarcie skoroszytu
Nie wiem jak Calc w Open Office "czyta" makra napisane dla Excel,a. Nagraj jakieś makro w Excelu (kopiowanie, zaznaczanie komórek, zakresów, formatowanie itp), przenieś je do Calc,a i sprawdź czy dzieje sie to, co powinno (nie mam OpenOffice, żeby sprawdzić). Ewentualnie poczekaj na kogoś bardziej zaawansowanego. -------------- Dodano po 8 chwilach....
w tym przypadku zastosowanie formatowania warunkowego nie zdałoby egzaminu, dlatego bardzo dziękuje za makro :) niestety mam z nim jeden problem makro szuka pustych komórek I zaznacza na szaro komórki w wierszach w których są dane. Czy można zmodyfikować makro tak aby zaznaczało na szaro tylko te wiersze w których wszystkie komórki są puste?
Jeśli niekoniecznie po zaznaczeniu musi się to odbywać (wówczas tylko makro), to faktycznie formatowanie warunkowe wystarczy. Formatowanie warunkowe - > nowa reguła formatowania -> Użyj formuły do określenia komórek (...) formuła: =ORAZ(TERAZ()-DZIŚ()...
Do wartości czy adresu? Sam kolor otrzymasz w wyniku użycia: [syntax=vb]= Range().Interior.ColorIndex[/syntax] W nawiasie Range podajesz adres komórki. Jest tylko drobny problem. Nie działa w przypadku formatowania warunkowego. :(
1. Początkowo w formatowani komórek odblokować zakres B:I 2. Włączyć ochronę arkusza. (np. z hasłem 111 ) 3. Umieścić w kod Arkusz1 ten kod: Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, Range("B:I")) Is Nothing Or Cells(Target.Row, 1) <> "" Then Exit Sub Me.Unprotect...
Czemu po wprowadzeniu formuły, po ponownym klinięciu na komórkę z formułą i zatwierdzeniu enterem samo zmienia formatowanie na tekstowe i formuła przestaje działać ?
Posiadam działającą wyszukiwarkę w Excelu, która działa tylko dla jednej kolumny [syntax=vbscript]Private Sub TextBox1_Change() ActiveSheet.ListObjects("Data1").RANGE.A... field:=2, Criteria1:="*" & [a2] & "*", Operator:=xlFilterValues End Sub[/syntax], jak zmodyfikować makro bądź utworzyć całkowicie nowe, aby działało dla wielu kolumn....
Czy to da się w ogóle zrobić? Da się. Z tym, że nie ma wbudowanych funkcji Excela formatujących komórki. Trzeba napisać makro. Mały przykład w załączniku. Paletę ściągnąłem[url=http://konspekt.eu/?palet... stąd. .
Proszę o pomoc w napisaniu makra. Chodzi mi o makro, które będzie pilnowało wartości wpisywanych w pole B5. W komórce od A1:A4 jest zakres danych (A1 = okno1, A2 = okno2, A3 = okno5, A4 = okno23). Jeśli wpiszemy w pole B5 wartości inną niż w zakresie A1:A4 to pole zostanie pokolorowane na czerwono. Dodam, że zależy mi na kodzie do makra, a nie na formatowaniu...
Witam, potrzebuję pomocy z napisaniem kodu, który będzie w stanie wyszukać we wskazanym zakresie komórki, które mają obramowanie w kolorze czerwonym. Jeśli komórka ma czerwone obramowanie, to dana kolumna w której jest komórka powinna zostać ukryta. Napisałem prosty kod, który to robi i wrzucenie tego w pętle to też nie problem, ale jest pewien szkopuł,...
A nic nie pisałeś, że chcesz zautomatyzować jakąś czynność :) Zwykle robi się to kompleksowo. Pobieranie danych z zewnętrznego źródła lub t.p. a same działania matematyczne są jakby przy okazji. Po drugie, makro pisze się raczej w sytuacjach, gdzie nie ma możliwości stosowania funkcji wbudowanych, a póki co (przynajmniej ja) nie widzę takiej potrzeby....
Działa ale też nie do końca tak jak trzeba - nie przenosi szerokości komórek i formatowania warunkowego. Ale spox poradziłem sobie w inny sposób. Na bazie poprzedniej procedury nagrałem sobie makro, które usuwa zbędne wiersze i zmienia nazwę arkusz i pozamiatane. Jeszcze raz wielkie dzięki za pomoc.
Wprowadziłem formuły i formatowania warunkowe do komórek arkusza BAZA i po wpisaniu nowego kodu, istniejącego w BAZA_ETYKIET, wyszukuje ilość z BAZA_ETYKIET i odpowiednio kolorują komórki arkusza BAZA.
Plik ustawiam jako tylko do odczytu, bo o to mi chodzi i jest to intencjonalne. Sam plik .csv otwieram bez pomocy makra w excelu i widzę określoną strukturę. Niestety, kiedy plik jest otwierany przez makro, struktura się zmienia. Może by mi to nie przeszkadzało tak bardzo, gdyby nie zmieniał jednocześnie w konkretnej kolumnie formatowania komórki z...
Można szukać różnych rozwiązań, ale przede wszystkim potrzebny jest załącznik, żeby było widać jak te dane są sformatowane, czy wszystkie jednakowo (np zł czy PLN), czy są tylko te dwie waluty, czy zawsze jest wpisana waluta. Poza tym istotne jest do czego ma służyć wynik - czy tylko do oglądania, czy do jakichś dalszych obliczeń. Czy poza oznaczeniem...
Zaznacz cały arkusz, odptakuj "zablokuj" w zakładce "Ochrona" (formatowanie komórek). I wtedy: [syntax=vbscript]ActiveSheet.Unprotect If Range("B2") = 1 Then Range("B4:C13").Locked = true Else Range("B3:C13").Locked = false End If [syntax=vbscript]ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True[/syntax] A dla wielu kolumn,...
Ale czy zwykłym formatowaniem warunkowym można zmienić kolor wielu komórek w zależności od jednej? Ja nie umiem tego zrobić. Gdyby się nie dało to zawsze można napisać makro.
Podłącze się do tematu. Jak zrobić aby wybrane komórki podświetlały się określonego dnia co miesiąc. Powiedzmy dwa dni przed datą na żółto a w dzień daty na czerwono. Zrób tak jak jest to opisane wyżej. I jeszcze jedno pytanie czy jest możliwość aby czerwone podkreślenie znikło po kliknięciu na nie? Jest możliwe, ale tylko poprzez makro. Proponuje...
Witam Musze przekopiować wiele pojedynczych komórek z jednego arkusza do drugiego. Kopiowanie danych musi się odbywać z zachowaniem formatowania i odniesienia do list słownikowych. Kopiowanie odbywa się po jednej komórce ponieważ makro musi być uniwersalne i pod parametry w i k, poz i kol_doc wpisywać zadane wartości. Przy poniższej operacji trwa to...
Ad 3 może ustaw po prostu formatowanie warunkowe, komórki gdzie nie ma EUR będą się palić na czerwono? Ad 2 można użyć funkcji jeżeli (a1="forum" ;"test" ;a1) Makr tu nie trzeba
Chodzi o to że skopiuję z neta ileś wierszy np . 1. WIERSZ - A 2. WIERSZ - B I wrzucę to pod tabelę chciałbym teraz aby makro wyodrębniło nowe wiersze rzuciło każdy wiersz w osobną komórkę i ją z formatowało wg ustalonej zasady. Chyba że da się kopiować tekst pod komórkę wiersza z zachowaniem formatowania - niestety mi tak to nie działa i muszę ręcznie...
Np. potrójnie zagnieżdżoną pętlą For wg.schematu: For pracownik = 1 To ilePracowników (tu przydałaby się rozpiska w osobnym arkuszu np. "Pracownicy", bo gdzieś trzeba ich policzyć) For miesiac = 1 To ilość miesięcy (tu LCase(nazwa arkusza) lub indeks daje nazwę m-ca) w tej pętli obliczasz bez zerowania również Nr wiersza wynikowego dla arkusza "Wynik"....
zadaniem makra jest zmiana koloru aktywnej komórki aby kolor z dniem działał na wybranej komórce w tych kolumnach Czym w Twoim projekcie różni się aktywna komórka od wybranej komórki :?: :D Załącz przykładowy plik i wyjaśnij czemu do tak prostej "kolorowanki" chcesz stosować makra VBA ? :cry: Najprostszym rozwiązaniem w takich wypadkach jest stosowanie...
Czy chodzi Ci aby powielić (skopiować) istniejący format na inne komórki? Jeśli tak, to szukaj "pędzelka" (malarz formatów) na wstążce poleceń. Polecam również: Zarejestruj makro -> wykonaj format -> zakończ rejestrację. Po wykonaniu tego możesz formatować wywołując makro, lub nawet wypłynąć na szersze wody i edytować kod z poziomu VBA (Ctrl+F11)
Mam taki problem z macrem ukrywajacym wiesze jezeli komorki w kolumnie 5 sa puste. Makro tego typu musi być umieszczone w module arkusza , a nie w module ogólnym :cry: Dla uniknięcia problemów (np. tekstowego formatowania komórek w kolumnie 5 ) proponuję zmianę warunku ukrywania wierszy :D [syntax=vbscript]If Cells(RowCnt, ChkCol).Value = "" Then[/syntax]
Witam. Mam plik w Excelu oraz szablon w Wordzie. Moje makro działa tak: Odpala szablon w Wordzie, aktywuje Excela, kopiuje odpowiednią komórkę, aktywuje Worda i wkleja wartość w odpowiednie miejsce. Jednak wkleja ją z takim formatowaniem jakie jest w Excelu, a ja chcę aby był to wklejony czysty tekst. W Wordzie korzysta się z: Selection.PasteAndFormat...
Witam serdecznie Na początku zaznaczam, że jestem na początku swojej drogi z "zabawą" makrami w Ecxcel'u. Potrzebuje napisać makro, które pobierze mi tekst z komórki np. B3 z pliku 1.xlsm i utworzy nowy plik excel o nazwie komórki B3. Następnie do tego nowego pliku skopiuje dane z arkusza "xyz" pliku 1.xlsm zachowując przy tym formatowanie komórek arkusza...
Makro nie jest szybsze, ale... Jeśli u ciebie problemem jest formatowanie warunkowe to makro może faktycznie zachowywać się lepiej bo po jego wykonaniu dostaniesz statycznie pokolorowane komórki. Sam tak kiedyś robiłem. Potrzebowałem by co druga komórka była innego koloru i wtedy wydawało mi się, że szybciej będzie to zrobić z makra. co "poeta miał...
Cześć! Stworzyłem makro, które z arkuszy odpowiadających kolejnym dniom kopiuje z zadanych zakresów wartości i formaty komórek (kolory, formatowania warunkowe itd.) do arkusza głównego. Niestety formatowania warunkowe nie nadpisują się w głównym arkuszu i po kilkukrotnym wykonaniu tej operacji plik nie nadaje się do użytku - szybkość jego działania...
Zmiana formatowania prznosi efekt dopiero jak zmienie kropke na przecinek, co przy uzyciu makr nie dziala prawidlowo. Funkcja wartowc liczbowa faktycznie zwraca poprawne dane. Jednak chcąc zrobić makro musialbym recznie klikac każdą komórkę albo sklecic cos w vba dla calych kolumn...
Witam, Bardzo proszę o pomoc w rozwiązaniu następującego problemu. Załóżmy, że w komórce A1 mam następujący tekst "Data ważności, Data + jakiś tekst + Data + dodatkowy tekst". W jaki sposób za pomocą makra można sformatować wszystkie wyrazy "Data" tak aby były one pogrubione. Jednym słowem chciałbym aby makro analizowało dowolny tekst zawarty w komórce...
Szkoda, że nie chcesz załączyć przykładowego pliku, bo w ten sposób zmniejszasz swoje szanse na uzyskanie optymalnej pomocy, a potencjalnych pomagających zmuszasz do wypytywania o wszystkie szczegóły. Z tego co teraz napisałeś zrozumiałem, że arkusz "Generator cen" zawiera jakieś formuły, które mają być użyte do przeliczenia danych z arkusza "301" i...
Witam, jako, że raczkuję w VBA proszę o pomoc. Mianowicie, potrzebuje w pliku w zał. : Arkusz "Cena katalog 2019" - kolumna A - podwójne kliknięcie na daną komórkę w kolumnie A np. A5 powoduje skopiowanie danych z tej komórki do Arkusza " Oferta PDF " komórka B17. Każde kolejne podwójne kliknięcie powoduje dodanie wiersza w Arkuszu "Oferta PDF" pod...
W przedstawionej procedurze eksportujesz (czy raczej usiłujesz ? :D ) do PDF dwa pliki komputer.xlsx i porto.xlsx :?: Planujesz zmieniać nazwy tylko plików komputer ? poprzez wprowadzenie do nazwy daty eksportu - formatowanej właśnie w takim stylu "yy.mm.dd" :?: czy też koniecznie oznaczyć datą z komórki A1 arkusza z makrem ? Proszę o wyjaśnienie
makro komórka formatować komórka excel makro kopiować formatować
podswietlenie przyciskow radia router odbiór antena zewnętrzna creative inspire p5800 subwoofer
Efekt tęczy na ekranie telewizora - przyczyny i rozwiązania Schemat instalacji elektrycznej Yanmar F20D