jeżeli po wybraniu innej komórki przycisk listy znika, to jest to lista wartości. Usuwa się ją z menu Poprawność danych poprzez ustawienie poprawności danych w komórce na "Dowolna wartość" Chyba, że arkusz ma makra i formatka pole listy jest wywoływana z kodu.
makro musisz napisać ;) http://www.exceltip.com/st/Save_a_workbo... http://www.ozgrid.com/forum/showthread.p... http://www.lqnet.com/Excel/SaveAs.asp http://www.excel-vba.com/vba-12-code-wor...
Witam możesz np. tak [syntax=vbscript]ActiveCell.Value = Environ("username") & ", " & Now()[/syntax] nie doczytałem do końca
W [syntax=vbscript]w = Cells(Rows.Count, "A").End(xlUp).Row + 1[/syntax] masz numer wiersza kolejnej wolnej komórki w kolumnie A, użyj go np. [syntax=vbscript]Cells(w, "A").Value = Date[/syntax]
Można do przycisku przypisać Np takie makro Option Explicit Sub cmdWstaw() Dim pozycja As Integer, numer As Integer Dim kom As Range pozycja = Sheets("Arkusz1").Rang... + 1 If pozycja = 77 Then MsgBox "Osiągnięto koniec zakresu w zestawieniu..." Exit Sub End If For Each...
Witam Jeśli w R2 formatu czasu: If Time > ThisWorkbook.Sheets("Admin").Range("R2") Then
Czy wiesz, że w "Arkusz2" prawdopodobnie w wyniku kopiowania, wklejania a następnie usuwania wierszy jest ponad 500 przycisków o nazwie "CommandButton1"? Kiedyś był już podobny temat poruszający ten problem. Kopiowanie i wstawianie wiersza z przyciskiem działa OK, ale usunięcie wierszy powoduje układanie się obiektów w stosik, z których widoczny jest...
Sprawdź czy o takie coś chodziło, bo nie dałeś załącznika.
Zablokować pierwszy wiersz, zmienić wysokość, wstawić tam wszystkie przyciski i używać jako "paska menu"...
Nagraj to makro i przypisz do przycisku. Przycisk wiesz jak zrobić? Wiesz jak przypisać makro do przycisku? Makro powinno wyglądać mniej więcej tak: [syntax=vb]Sub aktualizuj() ' aktualizacja danych z zakresu A1 Range("A1").Select Selection.QueryTable.Refresh BackgroundQuery:=False End Sub [/syntax] .. ewentualnie we właściwościach danych zewnętrznych...
Witam Chciałem dodać przycisk typu ON/OFF ukrywa i odkrywa obszar Mam stworzone dwa makra makro1 ukrywa obszar makro2 odkrywa obszar W sieci znalazłem sposób który pozwala na taką sztuczkę ale nie wiem gdzie to podstawić do obecnych wartości aby to działało. znaleziony kod Private Sub ToggleButton1_Click() With ToggleButton1 If .Value Then Call...
Jest tam kilka funkcji. Między innymi Calculate, change, Dectivate ale nie widać ich w tych kilku skopiowanych od Ciebie linijkach. Musisz Kolego pocztrać sobie trochę o VBA w Excelu. Proponuję wygooglać kurs VBA - jest tego mnóstwo. Te 'kilka funkcji', to zdarzenia arkusza. Działa to tak, że jak np. w kodzie którym napisałem, jeżeli nastąpi podwójne...
Twojego filmiku nie widać. Edit: Już się pokazał. Spróbuj jednak dokładniej opisać swoje obserwacje. Czy problem z tym plikiem "okrojonym" na potrzeby forum występuje u Ciebie na każdym komputerze i w każdej wersji Excela? Masz w pliku kilka ukrytych arkuszy, ale eksperymentujesz tylko z "B". Czy każdy arkusz po ukryciu zachowuje się tak samo? Ponieważ...
Przypisz do każdego z przycisków odpowiednie makro [code][syntax=vbscript] Private Sub CommandButton1_Click() n1 = Range("N1").Value 'napisz formule if '=JEŻELI(N1>8;"STR. 1/5"; (JEŻELI(N1>6;"STR. 1/4";(JEŻELI(N1>4;"STR. 1/3";(JEŻELI(N1>2; "STR. 1/2"; "STR. 1/1"))))))) Dim text As String text = "str.2" & "/" & n1 Range("G3").Select ActiveCell.FormulaR1C1...
Czy mógłby się ktoś podzielić jak powinien wyglądać kod abym mógł mieć w swoich mailach "użycie przycisku głosowania"? Coś ala: [syntax=vbscript]Sub glosowanie() Set myOlApp = CreateObject("Outlook.Application") Set myitem = myOlApp.CreateItem(olMailItem) myitem.VotingOptions = "Tak;Nie" myitem.Display End Sub[/syntax]
Do dwóch przycisków możesz przypisać ten sam moduł
Nie wiem, czy dobrze zrozumiałem. Po otwarciu pliku ma być napis "DDDD", a potem już cały czas, pomimo klikania "wprowadzono dane" (tak zrobiłem), czy po każdym kliknięciu ma się zmieniać z "DDDD" na "wprowadzono dane" i z powrotem?
Można ręcznie wpisywać datę, ale można też wcisnąć jednocześnie Ctrl i ; (klawisz Ctrl i znak średnika). A makrem Sub dzisiejsza_data() ActiveSheet.Range("A65536"... 0) = Date End Sub
visual basic sie klania :P mam gdzies ebooki i przykladowe formy, jak znajde to wrzuce
Umieść przyciski w polach grupy
Sformatowałeś "miesięczne wynagrodzenie" tak aby wynik był pokazywany z dokładnością do 0 miejsc po przecinku więc powstaje różnica. Potem dalsze obliczenia idą z błędem. Tworząc formuły bazuj zawsze na komórkach z oryginalnymi wartościami to na końcu nie będzie błędu.
Witam! kolego podmień mikrofon.Pozdro!
Nagraj sobie makro zapisywania. Poniżej zarejestrowane (bez korekty) dwa: "Zapisz jako" oraz Ctrl+s (zwykłe zapisz) http://obrazki.elektroda.pl/3841968300_1... i wybierasz z listy. Aby oprogramować komórkę/zakres potrzebujesz procedury zdarzeniowej [url=http://dzono4.w.interiowo.pl/kurs/d... Tu należy warunkowo wywołać...
W tym wypadku zwykłe [syntax=vb]UserForm3.Show[/syntax] wystarczy. PS. Słowo "stworzyłem kalendarz" jest nieco na wyrost - po prostu użyłeś gotowej kontrolki, która w dodatku potrafi być problematyczna przy innych wersjach Excela. Jeżeli chciałbyś naprawdę stworzyć kalendarz od podstaw, proponuję zapoznać się z [url=http://www.elektroda.pl/rtvforum/to...
Przykład na przyciskach pod "A9"
Przykład korzystania z okna zapisywania z filtrem ZapiszJako = Application.GetSaveAsFilename(fileFi... Excel (*.xls), *.xls") I jeśli domyślna ścieżka i nazwa z komórki to sciezka = Application.DefaultFilePath & "\" nazwa = Range("A1").Value ZapiszJako = Application.GetSaveAsFilename(Initia...
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).
Jak masz kłopot ze wstawieniem to spakuj to zipem A na temat zrób tak jak radzi paweliw wstaw hiperłącza odwołujace się do tego samego dokumentu i już
Oops, a było sobie nagrać makro ;) 1. Kod umieść w module standardowym i podepnij pod przycisk 2. Najpierw wybierz arkusz, następnie komórkę. Np [syntax=vb]Sub Odwolanie() Arkusz2.Select [C4].Select End Sub[/syntax]
Nie zadziała A u mnie działa (no chyba że o to nie chodzi)
Oops. Nie w tej pętli :) Sorry, roztrzepaństwo... [syntax=vb] For wrs = 0 To lstSala.ListCount - 1 For kol = 0 To 9 .Cells(wrs + 2, kol + 1) = lstSala.List(wrs, kol) Next suma = suma + .Cells(wrs + 2, 8) Next[/syntax]
Dopisz przed tą linią: debug.print .Shapes(.Cells(w, 1).Text).name naciśnij Ctrl+g uruchom makro. I co tam wypisało?
W załączniku trochę poprawiona wersja. A co z tym przyciskiem?
Mam wrażenie, że problem polega na tym, że chcesz wskazywać myszą komórkę, która ma się zwiększać, ale jak to zrobisz i klikniesz klawisz to już jej nie wskazujesz. Jeżeli tak to zastosuj mały formularz i na nim klawisz.
Witam, Jako że jestem nowy w pisaniu kodów VBA, chciałbym się zwrócić z prośbą o pomoc w napisaniu makra które w komórce np."D5" po kliknięciu przycisku z kontrolek będzie wyrzucać mi kolejno wszystkie numery z kolumny A w której znajduję się 7500 rekordów. Czy znajdzie się jakaś dobra dusza?
Dobrze, że dałeś sobie radę. To się ceni ale to samo co na pięciu przyciskach możesz mieć na jednym po zastosowaniu mojego kodu. Nie chcę Ci udowadniać wyższości Świąt Bożego Narodzenia nad Wielkanocą. Mam jednak drobne podejrzenie, że mój kod przekleiłeś w całości bez sprawdzenia. A tam był drobny błąd na który nie zwróciłeś uwagi. A1 . Zmień sobie...
Zamień Sheets("Obliczenia").Select na Sheets("Obliczenia").Activate A najlepiej jeszcze uprość te makro [syntax=vb]Sub kopiuj() Sheets("Obliczenia").Range("A3:A506").Co... Sheets("Wynik").Activate End Sub [/syntax]
Zależy, jak chcesz żeby się makro wykonywało. Albo zarejestruj makro i kod wklej tam, albo wstaw przycisk i w zdarzeniu przycisku.
Sądząc po nazwie ("Polewyboru") to nie ActiveX tylko formularzowe. Wykorzystaj wartość komórki wpisanej jako "łącze komórki"... P.S. Na końcu procedury włącz odświeżanie ekranu.
[syntax=vb] Sub Wyslij() Dim bs As Range Dim r& Set bs = Sheets("zbiorczy").Range("A:L") r = bs(Rows.Count, 1).End(xlUp).Row + 1 bs.Rows(r) = bs.Rows(1).Value Range("b6:c10").ClearContents End Sub [/syntax]
1. Należy utworzyć makro, które wykona wszystkie potrzebne czynności 2. PLIK->Opcje->Dostosowanie Wstążki->Wybierz polecenia z->Makra itd.
Znajdź sobie jakiś kurs... Bardzo uniwersalna odpowiedź. Pasuje do każdego tematu we wszystkich działach. :arrow:tang0 przeanalizuj następujący Sub wstawianie_iksow() ile = 3 'liczba iksów, pobierana z komórki lub pola tekstowego formularza kolumna = 1 'Nr kolumny 1 dla A, 2 dla B itd wiersz = 1 'Nr wiersza For wstaw = 1 To ile Step 1 wynik...
Załącznik był podmieniony po 5min. Zaciągnij jeszcze raz. Lub popraw: if not intersect ... is nothing then
1. chronić arkusz [syntax=vb]Sub Button4_Click() activesheet.Unprotect 'ew. haslo Rows ("7:19") .Hidden = Not Rows ("7: 19") .Hidden Activesheet.Protect 'haslo End Sub [/syntax]
Witam zobacz [syntax=vb]ActiveWorkbook.RefreshAll[/sy...
Nie wiem, co Ci nie działało, moim zdaniem wszystko działa. Trzeba oczywiście dopasować adresy do układu danych w nowym pliku. Nie napisałeś też jak ma być uruchamiana ta procedura. Zrobiłem uruchamianie przyciskiem "Analiza".
Musiałem dodać fragmenty kodu odpowiedzialne za zróżnicowaną numerację kopiowanych przycisków, a następnie identyfikację przycisku "Clear", który został użyty. Wszystkie przyciski "Copy" działają identycznie - kopiują zawsze pierwszą tablicę na pierwsze wolne miejsce. Możesz tej pierwszej tablicy nie wypełniać, potraktować ją jako szablon, unikniesz...
Tam, gdzie chcesz dokonać walidacji, np. przy kliknięciu przycisku na formie.
W kodzie przycisku CmbAktualizujdane zmień/dodaj linie: 1 zmień) If POB <> "" Then kwadrat = POB * POB + Sqr(POB) 2 dodaj za linią pobrania = ) dodania = Val(UsfTowary.TxtDodan.Value) 3 zmień) If pobrania > dostepnosc + dodania Then 4 zmień) ifno = MsgBox("Stan Towaru po aktualizacji: " & dostepnosc - pobrania + dodania , vbInformation,...
W poście niżej masz to opisane Ale tu zrobiłbym ciut inaczej, Np [syntax=vb]Sub otworz() 'otwieranie pliku z okna dialogowego z filtrem Dim fd As FileDialog Dim wkb As Workbook Set fd = Application.FileDialog(msoFileDialogFile... With fd .InitialFileName = "H:\CCC\ccc\" .Filters.Clear .Filters.Add "Pliki Excel", "*.xl*; *.xls*" .AllowMultiSelect...
Zdaje się, że dla każdego powiatu musisz mieć osobne procedury dla przycisków. W przykładzie makro "orientuje się" po nazwie miasta wpisanej w komórce zakrytej przyciskiem.
Moja propozycja z makrem zdarzeniowym (w module Arkusza1). Chroni kolumnę A w Arkuszu1 przed ręcznym wpisaniem duplikatów i przed skopiowaniem. Nie chroni przed modyfikacją makrem. Formuły zamienia na wartości. Chroni też przed wprowadzeniem wartości błędów. Do działania muszą być włączone makra i obsługa zdarzeń. Obsługa zdarzeń jest domyślnie włączona,...
Jeśli jednocześnie to For ark = 1 To 2 With Sheets(ark) For i = .Cells(65536, "a").End(xlUp).Row To 2 Step -1 If .Cells(i, "a").Value = "" Then .Rows(i).Delete shift:=xlUp End If Next End With Next Jeśli uruchamiasz w pierwszym a usuwać ma w drugim to With Sheets(2) For...
Niestety też nie widzę opcji by nie było makra. Ale nie makro ukrywające tylko zwykłe wprowadzenie informacji do wydruku do ilu stron ma drukować. Czyli pod przycisk "wrzucić" [syntax=vb] Sub Druk() ActiveWindow.SelectedSheets.PrintOut From:=1, To:=Sheets("POŚW").Range("E22") End Sub [/syntax] I "drukować" przyciskiem.
Najpierw popraw pętelki, jak kolega JRV zauważył, bo po wielokroć ukrywasz już raz ukryte pola tekstowe. Czy kod można skrócić ? Pewnie odrobinę tak, ale po co, zyskasz raptem parę linijek. Może tylko odrobinę zyska na czytelnnści, np.: 1. Utwórz jedną dodatkową procedurę, w której utworzysz dwie pętle 'For...Next', jeden warunek 'If' i jeden 'Select...
kolejność komórek w obiekcie Range nie jest wprost zdefiniowana... No tak, ale można sprawdzić tabulatorem ;) Dla pewności [syntax=vb]Dim i As Integer For i = 10 To 90 If Rows(i).Hidden = True Then Rows(i).Hidden = False Exit Sub End If Next[/syntax]
Witaj Przytrzymanie klawisza Ctrl, można zauważyć kursor po komórce w wierszach, dla którego konieczne Etykiety. Następnie kliknij przycisk OK.
Witaj Dołożyłem przycisk uruchamiający makro. Pozdrawiam
Witam w tym samym skoroszycie ale pod nazwa wzięta z komórki. Wartość w komórce będzie zmieniać codziennie? Dodano po 6 poprzez kliknięcie przycisku excel skopiowały arkusz Przycisk w tym samym arkuszu? Dodano po 34 [syntax=vb] Sub Kolejny_dzen() dzen = Range("b1").Text For Each sh In ThisWorkbook.Sheets If sh.Name = dzen Then MsgBox "Juz zapisane":...
Witam Możesz np w właściwościach pola ustawić Multiline i EnterKeyBehaviour na True
Nie wiem czy pomoże ale ustaw niski poziom bezpieczeństwa makr.
Witaj Jeśli wiesz makra VB: Jeśli przycisk jest ActiveX, można w zdarzenie arkusza 'Worksheet_Change' ustawić właściwość przycisku 'Enabled' w zależności wartośći komórky(c12), w przykładzie, przycisk typu Shapes, jest możliwe, aby widoczne lub nie w zależności od wartości komórki(w zdarzenie arkusza 'Worksheet_Change' ) [syntax=vb]Private Sub Worksheet_Change(ByVal...
Excel 2003: (Nie mam zainstalowanego, mogę się mylić, proszę kolegów o ew. poprawkę. Chodzi o wstawienie przycisku ActiveX) W menu: 'widok' wybierz: 'paski narzędzi' i 'przybornik formantów'. Z przybornika wybierz: 'przycisk'. W okienku 'makra' wybierz makro o nazwie 'actualize' lub W edytorze VB, przy zdarzeniu 'NazwaPrzycisku_Click()' wpisz nazwę...
W ostateczności jest Tłumacz Google ... eee ... a może zbysiomysio pamięta jeszcze ze szkoły ? ... do końca lat 80-tych rosyjski był uczony nawet w ogólniakach ... no ale może rzeczywiście nie jest "taki stary" ... :-]] ? .... :-) ... żeby pamiętać czasy, w których nie było jeszcze nawet komórek ... :D :D :D :D ... a nawet internetu ... :D :D :D ......
W programie MS Excel przycisk Zamknij jest niedostępny, czy jest jakiś sposób by go przywrócić? http://obrazki.elektroda.net/95_12051389...
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...
mam w pliku (Excel 2010) użyte przyciski (4) "CommandButton" po naciśnięciu na przycisk wykonywana jest pewna operacja zapisana w VB na moim kompie wszystko śmiga elegancko. Problem polega na tym że ja ten plik uruchomię na innym kompie (Excel 2010) to tych przycisków nie da się nacisnąć i nie wykonuje się żaden kod. Ustawienia włącz wszystkie makra...
Jeśli pod przyciskiem, to je połącz, a nie wpisuj formułę...[syntax=vb][d1] = [a1] & " " & [b1] & " " & [c1][/syntax]A dokładniej[syntax=vb]For i = 1 To zasieg Cells(i, 4) = Trim(Cells(i, 1) & " " & Cells(i, 2) & " " & Cells(i, 3)) Next[/syntax] Edit: Odwrotnie :) poprawiłem...
Kliknij ppm (odblokowany arkusz) > właściwości i ustaw: http://obrazki.elektroda.pl/1220843600_1...
Ustaw format liczb dla pola tabeli przestawnej, a nie z poziomu formatowania komórek. Dwukrotne kliknięcie w tabeli na nazwę pola powinno wyświetlić okno "Ustawienie wartości pola" tam też wybiera się funkcje podsumowującą. W tym oknie jest przycisk "Format liczby".
Okej dziękuję bardzo:) A zapytam: Da się zrobić taki przycisk, który zapisuje plik Excel'a?
Tu lepiej powinny się sprawdzić przyciski radiowe, bo opcje wzajemnie się wykluczają, poza tym od razu otrzymujemy w wybranej komórce numer przycisku.
szukałem, kombinowałem i zawsze coś nie wychodziło :/ =JEŻELI(LUB(G34<238;G34>407);"..."... to działa dokładnie tak jak chciałem, dzięki za pomoc :) Co tu jest do kombinowania? Suma logiczna 2 warunków? A co do podziękowania to w dobrym zwyczaju jest wciśniecie przycisku pomógł.. ;)
Podmień na [syntax=vbscript]Sheets("TEST_2").ListOb... colStart), Cells(row, colEnd)).Value = Sheets("DoPowołania").Range("L1").Value[... lub [syntax=vbscript]Sheets("TEST_2").ListOb... colStart).Resize(, colEnd).Value = Sheets("DoPowołania").Range("L1").Value[...
Trochę ruchu kombinowanego, i u mnia to działa. Musiałem zmodyfikować plik comp.mod, zamiast 'Pusty arkusz. xlsx ' poprawiono na 'Pusty arkusz. xlsm ' Przycisk 'Wklej do Excel' należy nacisnąć co najmniej 0,5 s.
Jesteś pewien, że w 2007 coś takiego było? Właśnie sprawdziłem- domyślnie przycisków nie ma, skróty nie działają, a w opcje-> dostosowywanie-> wszystkie polecenia nie widzę możliwości dodania indeksów do wstążki.
Czy na pewno potrzebujesz makra? W załączniku formuła i przykład makra (pod przyciskiem). "Współrzędne" pobierane z L1, L2.
Witam.Aby wejść w tryb serwisowy potrzebny jest oryginalny pilot Schneidera ( tzn. musi generować odpowiednią sekwencje przy naduszeniu naraz dwóch przycisków-czerwonego i niebieskiego).Sposób wejścia w tr. serwisowy podał już Kolega w poprzednim poście.Zawsze po inicjalizacji wymagana jest drobna korekta geometrii.Pozdrawiam.SKORBI.
Niby spoko ale czasochłonne dla mnie :cunning: Widać, że masz niewiele doświadczenia z Excelem i nie potrafisz nawet wykorzystać natywnych możliwości programu :cry: Pierwsze 6 wierszy (te z kryteriami filtrowania) możesz zawsze ukryć przed użyszkodnikami :D tego arkusza. Warunki filtrowania zapisane są w postaci samo aktualizujących się formuł więc...
A z czym masz problem? To proste przypisanie w pętli przecież. Nawet (skromny co prawda) opis jest w podanym linku...
cześć, mam do Was pytanie odnośnie stworzenia przycisku z pewną funkcją. Mam plik bez makr który jak się otworzy to zaciąga dane z innych arkuszy. Jednak, gdy plik ten jest otwarty a ktoś na dysku sieciowym podmieni plik źródłowy to aby zobaczyć jego aktualizację to trzeba ponownie główny plik zamykać i otwierać. W związku z tym powstaje moje pytanie...
Tak na szybko...
Przesiedziałam już mnóstwo godzin, przejrzałam kilka tutoriali, ale dalej jest to dla mnie czarna magia... Czy ktoś mógłby mi pomóc? Ok. przedstawiłeś logicznie jak ma to wyglądać. Ale w czym ci pomóc? Przecież to proste więc nie wiem gdzie szukałeś. Dwie pętle "for". Najpierw dla tabeli A z warunkowym "if" jak w G jest X i zapis do tabeli C. Potem...
dla przycisku tak daj takie samo makro tylko zamień True na False
Excel - automatyczne przepisywanie danych z jednego arkusza do drugiego. Witam, potrzebuję pomocy w programie Excel. Posiadam dane w Arkuszu 1 i potrzebuję, aby po kliknięciu danego klienta, z automatu skopiowały się do drugiego arkusza wybrane dane, jak nr zlecenia, umowy, adres, transport. AI: Jaka wersja programu Excel jest używana? Excel Office...
Powiedz im, że tak się nie robi. To nie Excel. Przykładowy kod przycisku 'Dodaj fakturę'. [syntax=vbscript]Private Sub DodajFakture_Click() inf = MsgBox("Dodać fakturę?", vbYesNo, "UWAGA") If inf = vbYes Then If DCount("[IdFaktury]", "Faktury") = 0 Then nr = "1/" & year(Date) Else DoCmd.GoToRecord , , acLast nr = Me.NumerFaktury nr = Val(Left(nr, InStr(1,...
Cos nie tak z lista 'Wybierz ZO (nazwa skrócona)' - nie ma wyborzu. Sprawdz zakres '=Nazwa_ZO'.
Nie do końca wiem o co ci chodzi, niby hiperlink ale nie do końca. Może wystarczy po prostu Sub przejdz() Range("A100").Select End Sub Można też tak (tylko szybko się zmienia możesz nie zauważyć :) ) dla wytłumaczenia: Down to w dół Down z minusem to w górę w prawo to ToRight a w prawo z minusem to w lewo Sub przejdz()...
A jak kopiujesz nie używając skrótu klawiaturowego, a prawego przycisku myszy?
Brak odzewu może być spowodowany kiepskim uzasadnieniem sensu wykonywania takiej operacji. Zwykle kontrolki AciveX zaznacza się (w trybie projektowania) trzymając Ctrl, kopiuje (ctrl+c) i wkleja (ctrl+v) w wybrany arkusz, lub kopiuje cały arkusz (ppm). Dlaczego chcesz to zautomatyzować? Ile takich operacji wykonujesz? Czy oprócz przycisków w arkuszu...
To już jest prawie program ;) Dołożyłem arkusz z pracownikami, ponumerowałem od 1 (Jadwiga ma 4) Bez czytnika operujesz klawiszem [Enter] (fokus na przycisku 'zwrot' oraz przy Exit textBox'a) Przetestuj
Jeśli jest to nowy Excel (365 lub Online), to tam są nowe kontrolki pól wyboru, które dają się łatwo kopiować. Są to co prawda niepowiązane pola wyboru, ale stosując formuły można zasymulować ich zachowanie zależne, przypominające przyciski opcji. Jeśli masz te kontrolki u siebie, to napiszę więcej, jak je powiązać.
No tak to jest, gdy poprawka dotyczy fragmentu wyrwanego "ze środka" ;) W załączniku uproszczony przykład kopiowania w ukrytym arkuszu ("Arkusz1"). -odkryj -popatrz -ukryj -naciśnij przycisk -odkryj i zobacz co się narobiło
Nie da się tak jak chcesz. Jeżeli chcesz skrócić klikanie wyciągnij przycisk autofiltru na pasek menu. (poprzez dostosuj - wyrobekj tylko że grupa Dane i Autofiltr]) Wtedy po skopiowaniu i wklejeniu danych masz je od razu zaznaczone więc wystarczy kliknąć tylko w przycisk i już masz autoflitr.
Załącznik mi nie odpowie bo sam go zrobiłem przycisk nie ma podpisanego kodu Nie pisałem o załączniku z Twojego tematu, tylko o tym do którego prowadzi link: http://www.elektroda.pl/rtvforum/topic17... Ściągnij, ALT+F11 i podejrzyj kod pod przyciskiem.
ale nie reaguje na przyciśnięcia To po prostu wygląda tak. Jeśli nie zareagował, to nie byłoby rekord. ten przycisk typ Form, CommandButton - ActiveX bardziej widocznie.
Masz ten błąd po kliknięciu w przycisk?
Prosty wydawałoby się problem... jak zrobić tak, żeby makro w excelu można było uruchomić nie ze skrótu klawiszowego, ale poprzez kliknięcie danego pola czy obrazka? Jeśli to w czym pomoże to podpunkt 5. z tego zadania: http://www.hga.yoyo.pl/pipu/lab05zad.pdf PS. Makra mam już zrobione, tylko ten przycisk...
Tak jak pisał kolega PeteSh - spróbuj zmienić poziom zabezpieczeń makr w samym Excelu. Mam E2003 pod ręką, więc podpowiem: MENU Narzędzia -> Opcje -> Zabezpieczenia -> (przycisk) Bezpieczeństwo Makr Poziom średni będzie odpowiedni (otwierając plik z makrem można decydować, czy makra będą działać). Jeśli się tego nie da zrobić, to jednak pozostanie Ci...
Excel 2003 trzyma przyciski nowo dodane, nie robi tego tylko word 2003.
przycisk excel excel makro przycisk excel przycisk zapisywania
naprawa telewizor philips kontrolka ładowania oleju sygnał video sygnal video
pralka samsung programator trabant schemat
Korozja styków w akumulatorze Xbox: przyczyny i zapobieganie Czujnik temperatury LM335 - zasada działania i zastosowanie