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...
Stoję przed ostatnim w zasadzie problemem mianowicie w jednym z pól mam taką formułkę: ='10-07-13'!C25+'11-07-13'!C24 która jak widać opiera się na pobieraniu wartości z pola z poprzedniego dnia+wartość z pola z obecnego dnia. czy mogę jakimś sposobem zmodyfikować tą formułe (lub powyższe makro) tak aby sama wiedziała że ma korzystać z zadanych pól...
chciałbym napisać proste makro, które po przypisaniu do kontrolki formularza lub kontrolki activeX wykona takie zadanie Po co bawić się w "przyciski" jak można przez 'doubleclick' Kliknij dwa razy na dana cyfrę.
Ogólnie to konieczne by było makro z wyrażeniami regularnymi Nie koniecznie, przy tak prostym układzie, może być proste makro. [syntax=vbscript]Sub elka() For x = 3 To Cells(Rows.Count, 5).End(xlUp).Row Cells(x, 6) = Mid(Cells(x, 5), InStr(Cells(x, 5), ".") - 2, 10) Next End Sub[/syntax]
Proponuje też zrobić zestawienie zbiorcze - tak jak na zrzucie 919992 a do automatycznego aktualizowania "indeksów" wykorzystać proste makro :spoko: w załączeniu zmodyfikowany plik z tym makrem :D 919993
W sumie jeśli zawsze masz 4 towary i dostawy są co miesiąc (łącznie 12) i poustawiane chronologicznie - to przewidując 12 dostaw na rok można próbować rozpisać na formułach. Ale makro i tak lepsze. Zobaczę, może uda mi się jakieś proste makro Koledze podrzucić.
Lzep :arrow: Z fotki wynika wszystko jasno, chyba że ktoś nie miał do czynienia z Excelem i dartem ... tomi1972 :arrow: Excel działa domyślnie w trybie natychmiastowego przeliczania formuł. Bez odpowiedniego makra nie da się zrobić tego co oczekujesz. Usuwając sumy pośrednie (F2 i J2) wartość zawsze będzie "wracać" do 501. Napisałem proste makro sumujące...
(at)Andy74 Dobrze napisane, lepiej bym tego nie zrobił.
.. Stworzyłem proste makro, które sprawdza czy komórka X jest pusta, jeżeli TAK to czyści komórkę Y za pomocą Clear.Contents. Procedura wywoływana jest po przeliczeniu arkusza: Worksheet_Calculate.. Makro może i jest proste, ale powiązałeś je w arkuszu w tak zagmatwany sposób, że jego wykonanie się zapętla. Twoje makro wykonując się, powoduje wykonanie...
Szukam rozwiązania jak sobie z tym poradzić Na podstawie Twojego przykładowego pliku (tego drugiego :D z nagłówkami ) widzę, że we wszystkich wypadkach występowania błędu #N/D konieczne jest tylko zdublowanie pozycji z kontami "5". Jeśli to było by tylko tak - to można wykorzystać do korekty proste makro jak w załączonym pliku. Po uzupełnieniu pliku...
Witaj, Nie mam pomysłu na formułę, mam natomiast pomysł na proste makro, które mniej więcej robi to, co chcesz. Nie jestem najlepszym programistą VBA, ale w sumie na pierwszy rzut oka działa. [syntax=VB]Sub Makro1() ' ' Makro1 Makro ' Makro zarejestrowane 2011-04-16, autor Darek ' ' Kolumna A od wiersza 2 w dół zawiera działania ' W kolumnie B będą...
https://obrazki.elektroda.pl/5102527300_... https://obrazki.elektroda.pl/1962866400_...
Do pojedynczego wyboru są te okrągłe właśnie. Jeśli chcesz zasymulować na kwadratowych checkboxach takie zachowanie to trzeba napisać proste makro w VBA, które podłączysz do każdego z tych przycisków. Kod musi sprawdzać, czy przycisk został wciśnięty i jeśli tak - ustawiać wartość wszystkich pozostałych na wyczyszczone. Według mnie prościej podmienić...
Może prościej będzie użyć [url=https://support.microsoft.com/pl-pl... części w Word ? Jest tu do wyboru Autotekst galeria szybkich części czy też bloki konstrukcyjne, proste do tworzenia i zmieniania.
Jeżeli w komórce ma się "pojawić" napis "Nie dotyczy" a w innym przypadku masz wprowadzać datę to tak jak sam napisałeś w pierwszym poście: tylko proste makro to załatwi. Niestety funkcja jeżeli w tym przypadku to za mało. Kłopot polega że nie masz pojęcia o makrach (jak sam mówisz), a makro trzeba ustawić w "modułach zdarzeniowych" arkusza. Np. takie:...
Funkcji nie ma ale proste makro może to załatwić. Powiedzmy, że w A1 wpiszesz datę (zgodnie z formatem daty excela) 2010-05-05 Pod przycisk (z formularzy) podepnij poniższy kod i już. Drukuj tylko za pomocą tego przycisku, inaczej data się nie zmieni. Ewentualnie w kodzie dostosuj do swoich potrzeb nazwę komórki z datą (A1) i nazwę arkusza (Arkusz1)....
lesławek - tak się nie da. Sam spróbuj - ale skopiuj liczbę a nie komórkę. W załączeniu proste makro. Uruchomisz skrótem klawiszowym ctrl+m (można to zmienić) Makro odejmuje od komórki z lewej coś co jest w schowku i wprowadza to formułą w zaznaczonej komórce. [syntax=vb]Sub odejmij_schowek() Dim mem As DataObject On Error Resume Next Set mem = New...
_BV() - bit value to proste pomocnicze makro równoznaczne z jedynką przesuniętą w lewo o numer_bitu Wyszukiwarka naprawdę nie gryzie. http://www.elektroda.pl/rtvforum/topic29...
Jeżeli wszysztkie pliki źródłowe istnieją w podanej lokalizacji, tak samo jak katalog docelowy, to faktycznie proste makro załatwia sprawę (a jeśli nie, trzeba dodać kilka linijek kodu do sprawdzenia i i ew. utworzenia katalogu przed skopiowaniem). [syntax=vb]Private Sub CommandButton1_Click() On Error GoTo myErr plik_z = "" ost_w = Cells(Rows.Count,...
Takie proste makro powinno załatwić sprawę: [syntax=vb]Application.ScreenUpdating = False Set wssuma = Worksheets("Suma") ost_wiersz_sumy = wssuma.Cells(wssuma.Rows.Count, 1).End(xlUp).Row For i = 2 To ost_wiersz_sumy With Worksheets(wssuma.Cells(i, 1).Value) ost_wiersz_arkusza = .Cells(.Rows.Count, 2).End(xlUp).Row .Range("B" & ost_wiersz_arkusza +...
Dobry wieczór, Nie wiem, ile jest tych wzorów i czy będą w nich w danej chwili identyczne ścieżki czy różne. Ale można spróbować tak. W edytorze Visual Basica wpisać sobie proste makro wstawiające do aktywnej komórki albo do komórki o określonym adresie formułę z funkcją WYSZUKAJ.PIONOWO. [syntax=vb]Sub WstawWzor() ActiveCell.FormulaLocal = _ "=WYSZUKAJ.PIONOWO(J6;'C:\Users\user\Des...
Worksheets("nazwa arkusza") Taki zapis będzie stosowany do istniejącego arkusza o nazwie 'nazwa arkusza', którego zapewne nie ma w skoroszycie.
Mala odległosc pracy może być lekkim problemem, ale do rozwiązania Można dopowiedzieć, że w pracy makro obiektyw APSC i tak umieścisz dalej od "matrycy" niż przy pracy na nieskończoność, co poszerzy jego obszar roboczy do pełnej klatki. Wspólcześnie nieliczne, bardzo proste obiektywy mają klasyczną naprawdę stałą ogniskową, większość przy wyostrzaniu...
Chciałbym aby w Marko 2 znajdowało te które są w Makrze 1 i dla nich robiło powyższą operację. Proponuje trochę przeorganizować układ tabel i wykorzystać proste :D formuły :spoko: - jak na zrzucie 936880
Tak, ma. Proponowałem Ci we wcześniejszym poście przeczytanie strony AvrSide. Gdybyś mnie posłuchał to wszystkiego byś się dowiedział. Jest tam taki fragmencik: Avr-gcc nie posiada składni bezpośredniego dostępu do bitów zmienna.numer_bitu. Operacje na bitach wykonujemy używając iloczynu i sumy bitowej, np. dla bajtu: zmienna |= _BV(numer_bitu); //...
czy da się prawidłowe numery kart wyciągnąć w excelu bez PQ? Podobny problem :cry: , ba chyba nawet gorszy bo z 26 cyfrowymi numerami kont :D rozwiązuje sobie przy imporcie do excela poprzez proste makro :spoko: [syntax=vbscript]Dim intResult As Integer Dim strPathFile As String Application.FileDialog(msoFileDialogOpen... = False intResult...
[syntax=vbscript]Sub Makro8() ' Makro8 Makro ' ' Range("C4:C11").Select Selection.Copy Sheets("Dane").Select nw = Cells(Rows.Count, "A").End(xlUp).Row + 1 Range("A" & nw).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=True Range("F" & nw & ":G" & nw).Select Application.CutCopyMode = False Selection.NumberFormat...
Sprawa dość prosta. Procedura zdarzeniowa arkusza "przy zmianie" Range(zakres).Find i przypisywanie...
Sprobuj takie makro - jest bardzo proste zaklada ze uruchamiasz je z arkusza Dane i ze tabelka w arkuszu Dane jest w tym samym miejscu co dales w przykladzie Sub test() Dim DaneX, DaneY, SpisX As Integer DaneX = 2 DaneY = 2 SpisX = 10 Do While Cells(DaneX, 1).Value <> "" Do While Cells(1, DaneY).Value <> "" If Val(Cells(DaneX, DaneY).Value)...
Proponuję zapomnieć o sbi i cbi . To jest dobre w assemblerze ale w C można się na tym przejechać (w zależności od wersji kompilatora). Na stronie # Avr-gcc nie posiada składni bezpośredniego dostępu do bitów zmienna.numer_bitu. Operacje na bitach wykonujemy używając iloczynu i sumy bitowej, np. dla bajtu: zmienna |= _BV(numer_bitu); // ustawienie bitu...
Był błąd - chyba go poprawiłem. Zmieniłem trochę całość - eksportowałem jako moduł bas - dołącz do swojego projektu i użyj. Również zamieszczam arkusz testowy z importowanym modułem. Użycie jest proste - zaznaczasz zakres komórek, na którym chcesz przeprowadzić zmiany i w menu Narzędzia -> Makro -> Makra uruchamiasz jedyne makro, jakie jest - zrób_gwiazdki....
Nie kumam tego podłączenia Toż to proste jak świński ogon :D Zaznaczasz swego Checkboxa (w trybie projektowania), klikasz we wstążce właściwości i w otwartej tabelce we wierszu LinkedCell wpisujesz adres bezwzględny komórki, gdzie będziesz miał wskazania stanu tego Checkboxa (PRAWDA|FAŁSZ) :please:
Do pierwszego możesz użyć funkcji RIGHT (zakładając że tydzień jest dwucyfrowy i zawsze na końcu) tydzien = Right(wartosc_komorki, 2) Do drugiego: albo użyć przycisku którego kliknięcie wywołuje makro dodające nową osobę do zakłądki "status" i "zasoby", albo spróbować obsłużyć zdarzenie Worksheet_Change zawężone do kolumny gdzie jest nazwisko....
Widziałem ten opis, próbowałem zrozumieć, ale nie rozumiem nadal jak to zrobić. Więc albo pomóżcie to zaprogramować albo nie dodawajcie odpowiedzi w stylu przeczytaj sobie. Jedyne do czego doszedłem to, zmiana ilości kroków przez zadany czas... Jeżeli nikt mi nie pomoże to niestety będę musiał tak zostawić wiedząc że nie jest to zbyt dokładne rozwiązanie....
Jeśli dobrze zrozumiałem opis, to coś takiego powinno spełnić te założenia: [syntax=vbscript]Private Sub CommandButton1_Click() On Error GoTo myErr Application.ScreenUpdating = False If FilterMode Then ShowAllData Set srcSheet = ActiveSheet ost_w = Range("A" & Rows.Count).End(xlUp).Row ost_col = Cells(1, Columns.Count).End(xlToLeft).Column 'generowanie...
Wiadziałem w innych topikach że trochę kumasz VBA więc czego sam nie dołożysz sortowania? Przecież to nie jest trudne. Jak czegoś nie rozumiesz to nagraj makro i przeanalizuj jak jest zbudowane. Wprowadź swoje poprawki i ... tadam ... :) proste :) Poniżej dołożyłem sortowanie po A i po E Po E bo chyba o to głównie chodzi - gdyż funkcja w kolumnie B...
Usuń duplikaty ani tabela przestawna tu się nie przyda bo dochodzi warunek że usuń gdy puste ale nie gdy puste w Re_3 Stworzyłem w sumie proste makro (ono tylko tak wygląda) Pierwsza część kodu przepisuje wszystkie linie mające to samo zlecenie. Później następuje sortowanie. Następnie warunek sprawdza czy (w moim przypadku coś1) się powtarza jeżeli...
Strasznie to wszystko zakręcone, a na dodatek niepotrzebnie komplikujesz sobie życie... Tak naprawdę to by to wszystko można zrobić na funkcjach, bez użycia VBA. No, ale... Zacznijmy od tego że poprzednie makro się wywalało, bo w złym miejscu umieściłeś sprawdzanie warunku: jeżeli masz zdarzenie Change wywoływane zmianą w arkuszu, to jeżeli w tym zdarzeniu...
Rozumiem, że nie masz kodu źródłowego? ;) Jako osoba pisząca od wielu lat w C i mająca okazje w tym czasie obejrzeć wiele różnego rodzaju "wynalazków" powiem, że to co napisałeś w pierwszym poście może mieć sens. Tzn. spotkałem się z praktyką pisania kodu testującego flagę bitową w nst. sposób: if ((zmienna & STALA) == STALA) // na ustawienie...
Teoretycznie można coś podobnego zrobić - choć w praktyce jest to bardzo złe rozwiązanie, a już zwłaszcza na plikach w pracy, gdzie istotne jest bezpieczeństwo i pewność danych... Może najpierw wykład, potem kod ;) Garść faktów: Excel nie nadaje się do pracy wielozadaniowej (czy równoległej, zwał jak zwał). Teoretycznie można w pliku włączyć jakiś tam...
(at)tmf - dziękuję za miłe słowa :) Właśnie takie było założenie co do grupy "docelowej". Myślę, że jeszcze długo ATmegi i ATtiny będą punktem startowym dla hobbystów ze względu na nawał informacji w Internecie i mocno zakorzeniony pogląd jakoby wszystko inne było drogie/trudne itd. W sumie chciałem, żeby w poradniku było trochę więcej nawiązań do...
Jeżeli dobrze zrozumiałem intencje autora to tutaj raczej bez makra się nie obędzie. Oczywiście można użyć opcji wklej specjalnie->dodaj ale będzie to bardzo uciążliwe. W załączniku proste makro wykorzystujące zdarzenie Change arkusza , bez obsługi błędów i sprawdzania rodzaju danych wpisywanych do kolumny.
https://obrazki.elektroda.pl/7932690900_... Ci, którzy czytali Docelowo chciałbym by ta seria poradników pozwoliła elektrodowiczom nie tylko na robienie lepszych zdjęć makro, ale też lepszych zdjęć prezentujących ich projekty. Być może niektórzy z czytelników zarażą się bakcylem fotografii wykraczającym poza tematykę tych poradników......
Moi mili państwo napisałem sobie proste makro które ułatwia mi pracę udało mi się wyeksportować moduł *.bas do folderu i szukam sposobu - makra które masowo mi zaimportuje go do wszystkich plików w folderze C:\pliki i podfolderach znajdujących się tam. Mam mnóstwo plików do których trzeba zaimportować makro i ręcznie to robić to nie wykonalne. to co...
Takie proste makro (można też nagrać): [syntax=vb] Range("A6:A16").Select Selection.FormatConditions.Delete [/syntax]
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ść.
Bardzo Ci kolego PRL dziękuję. Zmieniałem różne parametry kodu ale nie zauważyłem iż jest autofiltr założony. Teraz makro działa idealnie. Po tym doświadczeniu widzę że muszę jeszcze dużo się uczyć i ćwiczyć aby lepiej rozumieć VBA i aby pisać proste makra. Jeszcze raz bardzo dziękuję i pozdrawiam
dziękuje bardzo za odpowiedź. Zdecydowanie jestem zwolennikiem tego co proste i działa ;)
Wszystko opisałam. Nie musi to być konkretne makro. Po prostu chcę poznać sposób jak zrobić tak aby makro altualizowalo się gdy dodam kolumnę tzn. zrobiło też przesunięcie w kodzie o tą jedną kolumnę. Ja makra sama nie pisze tylko je nagrywam i przypinam pod przycisk. I takie makro ma dalej dobrze działać gdy dodam kolumnę. Może to być proste makro...
Szczerze mówiąc — sam się zastanawiałem: „Po kiego regulowany środek we wzmacniaczu służącym do grania muzyki?” i postanowiłem sprawdzić „nausznie”, czy moje pytanie ma sens. Skąd to zdziwienie, przecież większość grajków z lat 90-tych, jak miała jakąś korekcję częstotliwości, to w najprostszym przypadku był właśnie 3-zakresowy equalizer, do tego jakiś...
proste schematy elektroniczne proste proste zadanie proste radyjko
schematy mastercook pomiar kanał oscyloskop zawijanie wierszy
głośnik pionier telefon zablokowany kontem google
Electrolux ER 6540 T – dane techniczne, wymiary, pojemność, czynnik chłodniczy Lokalizacja czujnika stopu w Peugeot 206
