Jeżeli CheckBox=True warunkowo ukrywa wiersze, =False odkrywa, to [syntax=vbscript] If CheckBox1 = True Then For i = 1 To lastRow If (StrComp(Cells(i, v_column).Value, "Scrap", vbTextCompare) = 0) Then Cells(i, v_column).EntireRow.Hidden = True End If Next i Else rows.EntireRow.Hidden = False End If[/syntax]
[syntax=vbnet]arkusz1.range ("a11").value = "*-*" Userform1.checkbox1 = (mid(arkusz1.range ("a11").value,1,1) = "*") Userform1.checkbox2 = (mid(arkusz1.range ("a11").value,2,1) = "*") Userform1.checkbox3 = (mid(arkusz1.range ("a11").value,3,1) = "*")[/syntax] Możesz też zapisać jako potęgi dwójki, np: binarne 101 czyli: arkusz1.range ("a11").value =...
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...
Private Sub CommandButton1_Click() Text = "" For Each ctr In Me.Controls If TypeOf ctr Is MSForms.CheckBox Then If ctr = "True" Then Text = Text + ctr.Name + Chr(10) End If Next ActiveSheet.Range("A1")... = Text Unload Me End Sub
uzyj OptionButton zamiast CheckBox
Co do pierwszego spróbuj tak TablicaCenniki(1) = "ABA" TablicaCenniki(2) = "..." .... nazwy_zmiennych = TablicaCenniki(1) 'tu będzie pętla temp = Form_AktCen.Controls(nazwy_zmiennych... W "dalszych konstrukcjach" jezeli już to tak bym uprościł: Chcesz kasować cały arkusz ? Jeżeli tak wystarczy:...
Dzień Dobry wszystkim, mam problem w swoim projekcie z pewną sprawą a mianowicie jak napisać komendę aby po zaznaczeniu jednego z kilku dostępnych CheckBox(np.1a) kontrolować wypełnienie danymi wybranych TextBox(np.1b) lub ComboBox(np.1c). Całość jest osadzona w UserFormie, ni chu chu nie wiem jak to napisać żeby się to zgrało w całość :-/. Początkujący...
Witaj. Sprawdź załącznik. Checboxy zastąpione czymkolwiek w kolumnie (może być X, może być cokolwiek poza pustym polem). Poprawność stawiania xów czy innych jest sprawdzana na bieżąco, więc jeśli spróbujesz postawić iksy dla dwóch różnych zamówień to wyjdzie błąd już w momencie stawiania. Nie jestem pewien, po co numer wiersza, wystarczy że masz w tabeli...
a po drugie chyba mniej skomplikowane będzie usuwanie tych z zakresu drugiej ramki No, może odrobinkę. W załączniku są dopisane oba. Procedury znajdują się w kodzie arkusza. W makro wstawiania nie ingerowałem, nadmiarowe CheckBox'y wyrzuciłem.
Całego arkusza nie dam rady wrzucić musiałbym tworzyć cały na nowo. Generalnie całe makro wygląda tak: [syntax=vbscript]Sub MarkCheckBoxes() Dim chk As CheckBox Dim ws As Worksheet Set ws = ActiveSheet For Each chk In ws.CheckBoxes If ws.Rows("149") = "Mandatory" Then If ws.Range("C" & chk.TopLeftCell.Row).Value = vbNullString Then chk.Value = False...
Witam Zmień z [syntax=vbnet]If ws.Range("C1:C140").Value = "" Then[/syntax] na [syntax=vbnet]If WorksheetFunction.CountA(ws.Range("C1:E1... = 0 Then[/syntax]
W załączniku. Dziękuję bardzo. To jest super, tylko próbując to zaimplementować do mojego arkusza, uświadomiłem sobie, że mam w sumie 15 pozycji (osób), które pojawiają się w zależności od wprowadzenia ich ilości (wpisując w określonej komórce liczbę mam tyle właśnie pól do wypełnienia. I teraz zrodził mi się problem, że musiałbym mieć 15 buttonów,...
Witam zmienić userform1 na userform, czy cokolwiek jest formularz, w którym jest checkBox Być może jest to FrmKomputeryStacjonarne i lepiej - If Typename(chb)="CheckBox" And chb.Value Then
Przypisz je do zmiennych globalnych lub stwórz arkusz pomocniczy (nawet ukryty) w którym poszczególna komórka będzie odpowiedzialna za poszczególny checkbox i przy inicjalizacji okna checkboxy będą pobierać dane z tego arkusza . (inne procerdury też mogą wtedy pobierać dane do swych działań na podstawie tego arkusza) Nie wiem czy w miarę zrozumiale.
Co tu wyjaśniać - masz przykład (Excel 2007). ...chyba, że masz te checkbox-y wprost na arkuszu (nie na formularzu użytkownika).
Np. przy inicjalizacji okienka/arkusza (bo nie napisałeś gdzie sią umieszczone boxy) wyłącz cztery checkboxy pozostawiając pierwszy. wersja dla okienka: "end sub" dla klikniecia checkboxa kod włączający kolejny checkbox. [syntax=vb]Private Sub CheckBox1_Click() For i = 60 To 64 If Columns(i).EntireColumn.Hidden = True = True Then Columns(i).EntireColumn.Hidden...
Spodziewałem się czekać kilka dni a tu już dzieki a powiedzcie jak to zaimplementować dla kilku kolumn, żeby jeden checkbox dotyczył wszystkich kolumn w wierszu przyklad
Private Sub CheckBox1_Click() Sheets("sheet2").Columns("G:G").EntireCo... = Not CheckBox1.Value End Sub można bez ".Value "
Ja tym czasem spróbuje rozgryźć działanie nie powiodło się To makro(checkb_XY) - pod warunkiem, że tabela jedna dowolnego rozmiaru i w górnym lewym rogu. det() określa rozmiar i umieszcza wartośći checkbox'ow. Poniewaz "w górnym lewym rogu" to warunek 'If t(1, x) Then' sprawdza checkbox w 1 wierszu ostatny(zaznacz wszystko). Masz w projekcie jednakowe...
https://stackoverflow.com/questions/1419...
VBA i możesz wszystko... [syntax=vbscript] Sub Polewyboru33_Kliknięcie() ' ' Polewyboru33_Kliknięcie Makro ' ActiveSheet.CheckBoxes("Pole wyboru 17").Value = 1 ActiveSheet.CheckBoxes("Pole wyboru 25").Value = 1 ActiveSheet.CheckBoxes("Pole wyboru 29").Value = 1 ActiveSheet.CheckBoxes("Pole wyboru 19").Value = 1 End Sub [/syntax]
Dla jednego pola nie jest to skomplikowane - działające makro to: Dla zakresu [syntax=vbscript]Sub elka() For Each c In Range("H8:H100") If c = "TAK" Then c.Offset(, -5) = True ElseIf c = "" Then c.Offset(, -5) = False End If Next End Sub[/syntax]
Jeśli tych checkboxów jest mało to można się bawić w coś takiego: [syntax=vbnet]Private Sub CheckBox1_Click() If CheckBox1.Value = True Then CheckBox2.Value = False CheckBox3.Value = False End If End Sub Private Sub CheckBox2_Click() If CheckBox2.Value = True Then CheckBox1.Value = False CheckBox3.Value = False End If End Sub Private Sub CheckBox3_Click()...
clubs - nie tak, jak zrobie tak jak piszesz to checkbox jest ciągle widoczny (niezaleznie czy wiersze sa widoczne ergo niezaleznie jaka jest wartość komórki sterującej "zwijaniem" wierszy)
Przykład (z kolumną pomocniczą) w załączniku. Dalej: w arkuszu wynikowym formuła oparta o funkcje: INDEKS, PODAJ.POZYCJĘ, WIERSZ. Podobny temat [url=http://www.elektroda.pl/rtvforum/to... Zwróć uwagę na kolumnę pomocniczą "L" oraz wynikową "I".
Przegrupowałem dane do wprowadzenia wg odpowiedziałności . Teraz możnaby ustawić Checkbox dla grupy wierszy i kolumn. Będę drążył ten temat w ksiażkach i na stronach.
Witam mam takie pytanko jak połączyć checkbox-y chodzi mi oto że w arkuszu 1 mam kilka checkbox-ów a w arkuszu 1 mam taką samą tabele i chce by wszystko było zassane z 1 arkusza + brak możliwości edycji. Dodatkowo by się nie wyświetliło okienko checkbox-a jeżeli nie ma przy tej pozycji w arkuszu 1. z góry dziękuje za pomoc.
i co nie chce się nikomu napisać jak ma wyglądać ten kod, czy taki pomysł jest niemożliwy??? Tak się zastanawiam: zwykłe lenistwo, podpucha na szukanie jelenia, czy... Kod jest żenująco prosty. Wystarczy powiedzieć/napisać co ma się dziać, przetłumaczyć na angielski i kod prawie gotowy. p.s. Na google pod hasłem "vba if checkbox" na dzień dobry masz...
Domyślam się, że dotyczy to formularza i pól wyboru. Spróbuj[syntax=vb]For Each ctrl In Me.Controls If TypeName(ctrl) = "CheckBox" Then If ctrl = True Then If i > 0 Then lst = lst & Chr(10) & ctrl.Name Else lst = ctrl.Name End If i = i + 1 End If End If Next Range("A1") = lst[/syntax]W arkuszu będzie podobnie.
Moim zdaniem sympatyczniejsze są formanty z przybornika. Można je łatwo kodować wpisując w obsłudze zdarzenia CheckBox1_Click() ukrywanie i pokazywanie pozostałych CheckBox-ów sprawdzając ich właściwość Value. Ukrywa się przez zmianę właściwości Visible.
Nie wiem jak inni, ale ja z tego nic nie rozumiem. Coś zmieniło się w międzyczasie? Skąd taka ilość CheckBox'ów?
A nie możesz tego teksty zawarte w komórkach nie można zamienić tak, żeby było jako teksty checkbox'ów? PPM na checkbox -> edit text
W Excelu takie zadanie można szybko zrealizować np. w oparciu o zdarzenie CheckBox1_Click() :D tzn. zmiana stanu checkboxa z False na True wywołuje wstawienie bieżącej daty :spoko: Jak widać na zrzucie checkbox = False więc pozostaje stara data :D 1091662 1091663 Spróbuj zaimportować ten plik do Google Sheets i być może zaimportuje się również to krótkie...
Sorki nie dopisałem chodzi mi o programowanie Excela w VBA!!! te uwagi będą również trafne w tym przypadku.
Cześć, Potrzebuję pomocy z zakresu Excel Otóż mam a'la cennik z dodanymi check boxami, które po zaznaczeniu aktywują komórkę w innym arkuszu na TRUE, a kolejne formułki liczą sumę wartości i pokazują ją na głównym arkuszu. Problem pojawił się, gdy z 13 (zakres wierszy od 19 włącznie do 31 włącznie) checkboxów muszę mieć możliwość zaznaczenia tylko 4....
błąd "type mismach" w linii: If Range("an20") < 0 And CheckBox1 = True Or CheckBox2 = True Then Kliknij w "AN20" i sprawdź adres w polu nazwy i wartość. Wygląda na to, że nie jest to liczba (data)... Dla pewności zamiast odnosić się do komórki wynikowej sprawdzaj daty /If Range("A2")-Range("A1") < 0 itd/ Kod (od If do End If) możesz wrzucić do...
Witam, W jaki sposób poradzić sobie z automatycznym tworzeniem krótkiego zestawienia ze zbiorczej tabeli, która posiada checkboxy i pola textowe z VBA Weźmy 2 kolumny w tabeli w excelu 1_Typ pakowania;pudełko 24 szt. checkbox + pole textowe; pudełko 48 szt. checkbox + pole textowe 2_Rodzaj wyposażenia;Wyposażenie A checkbox;Wyposażenie B checkbox;Wyposażenie...
Witam!!! Mam taki problem mam 6 checkbox-ów pogrupowanych w 3 kolumny , nad każdym z nich jest YES lub NO i po zaznaczeniu tych checkboxow w Yes chciałbym dostać wartość YES a jeśli zaznaczę choć by jeden z NO to żeby ta wartość zmieniała się na NO w jednej komórce..za wszelkie podpowiedzi z góry dziękuje
Wstawiłem CheckBox z zakładki Formanty ActiveX Dodano po 4 Co to znaczy podlinkowanie do sąsiednich komórek?
Po wstępnych oględzinach działa super. Jutro dostosuję to do moich potrzeb, bo raczej chcę ten kod implementować w plikach właściwych, na których pracuję, a nie robić osobny plik sterujący. Tak swoją drogą to myślałem, że sam kod będzie bardziej rozbudowany :) . Dodatkowo mam pytanie dotyczące metody Application.GetOpenFilename, z której to czasami...
Nie mam takiej opcji jak checkbox.Można to jakoś dograć?
Ok. Jeśli chodzi o dodawanie pustych wierszy to wszystko jest już jasne. Mam kolejny dylemat związany oknem 'Ankieta'. Z tym już borykam się od dawna i niestety ja tego nie potrafię rozwiązać. W oknie jest filtr którym mogę sterować wyświetlaną listę pracowników. Na początku taki filtr wystarczał mi ale w trakcie mojej pracy okazało się że muszę się...
Męczę się i męczę i staram się zrobić jak najbardziej automatyczne to moje makro. Myślałem nad zastosowaniem userforma. W teorii każdy wygenerowany tekst z danej kolumny chciałbym przypisać do CheckBox'a. Po zaznaczeniu dowolnych ChcecBox'ów łączył by je w cały tekst. Kolorem niebieskim zaznaczyłem wartości które chciałbym przypisać do CheckBox'ów.
Dzięki bardzo, znowu się czegoś nowego dowiedziałem Dodano po 16 A jeszcze mam takie pytanko. Chcę bardziej rozszerzyć listę pracowników i w kolumnie 'D' jest jeszcze numer pracownika. Ja zrobić żeby połączyć ze sobą te dwie kolumny w liście? Chcę w oknie Forms dodać dodatkowy przycisk (powiedzmy CheckBox) którym będę mógł wybrać czy lista ma być z...
Podejrzewam, że już masz bałagan z polami wyboru. Sprawdź takim makrem Sub sprawdz() ileWierszy = Cells(Cells.Find(What:="... Cells.Find(What:="potwierdz... _ - Cells.Find(What:="potwierdz... If Sheets("Arkusz1").Chec...
Witajcie, Napisałem makro kopiujące cały wiersz. Problem mam z tym, ze jak bierze już dany wiersz do kopiowania w którym są checkboxy i kazdy z nich ma jakieś odwołanie, to wkleja wiersz ponizej już z tym odwołaniem. Nie wiem jak zrobić aby odwołanie się nie kopiowało, a checkbox tak. Poniżej wklejam kod: [syntax=vb]Sub WstawPo(SearchedRn As Excel.Range,...
Fajnie, fajnie;) Coś takiego chciałem zrobić, ale to nie do końca działa jak należy. Zobacz, tam mam checkbox'y. Kiedy dana osoba ma jakiś certyfikat to zaznaczamy checkbox danego certyfikatu. Gdy to zrobimy, liczby po prawej stronie poziomo do danej osoby, a równolegle z checkboxami zmieniają się. Tam nie dokończyłem. Przy każdym imieniu i nazwisku...
Hej, Mam problem z moim plikiem a mianowicie, chcialabym stworzyc dosc dluga liste z option button, tak zeby nie trzeba bylo za kazdym razem, za kazdym wersem przypisywac tych przyciskow do danej grupy i danej komorki bo to zajmie mi bardzo duzo czasu. Czy jest opcja zeby jakos ten czas skrocic? Zeby to jakos uproscic, ulatwic? Jest w ogole taka opcja?...
Cześć, Może błache, lecz poradzić sobie nie umiem. Słowem wstępu: Mam zwykły plik do otwarcia, używam Widok i checkbox Rozszerzenia nazw plików Z góry wielkie dzięki, misie!
Najlepiej pętlą For. Musisz ustalić ilość kroków, wiersz początkowy itd. Np Jest 10 arkuszy, pierwszy wiersz Nr2, kolumna komórek łączących C. Nie do końca jest to miły sposób. Przy stałej, niewielkiej ilości arkuszy da się jeszcze przeżyć. W przypadku zmieniającej się dynamicznie ich liczby czyż nie prościej jest sprawdzić ile CheckBox-ów jest na...
Z rysunku w pierwszym poście wynika, że chodzi o procedurę 'Sub Dodaj' (masz ją w module, uruchamiana jest przyciskiem [Dodaj]). [syntax=vbscript]Sub Dodaj() Administrator = UserForm1.CheckBox1.Value Kablowiec = UserForm1.CheckBox2.Value Kierowca = UserForm1.CheckBox3.Value Lp = UserForm1.TextBox1.Value stopien = UserForm1.TextBox2.Value Imie = UserForm1.TextBox3.Value...
Witam Mam takie zapytanie w arkuszu jest utworzona baza pracowników z podziałem na działy. Czy jest możliwość ukrywania odpowiednich kolumn w zależności od zaznaczonego czekboksa i wartości w komórce. Chodzi o to że jak zaznaczę czeka umieszczanego w komórce d8, będą widoczne tylko kolumny Q, AD, AQ i tak dalej. Zrobiłem to ręcznie ale jest to po pierwsze...
[syntax=vbscript]ActiveWorkbook.SaveAs Filename:="D:\magazyn " & Format(Date, "yyyymmdd") & ".xlsm", FileFormat:= _ xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False ActiveWorkbook.SaveAs Filename:="D:\magazyn.xlsm", FileFormat:= _ xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False Else MsgBox "Duplikat", vbExclamation, "Etykieta wprowadzona" Target.Value...
Witam, Prośba o pomoc mam trzy pola checkbox, każde z nich ukrywa lub odkrywa wiersze które mają określone wartości. Lepiej lub gorzej ale radzę sobie żeby każdy checkbox działał osobno, ale chciałbym jeszcze dorzucić warunek, że kiedy wszystkie trzy checkboxy są odznaczone (false) to żeby wszystkie wiersze były odkryte. W załączeniu również plik z...
Nie wiem jak inni, ale mam wrażenie że czegoś tu brakuje... Nie sprawdzasz, czy zaznaczono checkbox. Od początku. Warunek pętli Do jest OK. Platforma, dedukuję, to kolumna 7 w "Magazyn" i to powinien być pierwszy filtr. Dalej, nie widzę innego wyjścia niż sprawdzanie kolejno checkbox'ów. Nie zgadnę, który czego dotyczy. Ale ogólny schemat powinien wyglądać...
zaznaczyć (checkbox albo coś) i pobrać do Worda do korespondencji seryjnej Proponuję przygotować sobie plik jak na zrzucie 1061071 który zgodnie z Twoim wyborem za pomocą makra (uruchamianego skrótem ctrl+m) utworzy nowy arkusz z aktualną listą do korespondencji seryjnej Worda :spoko: 1061074
Przede wszystkim powiąż sobie checkbox z polem arkusza np. tak jak to napisane tutaj: http://www.pcworld.com/article/2042382/a... Potem ustaw (dodatkowo) we wszystkich polach chkbox, aby zdarzenie wskazywało jedno makro. W nim wpisujesz kod. Przykładowy kod ukrycia jednej kolumny w zależności od wybrania chkbox'a...
W takim razie wiedza dotycząca innych obszarów forum również powinna być zachowana dla siebie, w szkole nauczyciele też przekazują wiedzę uczniom której kiedyś sami musieli jakby się nauczyć a to że ktoś z forum po prostu chce pomoc i robi "dobry uczynek" to wcale nie jest nic złego. Nikt na forum nie jest zmuszany do odpowiedzi jest to po prostu dobra...
Witam, Mam kolejny kłopot. Jak zapisać poniższy kod aby był poprawny? Chciałabym po kliknięciu Checkbox, aktywowac/deaktywowac ponizsze TextBoxy oraz Button... Wiem jak jednym checkboxem obsluzyc jeden obiekt... ale jak kilka? Znalazłam tu na forum chyba podobny temat i rozwiązanie: http://www.elektroda.pl/rtvforum/topic21... Probowałam i z Frame...
Obsługa CheckBox-ów w VBA jest niezbyt intuicyjna i jeszcze zależna od wersji Excela. Z Twojego opisu wnoszę, że używasz wersji 2010 lub wyższej. Proponowane rozwiązanie testowałem w wersji 2010 i 2016. W 2007 na pewno trzeba to rozwiązać inaczej. Przy większej liczbie kopii kontrolek trzeba je wstawiać dodatkowym kodem. Również przy czyszczeniu arkusza...
O to mi chodziło, nie wpadłem na to żeby dwa razy przekazać tą samą zmienną. Wartości vWi i vPo potrzebuje bo o od tego zależy jakie wartości z tablicy mi pobiera. Myślę, że to rozwiązuje problem. Co do Change i AfterUpdate to oczywiście znam tą właściwość dlatego skłaniam się raczej do AfterUpdate ale czasami obserwuje niepożądane działanie. Np w tym...
Dzięki JRV, powiem szczerze, że nie znałem takiej możliwości w Excelu. Wygląda bardzo fajnie, a powiedz mi jak by to działało w przypadku kilku userów. Czyli ja zaznaczam jedno i zapisuje wynik, a potem ktoś inny odpala i odznacza inny zestaw? A mógłbyś podpowiedzieć jak to ugryźć wariantem z checkboxami? Chciałbym się nauczyć tego, bo trochę zaniedbałem...
Teoretycznie mogę to zrobić przez formatowanie warunkowe ale jak pisałem wcześniej jest to tylko część bardziej złożonego makra. Makro to jest podpięte do formularza pod kontrolkę CheckBox, więc chwilowo formatowanie warunkowe odpada Dodano po 53 spróbuj tak (piszę bez sprawdzania - ale powinno działać) zmień linię kodu "With ..." na: Kod Visual Basic...
Jak w poniższym kodzie w miejscu ze znakami zapytania zrobić aby wygenerowana lista została wklejona do nowego pliku '.xls' i automatycznie zapisana, a ścieżką zapisu zawsze będzie 'Pulpit'? I przy okazji zapytam, czy jest możliwe tą wygenerowaną listę wkleić nie do pliku 'Excel' ale do dokumentu 'Word'? Potrzebuję dodać taką opcję bo często muszę odesłać...
A może być inaczej? Przykładowo przez listbox? http://obrazki.elektroda.pl/9822597900_1... Możesz sobie dodać okno do twojego skoroszytu lub zapisać w skoroszycie makr osobistych. By wywołać okno z np. modułu piszesz np.: ShowHideColumnForm.show by mieć kontrolę nad oknem Excela piszesz: ShowHideColumnForm.show 0 Okno działa samo z siebie....
Czy nie prościej/poprawniej wybierać te liczby 1..49 poprzez checkbox'a? Właściwie wydaje mi się że ci chodzi o coś takiego: http://obrazki.elektroda.pl/2098817900_1... - jest dostępny za drobne, jak chcesz to mogę poszukać linka.
Zdefiniuj "łącze komórki" dla obu checkbox'ów (dwie osobne) i sprawdzaj zagnieżdżoną funkcją JEŻELI. prawda/fałsz;"OK" fałsz/prawda;"Błąd" pozostałe przypadki;""
Chyba pomieszałam. Niestety wcale nie "Chyba" :cry: , ale na pewno :D Komórka C5 nie jest powiązana z żadnym boxem umożliwiającym jakikolwiek wybór :!: Jeżeli cokolwiek wpiszesz do komórki C5 :arrow: zaczyna działać Twoje makro (oderwane zupełnie od arkusza Słownik :!: i tamtych tabelek), lecz po wybraniu checkboxa (ze względu na kod: If TrybEdycji...
Taki przykład. Na jednej formie mam ListBoxa, który w zdarzeniu initialize pobiera dane z tablicy1 (wcześniej załadowane od tablicy z arkusza) . Procedura w zdarzeniu Change (TextBox) filtruje dane w arkuszu (poprzez porównywanie ciągów w TextBox i arkuszu) i tworzy nową tablicę2 z pasującymi rekordami, która trafia do tego listBoxa (w miejsce tablicy1)....
Tylko mi nie chodzi o wyświetlanie komunikatu. Tylko w przypadku jak zaznaczę checkboxa i dodam jakby do oferty w arkuszu excela zamiast prawdy żeby pojawił się +
Jeśli chodzi o nagłówki. VBA jest "ślepy" jeśli przypisujesz listę inaczej niż przez RowSource... Po mojemu rozwiązanie z labelem jest wystarczające (i pewniejsze). Wyłącz nagłówki, dla labela ustaw Height=10 i Top=62 i będzie ładnie. Czyli pierwszy pomysł najlepszy. Ok Rozbudowałam formularz dodając ikonę z kalendarzem i Checkbox-y z dniami tygodnia....
Prościej byłoby z CheckBox'em
Potrzebuje zrobić to co teraz wrzucilem OK, jeśli sam będziesz to obsługiwał to Twoja wola i Twój wybór. Odnośnie przedstawionego na rysunku wyliczenia to musisz zmienić kod dla przycisku "Oblicz" np na taki: [syntax=vbscript]Private Sub CommandButton5_Click() Dim a As Integer Dim b As Integer Dim b As Integer If TextBox15.Value > 0 Then If TextBox15.Value...
Witam Mamy pytanie odnoście usuwania makra przez inne makro. Od początku. Mam poniższy kod który oczywiście działa popranie i robi dokładnie to co ma robić, czyli: kod na początku filtruje i tworzy pewną ankietę w arkuszu. Następnie arkusz z ankietą zostaje skopiowany i wklejona do nowego pliku Excel, następnie zapisany pod konkretną nazwą we wskazanym...
rochę może późna informacja ale muszę pracować na excelu 2002 Z tego co pamiętam: Menu>Widok>Paski Narzędzi>Przybornik formantów...
Nie piszesz o jaką aplikację chodzi. W każdym razie w Excelu (nie znam Open Office) w przypadku "formularzowego" CheckBox'a tylko makro w kodzie arkusza...
Witam. Tworzę teraz program do filtrowania danych na zasadzie mam duży skoroszyt z bazą (nawet do kilku tysięcy wierszy i ok 200 kolumn) z bazą, selekcjonuję je wg. kilku zakresów i wyświetlam (przekopiowuję do swojego skoroszytu) spełniające warunki i wybrane kolumny (118 kolumn jeśli dobrze naliczyłem). Prawdopodobnie po rozwiązaniu problemu będę...
Witajcie mam taka sprawę ... Potrzebuje zrobić Exela do celow prywatnych... kwestia tego ze nie wiem jak mam sie za to zabrac ale zacznę od początku. Po 1 w Exelu beda 4 Kolumny pytanie || odpowiedz || kto || kiedy -Pytanie wiadomo odpowiedz tak/nie ( w formie przycisku) kto bedzie wprowadzane recznie ręcznie i kiedy tez Na czym mi zalezy Jezeli bedzie...
Dzięki wielkie. Po wklejeniu poniższego kodu lista numeruje się prawidłowo: http://obrazki.elektroda.pl/8079367600_1... Mam jeszcze jedno pytanko związane z tym samym plikiem. Po wklejeniu listy pracowników do arkusza muszę dodać jeszcze w komórkach obok nazwisk pewne symbole (tak jak na screenie). Po wklejeniu listy automatycznie aktywuje...
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...
Czy da się jakoś lepiej zrobić? Mam wrażenie, że gdyby wpierw utworzyć tablicę zaznaczonych checkboxów to można by zawsze prowadzić filtrowanie wg tej tablicy kryteriów :idea: Jeśli potrzebujesz "podszkolenia" w tworzeniu takiej tablicy checkboxów :D to proponuję przeanalizować przykład Elektrodowego mistrza Excela - kolegi JRV np w wątku https://www.elektroda.pl/rtvforum/viewto...
Chciałbym odświeżyć temat edycji plików CSV. Makro jest już gotowe, przygotowałem interfejs graficzny w oddzielnym pliku xls. Teraz po wybraniu miejsca przechowywania plików i miejsca makro powinno otwierać wybrany plik csv, obrabiać i zapisywać we wskazanym miejscu, ale niestety nie obrabia go - wyskakuje Run-time error 91. Poniżej zamieszczam kod:...
.MatchRequired = True (przy nie spełnionym warunku chciałbym aby wyskakiwalo okienko z instrukcja co nalezy zrobic) A przykład Ms z pomocy podręcznej się nie sprawdza ? [syntax=vba] Private Sub UserForm_Initialize() Dim i As Integer With UserForm1 .Caption = "Window" With .CheckBox1 .Caption = "MatchRequired" .Value = True End With With .ComboBox1...
Witam, kilkanaście dni temu "adamas_nt" pomógł mi w napisaniu kodu do usuwania checkbox'ów i wybranego zakresu komórek. Chciałabym teraz ten kod rozbudować, a mianowicie po dodaniu nieokreślonej ilości tabelek (wzór w przykładzie), a późniejszym ich usuwaniu klawisz usuwa również treść poniżej ramek, której nie chcę wymazywać (m.in. podpisy i klauzulę)....
Witam Mam takie makro wyrzuca mi debuga w jednym miejscu i nie moge dojś dlaczego? Co jest nie tak? Private Sub cmdEdytuj_Click() ' Wprowadzenie danych z listy do okienek pozycja = lstSala.ListIndex If pozycja = -1 Then MsgBox "Nie wybrano danych do edycji" & Chr(10) & "Wybierz dane do edycji." Exit Sub End If For k = 1 To 29 Controls("txt" & k & "v").Value...
Mam makro po którego uruchomieniu wyświetla się forma z checklistą, polem umożliwiającym wpisanie tekstu, kilka optionbuttonów i 66 checkboxów po kliknięciu zapisz wszystkie dane zapisywane są do odpowiednich komórek, jednak jeśli, któreś z pól, lub żadne nie zostanie uzupełnione i tak można zapisać w tym wypadku bezwartościową informację. Takie działanie...
Chowane lub grupowane wiersze A mógłbyś wskazać logikę (sens :?: ) tego ukrywania fragmentów formularza wypełnianego tylko przez managerów :?: Dodatkowo musisz zaplanować "wyzwalacz" uruchamiania takiej akcji makra (przycisk, zdarzenie, wartość jakiegoś checkboxa lub wartość jakiejś komórki itp). Zrobiłeś fajny formularz, uzbrojony w grupowania, formatowanie...
Dzień Dobry Jestem bardzo początkującym użytkownikiem i nie mogę poradzić sobie z problemem, zrobiłem arkusz w którym rejestruję wjazdy samochodów do firmy, wszystko ładnie działa tylko jeszcze te samochody wyjeżdżają i chciałbym odnaleźć wcześniej dodany wpis o wjeździe auta na zakład i po np godzinie odnaleźć ten wpis i jak będzie wyjeżdżał to zrobić...
Mianowicie do arkusza VB wstawiłem pole ComboBox hmmm... dla jasności: na co dzień nie zajmuję się programowaniem Kolega zrobi PrintScreen'a ze swojego okna i zamieści w poście bo jak narazie to ta wypowiedź jest niejasna i coś mi się wydaje, że poszukiwane rozwiązanie jest inne niż to co napisano. Zamiast ComboBox do daty proponuję "DateTimePicker"....
Ciekawe i po dopracowaniu może okazać się bardzo przydatne narzędzie. Widać że to bardzo wczesna wersja beta ;) Ja bym dodał checkbox - czy element jest: NOWY / WYLUT. Wyszukiwarka oprócz opcji wyboru do przeszukiwania jakiś grup elementów powinna umożliwiać przeszukiwanie całej bazy po dowolnym ciągu znaków, a w wynikach szukany ciąg znaków powinien...
No dobra, z problemami które miałem do tej pory sobie poradziłem jednak pojawiły się nowe. Problem I Combobox - W jaki sposób wprowadza się do niego dane w wordzie? Chodzi o to aby można było sobie tym suwaczkiem wybrać jedną z 3 wartości i nie wiem jak te wartości się wprowadza. Jak to się robi w excelu wiem, tam stosowałem funkcję w VBA która wyświetlała...
Tworzę plik, który ma dużo tabel przestawnych i fragmentatorów. Chciałbym aby data we fragmentatorze ustawiała się w zależności od najstarszej daty dostępnych danych. Próbuję to zrobić za pomocą poniższego kodu. Działa ale przy kilkunastu fragmentatorach trwa to bardzo długo (około 2 min). Czy jest jakiś sposób, żeby to przyspieszyć? Dim tytdat As SlicerCache...
Witam wszystkich. Mam problem ze skryptem quizu. Ściągnąłem go ze strony:[url=http://javascript.internet.c... Zacząłem go modyfikować i udało mi się jak na razie, że podaje poprawne odpowiedzi dopiero po kliknięciu w pokaż wynik i kliknięciu "ok". Chciałbym zrobić coś takiego, że mam do wyboru (w pliku z pytaniami)...
Cześć, Zmieniłem kalendarz na DTPickera. Problem jaki mam to nie wiem jak zrobić aby Formularz zauważył że użytkownik nie wybrał żadnej daty w DTPickerze. Jak napisać kod aby wybranie daty było obowiązkowe w DTPicker? Wpadłem na coś takiego: [syntax=vb]Private Sub CommandButton1_Click() Sheet1.Cells(1, 1).Value = UserForm1.DTPicker1.Value Sheet1.Cells(2,...
Witam, Chciałbym się dowiedzieć w jaki sposób mogę za pomocą macro schować puste wiersze z wybranego zakresu. Np. na poniższym przykładzie: 1. W userform zaznaczam checkboxa, po czym jego nazwa jest wypisywana do arkusza. Jeżeli checkboxów jest 6 , a user wybierze 3 , to trzy pola zostaną puste, czego chciałbym się pozbyć. Dobrze byłoby, żeby skrypt...
excel checkbox checkbox działa checkbox click
kocioł gazowy sonda wymiana poduszki silnika renault tworzenie playlist
schemat rozruchu schemat rozruchu
Dziwny dźwięk i słabe wyrastanie ciasta w piekarniku Amica EBI 8562 Tacens Mars MP 500 - opinie i specyfikacja zasilacza