[syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$C$2" Then Application.ScreenUpdating = False nw = Sheets("Baza").Cells(Rows.Count, "A").End(xlUp).Row + 1 Range("A2:C2").Copy Sheets("Baza").Cells(nw, 1).PasteSpecial xlPasteValues Range("A2").Select Application.CutCopyMode = False Application.ScreenUpdating =...
Masz dwa przykłady, wybierz sobie pasujący lub skoryguj pod własne potrzeby. 912573 Przyjrzyj się nazewnictwu przycisków, ale nie temu na samych przyciskach, tylko ich nazwom kodowym - w nazwie każdego z nich znajduje się nazwa tabeli, której dotyczy - to identyfikator: 912574
Wszystko działa płynnie do momentu włączenia funkcji udostępniania arkusza (w tradycyjnej formie, Excel 2016). Mimo na pulpicie, ale piszesz że wszystko jest ok do momentu udostępnienia, Zrób to samo z maluśkim i większym plikiem. I się sam przekonaj udostępniając. Kiedyś znajomy nauczyciel zapisał cały arkusz excel i po czasie był zdziwiony że nie...
[syntax=vbscript]nazwa = ActiveCell.Value With ThisWorkbook .Sheets("wzor rodzinne").Copy ActiveWorkbook.SaveAs .Path & "\rodzinne\" & _ nazwa & ".xls" ActiveWorkbook.Close End With[/syntax]
CHARSET=windows-1250 - to jest to NOTE;CHARSET=WINDOWS- 1252 - w notatki to samo, (wiki -CP-1250 – strona kodowa używana przez system Microsoft Windows do reprezentacji tekstów w językach środkowoeuropejskich używających alfabetu łacińskiego, na przykład albańskim, chorwackim, czeskim, polskim, rumuńskim, słowackim, słoweńskim, węgierskim) Jeśli...
To zależy ile docelowo przewidujesz wierszy w tabelce. Jeśli nieokreśloną, to tylko VBA...
W Excelu? Tylko dodawanie poprzez Makro (lub z jego wywoływaniem zdalnym).
Pewnie ktoś z wyższą wersją się odezwie, żeby Ci pomóc.:)
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.
Jeśli ktoś ma jakiś rozwiązanie chętnie wysłucham :) Ja mam takie copy - paste nagraj makro :)
Potrzebuję gotowego makra, które będzie dodawało mi nowe wiersze. Może ktoś da radę pomóc. Mamy przykładowo w kolumnie D takie wartości: 1 D 2 5 3 1 4 30 5 8 6 100 Makro miałoby teraz dodawać pod spodem tyle wierszy ile jest napisane w tej kolumnie - 1. Np. Mamy w komórce 2D wartość 5 to pod spodem trzeba dodać 4 puste wiersze. w komórce 3D mamy 1 to...
Dziękuję za odpowiedz. Dobrze kolega zrozumiał. Jak jest zero to odejmnij. Jak nie ma zera to dodaj zero. Tak sama z druga wartością. Juz tlumacze sens. Codziennie dostaje raporty w których występują wartości z zerem lub bez zera. Żeby makro moglo uzupełnić dane(wartości duplikujące) to musze miec dane jednakowe. Jak nie mam jednakowych danych to musze...
dodanie takiego makra jak poniżej, nie wyświetla mi napisu "hello" Popełniasz błędy: - wprowadzając "prywatne makro arkuszowe" do modułu uniwersalnego :cry: , jeśli to samo makro wkleisz do modułu arkusza "zamówienia" i dokonasz zmiany treści komórki - zamiast ujętej tam formuły wprowadzisz tam 1 - to uzyskasz Twój pożądany efekt - "hello" :D ; - nie...
Po naciśnięciu na przycisk commandbutton, otwiera się "Wstawianie hiperłącza", po wybraniu pliku, dodaje adres do następnej wolnej komórki w wybranej kolumnie. Wprawdzie makro nie działa poprzez okno "Wstawianie hiperłącza", ale wstawia łacza, podepnij je sobie pod przycisk. [syntax=vb]Sub Dodaj_Hiperlacze() Dim iCol% 'kolumna aktywnej komórki Dim...
Powiedz szefom żeby kupili prawdziwy program za 1000zł Excel to NIE JEST BAZA
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....
Excelem łączę się przez referencje Dzięki CreateObject("Excel.Application") nie musisz dodawać referencji do Excela w twoim makrze. To jest właśnie najpiękniejsze. GetObject używa już dodanej referencji do Excela natomiast CreateObject tworzy obiekt z COM bez potrzeby ręcznego dodawania referencji. Działa w większości wersji Excela. Ciekawe czy takie...
Popieram kolegę adamasa. Można tez po podziale ale przed przypisaniem do konkretnych komórek arkusza do drugiego członu (tego z zerami) na początku dodawać apostrof - ale nie wiem jak jest zrobione makro dzielące główną daną więc ciężko doradzać.
a u mnie działa. może zamioast ; wstawiasz , dodaje załącznik. - przy otwieraniu pojawi się monit o tym ze plik posiada makro - jest tam tylko to makro (w module). plik i komputer czysty i sprawdzony antyvirem
Można do tego wykorzystać makro zdarzeniowe, na przykład takie: [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) Dim cel As Range Application.EnableEvents = False For Each cel In Target If Len(cel) > 0 Then If Left(cel, 1) <> "'" Then cel.Value = "'" & cel.Value End If Next cel Application.EnableEvents = True End Sub...
Cześć Proszę pomóżcie. Jak napisać makro, które stwierdzi czy plik Excel na sharepoint jest otwarty przez innego użytkownika. Jeśli tak to makro ma wyświetlić msgboxa i zakończyć działanie. Mam napisane makro które dodaje dane do pliku excelowego na sharepoint ale jeżeli jakiś użytkownik ma otwartego Excela to makro się crashuje.
Dodałem jeszcze możliwość ukrywania kolumn z niepotrzebnymi dniami w miesiącu, aktualizację dni miesiąca na pasku jak również zmiana koloru na szary dni sobota i niedziela. UWAGA!, nie zmieniaj (nie dodawaj nie usuwaj żadnych kolumn i wierszy) bo to spowoduje że makro będzie niepoprawnie działać
Zacznij od nagrania makra, w którym edytujesz komórkę i wciskasz enter. Rejestrator przetłumaczy funkcje na ich zapis w VBA. Potem ubierz to w funkcję użytkownika (user function) - materiały do wyszukania na google, np.: [url=https://www.hintmine.com/jak-napisa...
Skoro potrzebujesz pomocy przy stworzeniu makra to pokaż co sam zrobiłeś chyba, że jednak potrzebujesz gotowca. W makrze możesz wykorzystać metodę Find, albo funkcję Podaj.Pozycję - Match (znajdzie się jeszcze kilka innych sposobów) do znalezienia szukanej komórki, a wtedy przesuwasz się offsetem o dwie kolumny i wpisujesz wartość.
Ok. Na aktywnym arkuszu jest OK. A co jeśli w docelowym pliku, arkusz z tymi datami jest ukryty? W takiej sytuacji powyższe kody się wysypują. Dodaję plik
A jak będą cudzysłowy, to trzeba je zdublować, poza tym nie tylko średniki wymuszają dodawanie cudzysłowów. Skąd wiadomo, co user będzie mieć w pliku?
http://office.microsoft.com/pl-pl/excel-...
Przecież możesz wpisywać kolejne daty np po przecinku lub po "alt + enter". "Kłopot" nie jest z możliwością wpisu tylko z wynikiem w komórce M2. Ale jeżeli o to ci chodzi to troszeczkę zmieniłem w tej komórce funkcję. Jednak jest zasada by datę zawsze wpisywać w tym samym formacie (zgodnym z formatem daty w excelu). Na marginesie bez sensu jest dodawać...
Witajcie, Czy ktoś pomoże mi stworzyć makro, które wyszukuje wszystkie listy rozwijane w pliku Excel (wszystkie arkusze) a następnie kopiuje do nowej zakładki każdą wartość z "listy" oraz dodaje nazwę range. Przykład w załączeniu... Dzięki.
Jeżeli masz zainstalowanego Adobe Readera, to po prostu zarejestruj makro w Excel-u, dodając na ekran nowy object : http://obrazki.elektroda.pl/9498049200_1... I zobacz co się zapisze. Potem możesz modyfikować ustawienia. Poszukaj w Google takiej frazy : "adobe pdf reader activex control vba".
Tak, jest to możliwe: [url=http://www.cpearson.com/excel/vbe.a...
Super. Kliknąłem podziękowanie :D. Dzisiaj w pracy przetestuję (nocna zmiana). Czy te makro dodajemy jakoś specjalnie do skoroszytu czy też normalnie na zasadzie makro/wstaw nowe?
Można napisać makro które po uruchomieniu będzie dodawało kolejną linię z danymi.
[syntax=vbnet]Sub Bazy() On Error Resume Next Dim a As Worksheet, b As Worksheet Set a = Sheets("Baza danych A") Set b = Sheets("Baza danych B") a.Select owa = Cells(Rows.Count, "B").End(xlUp).Row owb = b.Cells(Rows.Count, "C").End(xlUp).Row For x = 5 To owa w = "" w = Application.Match(Cells(x, 2), b.Range("C5:C" & owb), 0) + 4 If w > 0 Then Cells(x,...
Proszę o przykładowe makro kopiujące pierwszy wyfiltrowany wiersz z listy do nowego arkusza. W nowym arkuszu wklejane wiersze muszą dodawać się jeden pod drugim wraz z datą ich kopiowania.
Witam wszystkich mam poważny problem z dodawaniem nowego wiersza za pomocą przycisku. Stworzyłem tabelkę, która zawiera wiele list rozwijanych i funkcji jeżeli to coś tam. Przycisk z odwołaniem do Makra dodaje mi kolejny wiersz zachowuje listy rozwijane ale nie przenosi funkcji i pojawiają się puste komórki. Czy może ktoś wie jak powinno wyglądać prawidłowe...
Wcześniej znalazłem komendę którą wpisywało się do do okienka uruchom, która aktywowało plik vba6.dll Pewnie chodzi o rejestrację biblioteki w systemie - sęk w tym, że rejestrujesz w ten sposób jakąś starszą wersję biblioteki, która nie istnieje/lub nie jest zarejestrowana/ w systemie. Pisząc makro od początku w nowym pliku nie powinieneś mieć żadnych...
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...
Wiesz co, za daleko to poszło tu pojawiają się jeszcze inne błędy. Musze to przemyśleć od początku. edit ----------------------------------------... Trzeba było tak zrobić od początku - nie było by tylu problemów. Skróciłem formułę ale dodałem "zamianę" danych co jest logiczne: Jeżeli godzina końca jest mniejsza od godziny początku to znaczy, że godzina...
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)....
Idealnie, Dziękuję Ci bardzo ;] Dokładnie o to mi chodziło. Mógłbym Cię jeszcze prosić o dodanie do tego kodu, opcji która dodawałaby date kopiowania w 17 kolumnie kopiowanego wiersza?
1. Ustawiasz w arkuszu układ danych, tak aby jak najlepiej pasował ci do wyliczeń 2. Określasz i deklarujesz typy zmiennych - jeśli będziesz je wykorzystywać 3. Zliczasz ilość komórek z danymi (liczby) 4. Dla średniej arytmetycznej wykonujesz dodawanie liczb, a następnie podział sumy przez ilość komórek z danymi (liczby) 5. Dla średniej kwadratowej...
a czy ten sam kod będzie działać pod openoffice? bo wchodzę w openoffice w narzędzia->makra->zarządzaj makrami->makro i dodaje tam ten kod i nie bardzo to chodzi ;/
Tu masz konwerter (Jak będzie po angielsku to przełącz na polski): [url=https://www.microsoft.com/pl-PL/dow... do konwertera Co do załączonego pliku i makra. Makro w tym pliku "tworzy" a raczej włącza zwykły filtr - nic więcej > nie jest konieczne byś włączył filtr makrem. Możesz to zrobić ręcznie (Patrz arkusz2 ). Zaznacz u...
Jak zmienić mu "For wrs = 1" na "For wrs = "zależne od ostatnio wczytanych danych - od ostatniej pozycji w kolumnie A Przez podstawienie Nr ostatniego wiersza do licznika pętli, 'For wrs = Range("A" & Rows.count).End(xlUp).Row to ....' Musiałbyś tylko sprawdzać, czy nie jest większy od drugiego argumentu (pętla pojedzie wstecz), lub dodawać stałą liczbę.
Po analizie Twojego nowego załącznika spróbuje coś podpowiedzieć więcej. Wprawdzie autor postu nie odpowiada na szczegółowe pytania - ale "słowo się rzekło - kobyłka u płota" :D Plik przeanalizowałem i wg mnie takie funkcjonalności jakie opisywał m4xon zależy mi żeby makro zawierało listę funduszy (kodów), które można powiększać o kolejne nowe lub...
Załączam przykładowy plik excela z makrem liczącym ilośc znaków w zadanym zakresie arkusza. Wynik podawany jest w drugim arkuszu. Makro wybiera kolejno komórki z zakresu, liczy liczbę znaków w poszczególnych komórkach i dodaje narastająco liczbę poszczególnych znaków z zakresu. Arkusz można dostosować do swoich potrzeb, np. wynik podawać w tym samym...
otwiera się Arkusz 2 zaznaczając pustą komórkę kolumny B (ewentualnie dodaje nowy pusty wiersz) Patrząc na załączony plik nie mogę zrozumieć w jakim celu chcesz zrobić to makro :?: :cry: Jeśli chcesz szybko weryfikować odniesienia do arkusza 2 to najprościej proponuję makro w arkuszu 1 :spoko: : [syntax=vbscript]Private Sub Worksheet_BeforeDoubleClick(ByVal...
wyskakuje jeszcze błąd z tą samą nazwą arkusza W Skoroszyt zawierający makra zostawić tylko jeden arkusz i dać mu jakiś unikatową nazwę(ale Excel, sam zmienia nazwę (dodaje (2)), a następnie zmiany nazwy na nazwę skoroszytu) Chcesz wybrać pliki indywidualnie? Wtedy [syntax=vb] Sub zbior() Dim wb As Workbook Do fl = Application.GetOpenFilename("ExcelFiles....
Przy założeniu, że arkusz składa się z nazwy stałej i daty, najprostsze makro wygląda mniej-więcej tak: nazwa_stala wpisz swój stały fragment nazwy. Dopisz sobie dodatkowe warunki które będą uwzględniały np. kilkukrotne uruchomienie makra tego samego dnia itp. aby nie wyskakiwały błędy
Iistnieje, że wszystko jest możliwe... Dodaje Pan coś jeszcze? Bo nie chce za każdym razem ponownie przepisać. Czas zmarnowany
Co do drugiego - funkcja trzynasty miesiąc traktuje jak 12+1, a 12 = rok, czyli dodaje do roku jedynkę. Jest to wtedy nadal data. :)
Witam! Proszę o pomoc w napisaniu makra, które będzie uruchamiane za pomocą przycisku. Zadaniem makra będzie dodawanie wartości z pól: K5-K25 do pól C5-C25. A następnie makro to ma czyścić dane z pól K5-K25....
Po Next dodać [syntax=vb] .Cells(w,1).value = .Cells(w-1,1).value + 1[/syntax] Powinno działać. Pamiętaj tylko, że gdy w = 1 dostaniesz error, bo spróbujesz się odnieść do Row = 0. Oraz, jeśli ta komórka nad nie będzie liczbą(bądź pusta), a spróbujesz do niej dodać 1. Można temu zapobiec dodając kilka If'ów. Jednakże myślę, że nie jest to takie znów...
Powiedzmy że działa - potestuj. Trochę info o pliku: Podstawa: Makro sprawdza w nagłówku (w wierszu drugim) gdzie jest tekst "Zadanie" i "Grupa interwencyjna" jak również w wierszu trzecim szuka ostatniej niepustej komórki. (po tym rozpoznaje ile jest poszczególnych kolumn. Jeżeli zmienisz nazwy dodawać dowolną ilość kolumn do zadania i do pracowników....
Tak samo F11. W oknie po lewej stronie dodajesz nowy moduł, a w treści po prawej wklejasz potrzebne makro. ----------- Miało być ALT+F11 ;)
Przepraszam że się wtrącam koledze adamas_nt'owi :) Przyznam że na podstawie makra podanego przez kolegę adamas_nt autor mógłby się pokusić o samodzielne stworzenie drugiego makra ale... dobry będę i dam w załączniku gotowca (Rozwiązań jest dużo ale jak zaznaczyłem makro jest podobne do wcześniejszego żeby było łatwiej zrozumieć - jeżeli oczywiście...
Dzień dobry, Bardziej naturalne wydaje się być proporcjonalne "rozciągnięcie" osi x niż dość sztuczne dodawanie wartości y. Trzeba przeliczyć wartości x drugiej serii i nanieść obie serie na wykres punktowy (xy). Proszę zobaczyć załącznik. Pozdrowienia
Witam, mam w sumie prosty problem ale nie wiem jak go ugryźć. Mianowicie: potrzebuję stworzyć makro , które będzie zaznaczało kolumnę do ostatniej nie pustej (ctrl+shift+arrow) wykonywało pewne działanie (powiedzmy dodawanie wartości w dwóch sąsiednich komórkach) i wyrzucało wynik w nowej kolumnie, ale tylko do wiersza, który jest nie pusty. Chodzi...
(at)maciejgonet Dzięki wielkie za pomoc! Miałbym jeszcze tylko pytanie co do działania całego makra. Czy da się z niego wyeliminować zapisywanie w historii sytuacji kiedy ktoś dodaje nowy wiersz? Makro oczywiście wtedy działa tak jak powinno i zapisuje zmiany, czyli zapisuje np. 16000 pustych komórek które zostały dodane przez wstawienie nowego wiersza....
Wygląda mi to na jakieś "kombinowanie" i, znając życie, nie będzie to działało tak, jak chcesz - bo zaistnieją jakieś warunki, których teraz nie przewidzisz, ale tak na szybko można próbować takim makrem, jak w załączniku. Cała "sztuka" to dodawanie / usuwanie wierszy od końca, żeby zakres się w pętli nie przesuwał. Usuwanie zakłada, że usuwasz wiersze,...
Masz tam dwa rodzaje makr - jedna grupa tylko zmienia kolor tła, druga grupa zmienia kolor tła i dodaje tekst. Nie wiem, czy chcesz ograniczyć działanie wszystkich makr do kolumn C i L, czy tylko tych, które wpisują tekst. W każdym razie do każdego z makr, które mają mieć ograniczony zakres dopisz na początku (pod nagłówkiem) takie 3 wiersze: [syntax=vbnet]...
O ile dobrze zrozumiałam Twoje pytanie... Sub Dodawanie() ' makro odczytuje aktualną zawartość komórki c1 liczba = Range("c1") 'teraz dodajemy zawartość komórki a1 wynik = liczba + range("a1") range("c1") = wynik End sub Potem kwestia jak chcesz uruchamiać makro - guzikiem czy też ma być...
Próbuje napisać makro, ale z uwagi na brak wiedzy odnośnie najprostszych poleceń nie umiem sobie poradzić. Wydaje się, że makro jest dosyć proste. Mianowicie: 1.Istnieje ciąg wyrazów w arkuszu A (CEL) 2.Po tych wyrazach przeszukuje arkusz B (BAZA) 3.Gdy znajduje to kopiuje wartość stojącą przy wyrazie w arkuszu B. 4.Wstawia ten skopiowany wyraz w kolumnie...
Hej, mam problem z hasłem na pliku excel. Mam makro zakładające hasło Sheets("DATA").Select ActiveSheet.Unprotect "HASŁO" teraz chciałabym zezwolić na odblokowanie edycji arkusza - mianowicie zmiany kolorów, czy ukrywania kolumn. Gdy ręcznie zakładam hasło na pliku mogę w checkboxach zezwolić na edycję danych i określi zakres, które mogą być edytowane...
Odwdzięczysz się klikając "pomógł" Koledze adams_nt , który zapodał kod ;) Kod w skrócie sam się udokumentował ;), widzę po fladze że Kolega z UK, więc wystarczy komendy przetłumaczyć, bo moje tłumaczenie może nie być zbyt jasne ;) Kolejne linijki: 1. pętla For Each przechodzi po każdej kontrolce znajdującej się na formie (Me.Controls) i zapisuje ją...
Udało mi się wykombinować coś takiego: [syntax=vbscript]Private Sub Workbook_NewSheet(ByVal Sh As Object) ActiveWorkbook.Sheets("Template").Copy After:=ActiveWorkbook.Sheets("Template") On Error GoTo Wrongname i = 0 Start: ActiveSheet.Name = Date + i Exit Sub Wrongname: i = i + 1 Resume Start End Sub[/syntax] Tylko ,że przy tworzeniu makra w NewSheet...
Witam! Od czasu do czasu korzystam z VBA lub po prostu rejestruję proste makro, żeby ułatwić sobie pracę. Ostatnio natrafiłem na problem. Zarejestrowałem proste makro ułatwiające dodawanie kolejnych odczytów do tabeli w arkuszu, który jest częścią większego skoroszytu, ale innych makro w nim nie ma. Ku mojemu zdziwieniu okazało się, że makro czasem...
inaczej spytam jak wkleić tekst do otwartego okna wiadomości ? wszystko gotowe pojawia się sygnatura adresy itd. tylko trzeba kliknąć wklej żeby pojawił się tekst jak to zautomatyzować Yasny gwint, czytałeś przykłady które Ci w poprzednim poście zlinkowałem? Przecież tam masz wszystko na talerzu. Wysyłanie maila z Outlooka poprzez makro VBA to jeden...
W załączniku jest procedura "sub elka", która jeszcze wczoraj wysypywała się na 10 indeksie. Przed momentem dorobiłem "resetowanie" ustawień i miałem zamiar zademonstrować przypisanie tablicy do listy (TblToList)... Coś mnie tknęło, spróbowałem wpisać bezpośrednio do listy i... zaczęło działać. Wczorajsze "złe" makro również. Wygląda na to, że ustawienia...
Dzięki wielkie. Imię dodaje tylko do pierwszego wiersza z danego skoroszytu. Ale najważniejsza jest prędkość. Zrobię testy i zaprezentuje wyniki:) Czas na wyniki testu:ść Ilość plików: 142 stare makro: 1. wczytywanie z formularzy: 35sek 2. Dodawanie: 1min 2sek Nowe makro: 1. wczytanie plus dodanie 20sek :D Podsumowanie: Podczas używania starego makra...
Jak macie zainstalowany MS konwerter z 2007 do 2003 to widać makro I tu jest mój problem. Na firmowym nie mam bo... konwerter jest do 2003 a używam 97 (firmowa oszczędność) :D Po powrocie do domu popatrzę jeszcze raz. Dodane: Unik jest kolekcją danych. W kodzie (mogę się mylić) jest tylko deklaracja. Zabrakło mi jej utworzenia. Add to metoda dodawania...
Zapomniałem że na pliku docelowym do którego mają być przeniesione wartości jest hasło - aczkolwiek hasło jest tylko na wyświetlanie kodów VBA - wydawało mi się że niema to żadnego znaczenia skoro to w pliku pobrania - COŚ NIE DZIAŁA jest makro, które ma przenosić dane do tego drugiego pliku (Raport POBR) Dodaje raz jeszcze pliki tym razem bez żadnego...
Hej Wracając do wydruku raportu to tak tylko ten jeden warunek wystarczy a mianowicie ta data bo jest to potrzebne do poglądowego wydruku ilości przyjętych w danym dniu. A co do PZ to posiedziałem trochę nad nią i odwzorowałem dokładnie taką jaką używamy teraz w wersji papierkowej. Dołączyłem do pliku który podsyłam i ten arkusz nazwałem osobno wzór...
czy jest taka funkacja w excelu ktora dodaje liczby z 1 i 2 kolumny i wyswietla w tej pierwszej kolumnie? Zwykłą funkcją dodawania zapętliła by się. (Zauważ że po czymś takim zmienia się liczba w 1 kolumnie czyli wynik znowu by się nie zgadzał czyli znowu trzeba dodać i tak w kółko ...) Rzeczywiście to rozwiąże tylko makro (dodawanie w pętli dla poszczególnego...
Sprawdź, jak to działa (załącznik). Nie wiem, jakbyś chciał liczyć ceny. Ja założyłem, że: - mamy na przykład 3 dostawy po 10 sztuk towarów, pierwsza dostawa ma towar za 1pln, druga ten sam towar za 2pln, trzecia ten sam towar za 3pln, to wtedy: - w przypadku, gdy ktoś kupuje po jednej sztuce, pierwsze elementy będą miały liczoną cenę zakupu 1pln, po...
Witam, potrzebuje takie makro, które: --> pobiera z Arkusza1 z kolumny z lp ostatnią wartość np: 3 czy 300. (w zależności ile pozycji będzie wprowadzonych). --> mając ostatnią wartość lp wykonuje operację kopiowania w Arkuszu2 wierszy 2-5, dodając je na koniec czyli do wiersza 6. Operacja będzie wykonywany tyle razy ile wynosi wartość lp. Z góry dziękuje...
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...
Proponuję po numerze działki, po komunikacie typu, np.: a) Dodawanie - "Wpisz nr działki poniżej której ma zostać dodany wiersz" b) Usuwanie - "Podaj nr wiersza, który ma zostać usunięty" Nr działki podawałbym przy każdej uprawie w jej obrębie, po co "dziurawe" dane ?
po wpisaniu pozycji której nie ma na liście pokazuje się komunikat "nie ma tego na liście" i tak miało być ale po zamknięciu wyskakuje mi komunikat : "invalid property value" co moge z tym zrobić? i jeszcze jedno: po wpisaniu pozycji której nie ma na liście pokazuje się komunikat "nie ma tego na liście" udało mi się napisać makro które dodaje nową pozycję...
Francuzi może i nie zmieniają, ale dane do arkuszy są generowane na różnych komputerach z różnych źródeł i nie wiem czemu ale znaki się zmieniają. To nie generuj nowych arkuszy tylko dodawaj kolejne napotkane wersje tych znaków, po jakimś czasie będziesz mieć taki zestaw który przekoduje wszystko co się da.
Zrobiłem to tak że program wybiera z tabelki po prawej inicjały (4 pierwsze znaki) czyli jak w tabelce jest J.K. to wybiera te inicjały. I przeszukuje kolumnę K w poszukiwaniu zgodnych inicjałów, (też 4 pierwsze znaki) czyli jak jest( J.K. data) to wybierze tylko "J.K." i dodaje do licznika pozycji zleconych. Dodatkowo jak kolor czcionki jest czerwony...
Witam, mam taki problem. Udało mi się jakoś napisać makro dzięki któremu dodaję nową pozycję do bazy (jak w załączniku). Wszystko działa dobrze jak dodaję jedną pozycję, jeśli chcę dodać kolejną pozycję pojawia się błąd i program się wyłącza. Domyślam się, że musi tu być jakaś pętla. Dodawanie pozycji do bazy odbywa się klikając na przycisk "Wstaw dane...
Witam , mam taki problem i uparłem się żeby rozwiązać go w excelu. Muszę utworzyć plik do którego dostęp będzie miało kilkunastu pracowników. Osoby będą dopisywać kolejne wiersze w pliku. Chodzi mi o takie zabezpieczenie wpisów że dostęp do danego wiersza będzie miała osoba która dany wiersz zapoczątkowała - dla uproszczenia przyjmijmy że w pierwszej...
Sub ZamienNaHiperlink() Dim komorka As Range Dim nazwaPliku As String Dim sciezka As String Set komorka = ActiveCell If IsEmpty(komorka.Value) Then MsgBox "Aktywna komórka jest pusta.", vbExclamation Exit Sub End If nazwaPliku = Trim(CStr(komorka.Value)) ' Buduje pełną ścieżkę z podwójnymi ukośnikami sciezka = "file:///D:\as\" & nazwaPliku &...
masz rację, załączam bardziej dopracowany obrazek. Zasady dodawania fotografii znajdziesz tu:
Czyli wstawianie arkusza opanowane. Teraz mamy wpisywać *jakieś* dane w jakiś sposób. Można założyć, że linia po linii (ale to założenie wynikające tylko z kontekstu wcześniejszych postów). W jaki sposób działa teraz wpisywanie do jednej linii? Makro, które już Kolega posiada zaczyna wpisywać od komórki, która jest aktualnie zaznaczona i wypełnia ileś...
"dodawanie" (Arkusz 3, G2) dodawało go automatycznie do listy do Arkusz1 jako kolejną pozycję Tylko, że musisz zablokować makro, które tam występuje (Blokada). Zmiana nazw zakładek: ''Arkusz3''=>''Odczyt skanerem''; ''Odczyt skanerem''=>''Lista'' 885424
W tabeli uzupełniłem wszystko jest procentowo przykład 18 sierpnia zrobiłem wszystko 10 % a teraz nastepnego dnia powiedzmy że w procentach wszystko zmienie na 30 % więc różnica między 18 a 19 sierpnia powinna być podana i tak każdego dnia a nie chcę każdego dnia do każdego wiersza dodawać nowej daty bo niektóre rzeczy mogę robić przez miesiąc
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...
Witam Jak napisać makro które będzie przeszukiwało kolumnę A i B http://obrazki.elektroda.pl/4124127900_1... Jeżeli w kolumnie B będzie więcej niż jeden ciąg znaków to dodaje wiersz i scala komórki jak na zdjęciu poniżej wartość z komórki A wkleja do scalonej komórki a wartości z kolumny B z danego wiersza wkleja do oddzielnych komórek...
Odpuszczam z tymi stronami, stworzyłem sobie szblon i makro które bedzie samo nadawało numer. Żeby nie zaczynać nowego tematu, mam jeszcze jedno pytanie. Czy można stworzyć przycisk makro, z funkcją wyszukaj. Tak, żeby można było wpisać szukane hasło i wyszukać je w arkuszu jak to się robi przy pomocy ctrl+f
potrzebujesz pomocy z kodem w VBA czy szukasz kogoś kto napisze całe makro? Dodano po 1 Przygotowałem w zasadzie bardzo proste makro: Kopiuje Twój arkusz "x1" (nazwałem go "Template") i w nim zmieniam tylko dane. Nazwę nowego arkusza biorę z arkusza "Wyświetlenie odczytów" z kolumny A czyli "Lp." ale idzie to łatwo zmienić w kodzie (dodałem tam komentarz)...
Coby ułatwić Ci życie, a chętnym do sortowania je umożliwić wprowadź w swoim pliku kilka zmian. Główna to nazwanie zakresów, rezygnacja z formuł w nazwiskach i wydziałach i formuła licząca ilość szkoleń dla poszczególnego ludka. Na arkuszach zakresy zaznaczone są kolorami. Możesz je sobie dowolnie definiować pamiętając tylko, żeby były jednakowych rozmiarów....
Ale mnie chodzi o Makro wstawiające do bieżącego Skoroszytu (Zeszytu) Makro we we właściwości: Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) No i w czym problem? Ja podobnie jak adamas_nt nie rozumiem problemu... plik1.xls ok plik2.xls ok plik3.xls ok
Na pierwszym arkuszu umieszczamy listę Combo. Żeby wyświetlić listę arkuszy można to zrobić w makro, które ładuje listę Combo przy otwarciu skoroszytu, w obsłudze zdarzenia Workbook_Open: [syntax=vb] Option Explicit Private Sub Workbook_Open() Dim iWiersz As Integer Dim ws As Worksheet iWiersz = 1 'Utwórz listę arkuszy w pierwszym arkuszu od drugiego...
To nie było gotowe rozwiązanie, ale schemat podzielenia nazwy pliku, oczywiście w ten sposób możesz też podzielić nazwę pliku. Tak, potrzebna jest pętla. Mniej więcej taki algorytm musisz pomyśleć gdzie to wkleić, bo część już masz zrobione 1. Wyszukujesz plik są różne sposoby wyszukania i w związku z tym różne konstrukcje pętli. 2. Jeżeli jest plik...
Witam, jestem tutaj nowy. W Excelu poruszam się biegle, ale mam problem z Makrami i VB. Mam dwa pliki. Plan produkcji.xls w nim arkusz Produkcja i tam ma różne dane. Drugi plik to Zrobione.xls i arkusz zrobione. Chciałbym, aby w pliku zrobione po uruchomieniu Makra wypisało mi wszystkie arkusze ze statusem GOT. który jest w kolumnie N pliku Plan produkcji....
Odświeżam tematy, ponieważ nie potrafię sobie poradzić z tym kodem do końca. W temacie poprosiłem o makro, które automatycznie włączy trub projektowania. Kolega (at)PRL dał link, w którym jets makro, które włącza ten tryb. Do tej pory było dla mnie to wystarczające, ale teraz próbuję to rozgryźć i nie potrafię, pewnie w linku jest na to odpowiedź, ale...
możesz wygenerować... makro? chyba tak się to nazywa - działa podobnie jak ustawienie, że liczba w komórce będzie ceną i program sam dodaje znak waluty. niestety nie wiem jak to zrobić w Excel'u, sam używam OOo
makro dodawanie excel dodawanie excel makro dodawanie kolejnego wiersza
filtr powietrza civic dekoder nagrywania ekspres delonghi wyciek
galaxy dimension galaxy dimension
Czujnik MAP – funkcja, skutki ominięcia, objawy usterki, prawo, Bosch, MEMS, OBD-II Toyota Starlet 1.3 1998 – czujnik MAP Denso 89420-10010, objawy, diagnostyka, wymiana
