Witam, Napisałem sobie funkcję w VBA wszystko działa jak powinno, ale żeby przeliczył muszę zaznaczyć pole z =funkcja() kliknąć na pasek i dać enter. Nie działa F9, w opcjach jest auto, CalculateFullRebuild itd.(najpierw radziłem się wujka google), jedyna opcja żeby zadziałało najechać na pasek...

Aktywna komórka, to aktywna komórka... Zamiast funkcji w VBA, oparłbym to o WYSZUKAJ.PIONOWO.

Jeśli chcesz się odwoływać do komórki bieżącej, czyli tej, w której używasz funkcji, to zamiast ActiveCell powinieneś użyć ThisCell albo Caller: Kod: TextZaloguj się, aby zobaczyć kod ale rzeczywiście jak pisze adamas_nt, wygodniejsze w tym przypadku wydaje się być użycie standardowych funkcji.

Trochę za mało informacji, nie wiadomo jak wygląda ta funkcja, jakie ma argumenty. Generalnie funkcje własne użytkownika nie są ulotne. Jeśli mają być, trzeba w treści na początku dopisać Kod: TextZaloguj się, aby zobaczyć kod Funkcje nieulotne przeliczają się, gdy zmieni się wartość podana na liście argumentów, funkcje ulotne przy każdym przeliczeniu arkusza. W praktyce przeliczenie funkcji ulotnej wymusza klawisz F9, a nieulotnej kombinacja Ctrl+Alt+F9.

Po wpisaniu Application.Volatile działa F9 jak najadę na pole z funkcja ale wyrzuca mi ten sam wynik w każdej komórce, w której jest funkcja. Może funkcja ma być jakoś powiązana z komórką, w której jest? Kod: VBScriptZaloguj się, aby zobaczyć kod

REKLAMA

Adblock/uBlockOrigin/AdGuard mogą powodować znikanie niektórych postów z powodu nowej reguły.

VBA Własna funkcja, excel nie przelicza po zmianie wartości.

kesudnik 14 Wrz 2018 07:51 2073 6

REKLAMA

Zgłoś naruszenie prawa

Odpowiedz | Nowy temat

#1 17439596 14 Wrz 2018 07:51

kesudnik kesudnik

Poziom 2

Posty: 3
Autor tematu

Post #1
17439596 14 Wrz 2018 07:51

Witam,

Napisałem sobie funkcję w VBA wszystko działa jak powinno, ale żeby przeliczył muszę zaznaczyć pole z =funkcja() kliknąć na pasek i dać enter.

Nie działa F9, w opcjach jest auto, CalculateFullRebuild itd.(najpierw radziłem się wujka google), jedyna opcja żeby zadziałało najechać na pasek i kliknąć enter.

Czy jest jakiś myk, żeby przeliczał automatycznie za każdym razem kiedy zmienią się dane, w wybranych komórkach?

Pozdrawiam
eufyMake E1 - łatwa personalizacja za pomocą druku UV [sponsorowany]
REKLAMA
#2 17439667 14 Wrz 2018 09:15

kinggustav kinggustav

Poziom 27

Posty: 797

Pomógł: 93

Ocena: 93
Pomocny post? (0)

Post #2
17439667 14 Wrz 2018 09:15

Poczytaj o zdarzeniu onchange.
REKLAMA
#3 17440112 14 Wrz 2018 14:23

Maciej Gonet Maciej Gonet

Specjalista - VBA, Excel

Posty: 2207

Pomógł: 824

Ocena: 481
Pomocny post? (+1)

Post #3
17440112 14 Wrz 2018 14:23

Trochę za mało informacji, nie wiadomo jak wygląda ta funkcja, jakie ma argumenty. Generalnie funkcje własne użytkownika nie są ulotne. Jeśli mają być, trzeba w treści na początku dopisać
Kod: Text
Zaloguj się, aby zobaczyć kod
Funkcje nieulotne przeliczają się, gdy zmieni się wartość podana na liście argumentów, funkcje ulotne przy każdym przeliczeniu arkusza. W praktyce przeliczenie funkcji ulotnej wymusza klawisz F9, a nieulotnej kombinacja Ctrl+Alt+F9.
REKLAMA
#4 17446485 18 Wrz 2018 08:20

kesudnik kesudnik

Poziom 2

Posty: 3
Autor tematu Pomocny post? (0)

Post #4
17446485 18 Wrz 2018 08:20

Maciej Gonet napisał:
Trochę za mało informacji, nie wiadomo jak wygląda ta funkcja, jakie ma argumenty. Generalnie funkcje własne użytkownika nie są ulotne. Jeśli mają być, trzeba w treści na początku dopisać
Kod: Text
Zaloguj się, aby zobaczyć kod
Funkcje nieulotne przeliczają się, gdy zmieni się wartość podana na liście argumentów, funkcje ulotne przy każdym przeliczeniu arkusza. W praktyce przeliczenie funkcji ulotnej wymusza klawisz F9, a nieulotnej kombinacja Ctrl+Alt+F9.

Po wpisaniu Application.Volatile działa F9 jak najadę na pole z funkcja ale wyrzuca mi ten sam wynik w każdej komórce, w której jest funkcja.

Może funkcja ma być jakoś powiązana z komórką, w której jest?

Kod: VBScript
Zaloguj się, aby zobaczyć kod
Pomocny post

#5 17446580 18 Wrz 2018 09:21

adamas_nt adamas_nt

VIP Zasłużony dla elektroda

Posty: 5320

Pomógł: 1508

Ocena: 659
Pomocny post? (+1)

Pomocny post
Post #5
17446580 18 Wrz 2018 09:21

Cytat:
i = ActiveCell.Row
Aktywna komórka, to aktywna komórka...

Cytat:
If Cells(i, 3).Value = Worksheets("Dane").Cells(j, 1).Value Then Exit For

Zamiast funkcji w VBA, oparłbym to o WYSZUKAJ.PIONOWO.
REKLAMA
Pomocny post

#6 17446727 18 Wrz 2018 10:58

Maciej Gonet Maciej Gonet

Specjalista - VBA, Excel

Posty: 2207

Pomógł: 824

Ocena: 481
Pomocny post? (+1)

Pomocny post
Post #6
17446727 18 Wrz 2018 10:58

Jeśli chcesz się odwoływać do komórki bieżącej, czyli tej, w której używasz funkcji, to zamiast ActiveCell powinieneś użyć ThisCell albo Caller:
Kod: Text
Zaloguj się, aby zobaczyć kod

ale rzeczywiście jak pisze adamas_nt, wygodniejsze w tym przypadku wydaje się być użycie standardowych funkcji.
#7 17446738 18 Wrz 2018 11:06

kesudnik kesudnik

Poziom 2

Posty: 3
Autor tematu Pomocny post? (0)

Post #7
17446738 18 Wrz 2018 11:06

Cytat:
Zamiast funkcji w VBA, oparłbym to o WYSZUKAJ.PIONOWO.

Dziękuję, już ogarnięte.
Zarejestruj konto, Zaloguj się i bądź aktywny na forum, a wtedy reklamy nie będą się pojawiać. Dołącz do dyskusji i otrzymaj punkty za rejestrację oraz odpowiedzi.

Zainstaluj aplikację Elektroda

Odpowiedz | Nowy temat

Zgłoś naruszenie prawa

Podsumowanie tematu

Użytkownik napotkał problem z automatycznym przeliczaniem własnej funkcji w VBA w Excelu, która wymaga ręcznego odświeżania. Odpowiedzi sugerują użycie zdarzenia `OnChange` oraz dodanie `Application.Volatile` do funkcji, co umożliwia przeliczanie przy każdej zmianie danych. Wskazano również, że zamiast `ActiveCell`, lepiej użyć `ThisCell` lub `Caller`, aby odwołać się do bieżącej komórki. Alternatywnie, zaproponowano użycie funkcji `WYSZUKAJ.PIONOWO` jako prostszego rozwiązania.
Podsumowanie AI na podstawie dyskusji. Może zawierać błędy.

REKLAMA