Witam, mam zadanie - napisać makro, ktore wywola dowolny formularz stworzony jako userform [syntax=vb]Sub wywolanie_formularza() Worksheets("Arkusz1").Activate UserForm1.Show End Sub [/syntax] Czy o to chodzi? Nie mam mozliwosci sprawdzenia dzialania ze wzgledu na to, ze nie mam w domu odpowiedniego oprogramowania :/ ...
zależy mi żeby makro zawierało listę funduszy (kodów), które można powiększać o kolejne nowe lub odejmować niepotrzebne. Makro będzie miało za zadanie usuwać wszystkie fundusze/kody inne niż na liście. Czy ja dobrze rozumiem kolego "m4xon", że oczekujesz żeby na forum ktoś sporządził Ci listę funduszy unijnych ? :D A na poważnie to gdybyś zamiast pustego...
Po pół godzinie wczytywania się załapałem (chyba) o co chodzi. Po pierwsze czy aby na pewno nie będzie interesowało cię za co klient zapłacił? Bo czyszczenie danych i przygotowywanie do kolejnego "wpisu" zlikwiduje szczegóły (składowe) danej wpłaty. Druga rzecz związana z brakiem sumowania. Może jest błędna formuła (nie uwzględnia wszystkich komórek)...
Proszę o pomoc. Mam taki problem: Jakie przypisać makro do CommandButton1, CommandButton2, .... znajdujących się w UserForm, aby po przyciśnięciu każdego przejść odpowiednio do "Arkusza2", "Arkusza3", .... . Z góry dziękuję za pomoc Pozdrawiam
Witam wszystkich, jako że dawno nie miałem okazji popracować z makrami to niestety pojawił się problem potrzebuje napisać makro które przeszuka cały skoroszyt z 41 arkuszami i aktywuje ten który w komórce B1 ma taką samą datę jak w userform wpisaną w textbox. Dzięki za wszystkie podpowiedzi.
Panie Macieju, wrzucam plik. Makro jest w UserForm w przycisku "Zaloguj" Login: Jan1 Hasło: 12
Witam, Pracuję od dłuższego czasu nad makrem i niestety napotkałem kilka znaczących problemów, których pomimo szukania nie mogę zlikwidować. Makro działa w następujący sposób: 1. Po kliknięciu ikony pojawia się UserForm, który posiada różne opcje do wprowadzenia pewnych wartości do arkusza. 2. Wybieram przycisk "RUN", który odpala makro- makro ma za...
To jest fragment kodu do przycisku w formularzu użytkownika (Userform) w dokumencie Word. Zadaniem tego bloku kodu jest wstawienie do dokumentu wartości podanych w userformie i przywołanie procedury wstawiającej kwotę słownie. Jeśli zaś użytkownik dane okienko w userformie zostawi puste, albo wpisze 0, to makro ma w tylko skasować zakładkę. Niestety,...
A czemu ta indeksacja nie działa? Czy może mieć na to wpływ fakt, że ten userform jest w Wordzie? gdy wpisuję taki kod (dla uproszczenia w funkcji zamiast dodawania do tablicy będzie msgbox): For i = 1 to 8 if checkbox(i).value = true then msgbox checkbox(i).caption else end inf next to przy uruchamianiu kodu zaznacza się na niebiesko "checkbox" i wyskakuje...
Nie do końca ogarniam twoje nazewnictwo Rozumiem że dla ciebie "makro" to jakaś procedura (Sub) ewentualnie zbiór procedur w Module natomiast "UserForm" to inaczej twoja formatka w której też mogą być zapisane procedury i funkcje ale ograniczone działaniem do tej formatki. Jeżeli Makro1 uruchamia UserForm a Marko2 uruchamia UserForm3 to pod przyciskiem...
a jak uruchomię UserForm to na liście nic się nie pojawia ;/ Zmień zdarzenie Private Sub UserForm_Initialize()
Proponuję użyć formularza UserForm i tam umieścić te InputBoxy i ComboBox.
Dzięki za szybką odpowiedź pomogło ale jest jeszcze jeden problem. Opiszę to dokładniej. Makro szukaj uruchamiane jest z komórki "B12" i przez InpudBOXa szuka podanej wartości. UserForm szukaj ładowany z makro szukaj w którym jest ta pętla ma 5 przycisków CommandButton z czego: szukaj_dalej ma przeszukiwać pętlę a pozostałe zakończyć makro szukaj i...
Super właśnie tak chciałem żeby to działało. Wielkie dzięki. Mam jeszcze jedno pytanie czy jest jeszcze możliwość żeby na tym UserForm dodać przycisk "POWIĘKSZ" po kliknięciu którego otworzy się okno z powiększoną grafiką z pierwszego userform????
Witam Tworze makro które będzie otwierało skoroszyt o zmiannej nazwie, wykonywało w nim kilka operacji typu filtrowanie itd a potem przenosiło z niego pofiltrowane dane do pliku w którym uruchamiałem makro. Arkusz w którym będzie uruchamiane makro też będzie miało zmienną nazwę niestety. Teraz mam problem ponieważ po otwarciu pliku z makrem uruchamia...
Hmm "wartość szukana" w kodzie, jest deklarowana przez użytkownika, on wpisuje w ImputBox wymiar, następnie makro szuka w tablicy, jeśli jest to wymiar z tablicy odpal makro1, jeśli nie to makro 2:) chyba o to mi chodziło, dzięki chłopaki:) Dodano po 2 Oj nie z ImputBox tylko z UserForm
Słowem: korekta OstW (walek33) i UserForm zamiast MsgBox (marek003)...
Cześć, Robię makro na uzupełnianie tabeli. Zdjęcie z arkusza na brudno: https://obrazki.elektroda.pl/2080443500_... Chciałbym żeby wartości z UserForma zostały wklejone do tabeli w takich sposób żeby nie zastąpiły danych, które już w niej mogłyby być. Próbowałem: [syntax=vbscript] Private Sub CommandButton1_Click() Dim NowyWiersz As...
Kolega cbrman rzucił dobrą myśl. W przykładzie poszedłem ciut dalej. Lista w UserForm uruchamiana podwójnym kliknięciem. Spróbuj...
W jaki sposób zmienić makro aby rozpczynało dalsze szukanie od następnej kolumny ? Wydzielono z
Mam wybieraną listę To pokaż ją w załączonym pliku. Jeżeli masz użyty jakiś UserForm lub kod VBA - koniecznie skompresuj ten plik przed zamieszczeniem na forum :!:
Witam Do formatowania dat w TextBox-ach używam poniższego makra. Jak zrobić, żeby takie jedno makro działało na wielu TextBoxa-ch o różnych nazwach? Potrzebuję, aby to makro działało na około 60 TextBox-ach. Jak mogę dodać je do tego makra? [syntax=vb]Public Function FormatyDat() As String With UserForm .TextBox = Replace(.TextBox, "-", ".") .TextBox...
Witam ponownie, Chcialbym poprosic was o pomoc w dwoch kwestiach. Po pierwsze, czy jest mozliwosc zmiany kodu tak aby przyspieszyc dzialanie makra? (wszystko fajnie dziala przy nieduzej ilosci danych, niestety w tym przypadku ilosc wierszy w arkuszu "Baza Danych" zawsze bedzie przekraczala 10 tysiecy przez co czas wykonania zadania zajmuje okolo pol...
makro wstawia, w głównym menu mam przycisk "WYPOŻYCZ" po kliknięciu otwiera mi się userform po przez userforma wypełniam imie ,nzawisko, wybieram z comboboxow reszte, date, godzine i wprowadza mi do historii pobran, jedynie ZWROT wpisuje ręcznie i oblicza mi całościowy czas wypożyczenia
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".
marcinj12 , nie wiem czemu Twój kod nie chciał u mnie zadziałać... :?: Dałeś mi jednak punkt zaczepienia. Trochę pogłówkowałem i zmieniłem jego pierwszy wiersz, teraz działa... [syntax=vb]Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Column > 2 And Target.Column < 6 Then UserForm1.Show End If End Sub [/syntax] Musiałem...
Witam Po pierwsze zmiany w makro symbole narodowe na angielski w związku z tym mogą być błędy TextBox3.Value == w polu tekstowym tekst zawsze. trzeba przerobić na numer Ponadto sprawdź różnicę - arkusz -> Target(i).NumberFormatLocal = PodajFormat(.... makro -> Label3 = PodajFormat(..... Spróbuj oddzielnie - Label3.caption = format( 3, "0.000")
Witam Jesli chodzi o vba i makra jestem mocno początkujący ale zastanawia mnie to czy istnieje kod który będzie powtarzał czynność w kolejnych arkuszach o innych nazwach. Chodzi o to,że mam trzy arkusze dane wejsciowe , zmiany, dane po zmianach. I chciałbym aby ten ostatni arkusz był nowym wyjściowym dla kolejnych 2 (zmiany 2 i dane po zmianach 2) itd....
zakomentuj w całem programu podobne [syntax=vb] Application.Run "'Stale i stopy - obliczenia.xls'!ATEST.ATEST" Application.Run "'Stale i stopy - obliczenia.xls'!STAL.STAL" Application.Run "'Stale i stopy - obliczenia.xls'!ZAPIS.ZAPIS" [/syntax] Sprawdź czy Excel się zawiesza . rozkomentuj, jeden przez jeden i Sprawdź. Ponadto przyciski na pierwszym...
Czy te przyciski są osadzone bezpośrednio w arkuszu? Jeśli tak, można napisać kod, który (w wyniku odpowiednich działań) będzie ukrywał /odkrywał komórki, na których jest osadzony dany przycisk. Można też utworzyć formularz UserForm (lub dwa – niezależne), na którym będą umiejscowione przyciski . Formularz może się uaktywniać w zależności od pewnych...
Pod przycisk "Wybirz Zdjęcie" (piszę jak widzę ;) Podepnij makro z FilePicker'em, lub czymś podobnym. [url=https://msdn.microsoft.com/en-us/li... Argumentem 'LoadPicture' jest string, więc podstaw...
Chciałbym odgrzebać temat. Powyższe makro bardzo mi się przydało. Chciałbym dorobić przycisk NEXT. Jak przerobić to makro żeby w textboxie pokazywała kolejno jedną znalezioną pozycję? Po wciśnięciu następną aż do końca, a wtedy msgbox z info, że to koniec obszaru?
witam, proszę o pomoc, moja cała znajomość programowania ogranicza się do znajdowania i dostosywania formuł - kiedyś znalazłem i dostosowałem do swoich potrzeb makro do wprowadzania danych w arkusz za pomocą userform z przyciskami do przechodzenia między wierszami, wstawiania i kasowania wierszy - ogólnie bardzo fajny programik. niestety po skopiowaniu...
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. Chciałbym się zapytać w jaki sposób uruchomić makro w kodzie programu w VBA. Tworze w userform grę w szachy i przy kliknięciu danego pola szachownicy (label) kod programu sprawdza czy to pole było wcześniej kliknięte i jeśli tak to wykonuje różne polecenia. Problem pojawił się gdy muszę "pokolorować" całą szachownice od początku. Jest to kilkanaście...
Private Sub KategorieWydatków_Click() Range("C2") = KategorieWydatków.Value End Sub I niestety jak uruchomiłem pierwsze makro wyświetla listę ale jak klikam na wartość z listy niestety nie wstawia się ona w komórkę C2. Witam KategorieWydatków.Show tak masz nazwany userform a listbox też ma taką samą nazwę?
Witam wszystkich napotkałem na problem z którym nie mogę sobie poradzić. Stworzyłem UserForm i dołożyłem do niego przycisk. Przycisk uruchamia makro, które tworzy etykietę i umieszcza ją w ramce "il1". Kod makra wygląda tak: Dim lbl6 As Control Set lbl6 = il1.Controls.Add("Forms.Label.1") With lbl6 .Top = 85 .Left = 220 .Height = 10 .Width = 40 .TextAlign...
Witam piszę proste makro mające pisać słownie wartości liczbowe zawarte w komórce excela. Osoby, które będą używały tego makra mają małe doświadczenie z excelem, dlatego chcę maksymalnie uprościć interfejs. Chodzi mi o to, żeby można było wybrać komórkę z której ma być pobrana wartość liczbowa i miejsce wpisania tekstu w taki sposób jak robią to formatki...
Dziękuję bardzo za zainteresowanie. W podanym warunku If trzeba określić "treść szukanej frazy". Nie wiem czy dobrze to zrozumiałem, ale nie mogę z góry znać szukanej frazy. Chyba, że czegoś nie rozumiem. Chodzi o to, że to co wpisuję przez UserForma w dwóch polach (txt4, txt2) nie mogę z góry określić, gdyż te dane nie są stałą treścią. Makro ma porównywać...
Macie jakiś pomysł, aby po kliknieciu w przycisk otwierało nowe okno do kontretnego katalogu i mógłbym wybrać odpowiedni plik, z którego skopiowałoby odpowiednie komórki do mojego arkusza ? Przykład W arkuszu Arkusz1 przycisk POBIERZ powinien pobierać dane z pliku z lokalizacji np. H:\CCC\ccc\ (jest w nim kilkanaście plików excel wiernej kopii arkusza...
Mam komórke C5 w której wpisuje numer zamówienia klienta :?: , wykorzystując do tego inputbox. Wszystko działa świetnei :?: do momentu, kiedy zamiast 6 produktów faktura ma 7 produktów Czarno to widzę ten Twój projekt przy takiej "precyzji" działania i opisu :cry: We wszystkich wariantach faktur z Twojego pliku w komórce C5 masz albo "datę wystawienia...
Moja baza pracowników zawiera około 1000 pracowników a każdy pracownik ma przypisane około 150 kolumn z przeróżnymi danymi. Baza jest aktualizowana prawie nonstop. Wolałbym utworzyć bazę danych w jakimś pliku tekstowym ale takim z którym dał bym sobie rady (przyznam że jeszcze nigdy czegoś takiego nie robiłem, do tej pory pracuję na bazie umieszczonej...
Witam. Mam dwa pytanka. W załączonym kodzie, makro tworzy mi 10 + 1 różnych list, a do tych list makro tworzy również odpowiednio nazwane zakresy. Jak zrobić aby to makro nie tworzyło nazwy zakresu dla drugiej pozycji? (ale tylko nazwy zakresu, lista ma być utworzona). Czyli dla: "xxx"? Drugie pytanko jest związane z możliwością wizualizacji w UserForm...
tylko że nie mam pojęcia większego o VBA i nie wiem jak zrobić lub jakiego hasła poszukać dla wyboru lub dodawania arkusza pytanie czy makro z openoffica zadziała: Sub WstawNazwanyArkusz() Dim Nazwa As Variant Nazwa = InputBox("Wpisz nazwę dla nowego arkusza:", "Nazwa nowego arkusza") If Nazwa = "" Then GoTo brak Else Sheets.Add.Name = Nazwa Exit Sub...
No i to cały kod: Private Sub ComboBox1_Change() End Sub Private Sub UserForm_Initialize() lista1 = Array("Oferta", "Zamówienie", "Specyfikacja", "Pismo", "Protokół", "Reklamacja") ComboBox1.List = lista1 lista2 = Array("mail", "osobiście", "faks", "DHL") ComboBox2.List = lista2 lista3 = Array("Daniel", "Łukasz C.", "Łukasz M.", "Sławek", "Wiesiek")...
Witam, mam plik z dwoma kolumnami z danymi. W pliku znajduje się Userform (niestety nie wiem, czy da się załadować plik z formularzami), przy pomocy którego wybieram kolumnę, z której chcę zsumować dane. Po wybraniu z listy wybranej kolumny uruchamiane jest makro sumujące dane oraz wyświetlające komunikat w postaci zsumowanej wartości. [syntax=vbscript]...
Patrz makro, tam 2 varianty
W kodzie formularza zostawiłbym tylko: [syntax=vbscript]Option Explicit Private Sub CommandButton1_Click() ActiveCell = ComboBox1.Value UserForm.Hide End Sub Private Sub UserForm_Activate() Dim r As Range Dim strr As Range With ComboBox1 .Clear On Error Resume Next Set strr = Range("ListaFiltrowana") For Each r In strr .AddItem r.Value Next r .DropDown...
Dzień dobry, mam utworzony excel z userformem. Skoroszyt działa w ten sposób, że podczas włączenia pliku w pierwszej kolejności pojawia się User Form. Użytkownik loguje się. Po zalogowaniu uruchamia się makro, które zmienia poszczególne zakładki z veryhidden na visible. Użytkownik wprowadza dane w odkryte zakładki, zapisuje plik i później wchodzi tak...
Pytanie 1. - (nie zalecane) obniżyć poziom zabezpieczeń makr. - (lepsze) ustawić poziom zabezpieczeń na najwyższy i podpisać makra. Pytanie 2. Jeżeli za userform uważasz arkusz "__MENU__" to najprościej: w ThisWorkbook: Private Sub Workbook_Open() Sheets("__MENU__").Act... End Sub Zamiast arkusza możesz otwierać każdy inny...
userform makro userform zapisać wywołanie userform
orange edimax osłona silnik dolny ciśnienia naczyniu przeponowym termet
Dane techniczne sprężarki WD-53: szczegóły i zastosowanie Z20NET B207 błędy P0201 P0202 P0203 P0204 na ciepłym silniku – Trionic 8, przekaźnik, wtryskiwacze
