Rozwiązaniem jest poprostu skorzystanie z makra ... .macro 1wire sbi WIREDIR,(at)0 cbi WIREDIR,(at)0 .endmacro wywołujesz np 1wire 1; <- oznacza, że chcesz wykonać kod z 1 zamiast (at)0 Kompilator przed kompilacją, w miejsca gdzie wywołałes makro wstawi kod będący zawartością makra i pozamienia (at)0,(at)1, itd na wartości z którymi to makro wywołałeś....
w tabeli znajdującej się w Arkuszu1 odnajdywany byłby wiersz zawierający "XYZ", a nastepnie wiersz ten byłby wstawiany do Arkusza2 w tych samych adresach komórek czasem wstawi w wiersz odpowiadający adresowi wiersza z źródłowego arkusza A więc w ten sam adres, czy do nowego wiersza? PS. Niestety funkcje się nie sprawdzą bo ja potrzebuje skopiować wartości,...
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...
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ć...
Szukam takiego marka, które po każdym wierszu z danymi: Wstawi wiersz (zaczynając od 3 wiersza). Wartość z C3 przeniesie do C4 (konkretnie datę) Zsumuje wartości D2+D3, E2+E3, F2+F3, G2+G3, I2+I3 Liczby od D4 do I4 zamieni na wartości. Wstawi wiersz 6 Wartość z C5 przeniesie do C6 (konkretnie datę) Zsumuje wartości D4+D5, E4+E5, F4+F5, G4+G5, I4+I5...
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).
Aktywny 'arkusz2' [syntax=vb]r = Application.CountA(Columns(1)) + 1 While r > 2 n = Application.CountA(Rows(r - 1)) - 2 For nr = 1 To n Rows(r).Insert Cells(r - 1, n - nr + 3).Cut Cells(r, 2) Next r = r - 1 Wend [/syntax]
Najpierw makro, które wstawi przecinki.
Warunek jest taki żeby wstawiało te dane w pliku STATYSTKA biorąc pod uwagę datę przyjęcia czyli jeżeli w pliku STATYSTYKA w komórce C2 mamy datę 2023-01-30 to żeby kopiowało z pliku DANE tylko te pozycje które mają taką samą datę jak ta wcześniej wymieniona. Makro miałoby przenosić z jednego pliku do drugiego dane żeby przyspieszyć pracę i nie dublować...
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...
Witam, Mam następujący problem w Excelu: w kolumnie a mam komórki z datami. Do momentu 1/2/2002 (drugi stycznia) daty są sensowne, a później przyjmują wartość 1/0/1900. Chcę napisać makro, które wstawi brakującą datę 1/1/2002 (wartość tej daty to: 37257). Napisałem kod: Sub first_date() Dim i As Long i = 2 Do Until ActiveSheet.Range("A"...
Witam, potrzebuję stworzyć przycisk makro, który po naciśnieciu wstawi we właściwych komórkach odpowiednie daty. Dajmy na to że w komórce A1 jest aktualna data - DZIŚ() Przycisk makro "BIEŻĄCY MIESIĄC" odwołując sie do A1 powinny w komórce B1 wstawić datę początkową bieżacego miesiąca, a w komórce B2 datę końcową miesiąca. Potrzebuję takie 4 przyciski...
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...
1. Wciśnij zarejestruj makro. 2. Wejdź w edycje komórki. 3. Wklej tą formułę i naciśnij <ENTER> 4. Zakończ rejestracje 5. Wejdź do edycji makra.
Mam problem z przerobieniem makra, na takie które automatycznie wstawi w kolumnie Data https://obrazki.elektroda.pl/3208294900_... Private Sub Worksheet_Change(ByVal Target As Range) Dim xCellColumn As Integer Dim xTimeColumn As Integer Dim xRow, xCol As Integer Dim xDPRg, xRg As Range xCellColumn = 4 xTimeColumn = 5 xRow =...
tabelki bedą sie róznic opisami poza zółtymi polami i jak nacisnę wstaw b2 to wstawi z arkusza tabelka_b2 i analogicznie z F
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, mam arkusz, w którym muszę zastosować kilka makr, większość przeskoczyłem ale na dwóch się zawiesiłem i stąd mój wpis. 1. Czy w Excel2013 da się makrem ukrywać wstążkę tak jak dało się to zrobić w Excel2007 bo coś mi zadziałać makro, które kiedyś stworzyłem, a wiem że było sprawne oraz 2 ważniejsze: Mam tabelę i w kolumnie np. E11 mam wczytane...
Witam, Mam następujący problem: w arkuszu Excel mam dane z datami w kolumnie A od komórki A2 w dół. Dane są w porządku malejącym, ale mają luki - tzn. np. po 26/01 czasami jest od razu (bez pustego wiersza) 24/01. Chcę napisać makro, które w takim wypadku wstawi odpowiednią ilość pustych wierszy w miejscach, gdzie brakuje dat. Póki co mam kawałek kodu,...
Panowie Mam plik txt, w którym mam daty i inne bajery. Mam małą zagwostke Potrzebuje makro które jak znajdzie mi taki ciąg: http://jakasstronka.pl/stronkatest to wstawi mi to do nowej linii (komórki). Ten szukany ciąg znaków jest poprzedzony innymi słowami. Import pliku realizuje mi sie poprawnie
Cześć, chciałbym się podłączyć pod temat chyba z podobnym problemem. Posiadam arkusz excel gdzie osoba trzecia będzie wprowadzać nowe pozycje (wiersze) i uzupełniała do każdej pozycje dane w kolumnach. Każdy wiersz posiada 10 kolumn z czego kolumny 2-3 (trzy) posiadają skomplikowane formuły dot. auto-uzupełnienia. Excel jest tak zrobiony, że jak ta...
Cześć, Mam taki problem. Mam dwa pliki, załóżmy, że są to Marko 1 i Makro 2. Makro 2 to moja najnowsza wersja danych. Chciałbym w Makro 2 mieć takie makro, które porówna mi kolumnę C i A w porównaniu do pliku Makro 1. Tzn. Jeżeli w Makro 2 na tym samym zamówieniu jest inna ilość to w komórce obok wstawi się określony tekst np. "Uwaga zmiana wartości"...
Witam, jestem na etapie pisania pracy inżynierskiej, napisałem sobie część makra która wstawia mi twardą spację po każdym ze spójników z tablicy (nie wiem czy jest to dobry pomysł, ale nie umiem napisać makra, które znajdzie wyraz na końcu linijki i wstawi po nim spację. Chciałbym do niego dodać kilka rzeczy i proszę o pomoc, otóż nie wiem jak umieś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,...
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...
Witam, Potrzebuję makro, które po wpisaniu wartości w kolumnie A, wstawi wartości w tym samym wierszu w kolumnach B, C, D, E w oparciu o bazę w innym pliku, nazwijmy go "głównym". Ma to działać analogicznie do wyszukaj pionowo, ale odwoływać się do tablicy w innym pliku (makro otwiera plik główny, zaciąga dane i zamyka plik główny). Nie ma działać w...
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...
Słabo szukałeś. Tu masz przykład z "wordowskiej" pomocy visual basica jak się wstawia TextFrame (troszeczkę przerobiłem). Znalazłem poprzez nagrywanie makr. Owszem nie można nagrać wstawiania ramki ale jeżeli jest już wstawiona można do niej wejść i coś napisać (to się nagra). I po nitce do kłębka... With ActiveDocument.Shapes.AddShape(msoSh...
Znalazłem takie rozwiązanie. Wpierw trzeba ustawić czcionkę w której będziemy pracować i zmieniać znaki. Dla mnie Times New Roman. [syntax=vb] With Selection.Font .Name = "Times New Roman" [/syntax] Aby dowiedzieć się jak wstawić znak do okna dialogowego "Znajdź/Zamień" w Wordzie otwieramy: Wstaw->Symbol. Wybieramy czcionkę w której będziemy pracować,...
Witam, Proszę o pomoc w napisaniu makra które po otwarciu pliku "arkusz ocen" będzie prosiło użytkownika o wskazanie lokalizacji pliku "baza". Po wskazaniu pliku excel otworzy plik "baza" skopiuję arkusz 1 (w tym pliku jest tylko jeden arkusz) i wstawi go do pliku "arkusz ocen" jak pierwszy arkusz. I teraz jeżeli w pliku "arkusz ocen" jest już skopiowany...
Witam. Jestem w tym zielony, nigdy nieużywałem accesa a Visual Basic wogule nieprzypomina Qbasic'a :P. potrzebuje napisać makro lub stworzyć przycisk, który: - będzie uruchamiać aplikacje (aplikacja zapisze plik na dysk) - wstawi odpowiednie dane z pliku do bazy w odpowiednie miejsca, np. Imie, Nazwisko, Adres itd. Jeżeli ktoś miał z tym do czynienia...
Witam, mam problem z napisaniem makra w excelu. Mam dwa arkusze. W arkuszu 1 mam dwie kolumny z naziwskami i nr telefonu, W arkuszu 2 mam dwie kolumny z uaktualnionymi nr telefonu tych samych ludzi co w arkuszu 1. Chce teraz napisać makro które będzie działać w arkuszu 1 - wynajdzie ludzi z arkusza 2 i podmieni ich nr telefonu na nowe. Nr ludzi, których...
Witam, Poszukuje rozwiązania problemu. Potrzebuję macro, ktore wyszuka wartości z kolumny B Arkusz1 i wstawi odpowiednią wartość z Arkusza2 z kolumny B odpowiednio co do liczby w Arkuszu1(kolumna B). Następnie macro powinno wklejać wartości(Arkusz1 kolumna B) dla danego numeru (Arkusz1 kolumna A), po przecinku w jednej komórce w Arkuszu3 w zależności...
Freddie Chopin -> przykro mi ale też nie znalazłem jakiejś dobrej lektury w której dużo i z wieloma przykładami byłoby na ten temat. ale nie ma jak to czytanie wielu książek i z każdej po trochu, do tego internet i przykłady na żywo z programów plus dużo własnych prób i do czegoś się powoli dochodzi. Jak widzisz powyżej podałem fajny link do postu...
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))...
W dwóch zdaniach: chodzi o to by z arkusza baza pobrać pierwszy indeks "z" a do obliczeń w arkuszach 1-4 stosować indeks "na" wszędzie tam gdzie pojawi się ten oryginalny "z". Arkusz mam za zadanie dodawanie stanów, sprzedaży, itd. do indeksów w arkuszach 1-4 stosując zamienniki ("na") ale jednocześnie nie usuwając oryginalnych indeksów jakie tam są....
Witam, jestem tutaj nowy i potrzebuję pomocy osób bardziej doświadczonych. Mój problem polega na tym że potrzebuję po wcisnięciu buttona aby utworzyło mi nowe zeszyty z nazwą pobraną z innego arkusza niż ten na którym jest przycisk znalazłem takie rozwiązanie : Sub CreateWBs() Dim lRow, x As Integer Dim wbName As String lRow = Range("A"...
Zmień żeby ostatnia komórkę pobrało np. z kolumny 1 lub najpierw niech wstawi nowe kolumny później OstSpend Opcji pierwszej nie potrafię (chętnie bym się dowiedział od Ciebie jakim sposobem osiągnąć ten cel). Druga opcja zadziałała - wielkie dzięki, tylko zastanawiam się dlaczego taki wpływ na to miały nowe kolumny? Pytam ponieważ główne makro mam...
Witam W skoroszycie BANK1, mam 4 arkusze w których gromadzę bieżące dane w wierszach/rekordach ( arkusze nazywają się KW, KP, BW, BP ) są to skróty od kasa wydała lub przyjęła , oraz bank wydał lub przyjął. oraz jeden arkusz wynikowy w których chcę różne rekordy zestawić do analizy wg dat i podliczyć saldo po każdej operacji ( arkusz wynikowy nazywa...
Witam, Mam następujący problem: potrzebuje stworzyć makro które pozwoli na podstawie pewnych definicji (kombinacji konkretnych wartości w komórkach) przypisać konkretny symbol danym zawartym w bazie, tzn. Jeżeli definicja wygląda następująco: A B C D E F Wynik 1 X Y Z 0 1 2 A20 2 X Z Z 1 2 2 B20 3 Z X X 2 2 0 C20 4 Y Z X 0 2 1 D20 5 X Z Y 1 1 1 E20...
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...
#define zm_led1 PORTC ^= led1 oznacza, że preprocesor zamiast zm_led1 wstawi PORTC ^= led1 Czyli: linia PORTC |= zm_led1; zostanie rozwinięta do: PORTC |= PORTC ^= led1; Chyba nie tego chciałeś. Zgadza się. W programowaniu z użyciem #define trudno mówić o naprawdę dobrym stylu (przynajmniej o poczuciu kontroli, bezpieczeństwa podstawień, typów etc,...
Heja, Potrzebuje makro-automat który: (...)54467664.png Makro miałoby w kolumnie B o zakresie do ostatniej komórki z wartością, w tablekach jak na obraku, sprawdzić czy w tabelce jest puste pole, jeżeli tak to przenosi wartość z B2 na B1 a B3 na B2, jeżeli w tabelce B4 i B5 nie ma pustych pól to pójdzie dalej, analogicznie jak do pierwszego przykładu...
Witam, Jestem zupełnie nowa w temacie VBA i wrzucono mnie od razu na gęłboką wodę. Mam do napisania aplikację sortującą bazę danych. Ale po kolei: na chwilę obecną potrzebuję makro które będzie wyszukiwało wartość tekstowa w 1 wierszu i jeśli ją znajdzie ustawi tam aktywną komórkę po czym wstawi 4 puste kolumny na prawo od niej. pózniej muszę wypełnić...
A typedef zawsze jest lepszy od odpowiedniego #define, bo, po pierwsze, kompilator wtedy wie, że to jest ten sam typ, a nie taki sam (chociaż w C nie ma to aż takiego znaczenia, ale w C++ jest już inaczej) No tak, porównując do C++... ;] Sądzę, że kompilator nie ma zupełnie nic do rzeczy, gdy zostanie użyty #define jak w przykładzie wyżej, bo preprocesor...
proponuję pobawić się tym osobiście. Daje wiele możliwości. Na początek zaznacz zakres (np kolumny) i wstaw tabelę przestawną Użyj godzin jako początków wierszy i liczników oraz numerów jako nagłówków kolumn. W pole danych wsadź zaś- zapewne wstawi je z funkcją COUNT i gotowe teraz zostaje pobawić się w pivotowanie Tabela przestawna to tabela agregująca...
W prosty sposób ikony w pasku można zmienić tylko dla ikon makropoleceń. Więc ostatecznie można stworzyć takie makro i wstawić do paska szybkiego dostępu i zmienić mu ikonę.
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 &...
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.:)
Może więc takie rozwiązanie jak w załączniku? Menu kontekstowe PPM jest zablokowane, ale jeśli nawet ktoś je wywoła, to nie może wykorzystać wklejania: http://obrazki.elektroda.pl/7679986700_1... Na wstążce zablokowane są funkcje przycisków: http://obrazki.elektroda.pl/8622171000_1... Cały czas jednak mam wrażenie, że takie całkowite...
excel makro wstawi wstawi kolumna makro excel makro wstawi wiersz
schemat panasonic wieża zrobić projektor laserowy podciśnienie diego
bateria parkside styki adaptacja czujnik passat
Opel Kadett E 1.3i – schemat instalacji paliwowej, opis układu, diagnostyka Światła stop nie świecą, żarówki i bezpieczniki sprawne – diagnostyka instalacji, wyłącznik hamulca
