October 27,2021

Praktyczne miniaturowe makro Excela zwiększa aktualną komórkę o "1"

by Kolbowicz Marek

Często zdarza się, że nie chce się używać Excela do ogromnych ilości danych, ale po prostu coś w nim policzyć. Ile kosów, sikorek sikory itp. widzisz, gdy odwiedzasz park miejski? Jeśli masz przy sobie tablet z Excelem, możesz bardzo łatwo policzyć ptaki. Pomóc może w tym malutkie makro Excela. Nie robi nic poza zwiększeniem aktualnie klikniętej komórki o wartość 1. Oczywiście możesz użyć tego również do innych rzeczy, które chcesz policzyć w poszczególnych krokach.

Rozwiązanie: Tak to działa krok po kroku, jeśli chcesz skonfigurować duży przycisk w arkuszu kalkulacyjnym Excel, którego chcesz użyć. Powinien być odpowiedni dla tabletów.

Krok 1: Pokaż narzędzia programistyczne w programie Excel, jeśli jeszcze tego nie zrobiłeś. Aby to zrobić, kliknij prawym przyciskiem myszy wstążkę i wybierz Dostosuj wstążkę. Aktywuj pozycję Deweloper w prawej kolumnie i kliknij OK.

Krok 2: Stwórz trochę miejsca nad, pod lub po prawej stronie stołu; bo tam jest przycisk. Możesz to osiągnąć, na przykład, dostosowując wysokość wierszy lub szerokość kolumn. Przejdź do narzędzi programistycznych. W sekcji «Sterowanie» weź pierwszy przycisk kontrolny formularza z Wstaw. Narysuj go tam, gdzie chcesz przycisk.

Krok 3: Gdy puścisz mysz, pojawi się „Przypisz makro”. Na przykład wprowadź nazwę CurrentCellPlusEins pod „Nazwa makra” i kliknij Nowy.

Możesz także przypisać nowe makro do $ ('. MagnificPopup'). MagnificPopup ({
typ: 'obraz'
});

Krok 4: Otworzy się okno kodu Visual Basic, które zawiera już wiersze «Sub CurrentCellPlusEins ()» i «End Sub». W międzyczasie dodaj tę jedną krótką linię:

AktywnaKomórka.Wartość = AktywnaKomórka.Wartość + 1

Teraz makro wygląda tak:

Sub CurrentCellPlusOne () ActiveCell.Value = ActiveCell.Value + 1 End Sub

Krok 5: Kliknij Plik / Zamknij i wróć do Microsoft Excel. Makro i przycisk już działają! Kliknij dowolną komórkę i kliknij przycisk. Zobaczysz, że wartość została zwiększona o 1.

Krok 6: Ale można to zrobić trochę ładniej. Kliknij prawym przyciskiem myszy przycisk i wybierz Edytuj tekst. Wewnątrz przycisku możesz teraz napisać lepszy tekst zamiast «Przycisk 1», na przykład «Dodaj 1» lub po prostu «+1». Kompletny? Kliknij ponownie prawym przyciskiem myszy i wybierz Kontrola formatu. Na karcie Czcionka wybierz dowolny kolor i rozmiar czcionki; Możesz także pogrubić czcionkę. Więc bądź odważny! Kliknij OK .

Spraw, aby czcionka w przycisku była trochę ładniejsza $ ('. MagnificPopup'). MagnificPopup ({
typ: 'obraz'
});

Krok 7: Zapisz plik — (ważne) jako poprawny typ pliku. Aby to zrobić, przejdź do Plik / Zapisz jako. W prawej części poniżej pola z nazwą pliku wybierz typ «skoroszyt Excela z makrami (* .xlsm)».

Kompletny! Kiedy otwierasz plik na komputerze PC, notebooku lub tablecie w systemie Windows lub w programie Microsoft Office w programie Excel, zwykle musisz potwierdzić jeden lub dwa paski komunikatów, aby umożliwić wykonanie makr.

Korzystanie z pliku jest dziecinnie proste: kliknij lub dotknij komórki, którą chcesz powiększyć o jeden. Kliknij lub naciśnij przycisk. Jeśli w niniejszym przykładzie są dwa lub więcej ptaków tego samego gatunku, wystarczy nacisnąć przycisk dwa lub więcej razy.

Dodatkowa wskazówka: Czy chcesz uruchomić makro za pomocą kombinacji klawiszy, a nie przycisku? Otwórz plik i kliknij Makra w Narzędziach dla programistów. Kliknij odpowiednie makro na liście i wybierz Opcje. Excel sugeruje skrót klawiaturowy w połączeniu z klawiszem Ctrl. Więc wystarczy podać drugi klucz. Na przykład, jeśli wpiszesz literę d (działają tylko litery), bieżąca komórka zostanie powiększona o wartość 1 w tym pliku za pomocą skrótu Ctrl + d (Ctrl + d).

Uważaj! Przypisując skrót nie należy używać następujących liter, ponieważ są one potrzebne w połączeniu z klawiszem Ctrl + dla szczególnie często używanych funkcji Windows: A, C, P, O, V, X, Y, Z. Ctrl + powinien być wolny R, Ctrl + D, Ctrl + I, Ctrl + J. (forum PCtipp)

  • Kolbowicz Marek
  • October 27,2021

Leave a Reply