Krzysztof Szulc

Krzysztof Szulc Specjalista ds.
zakupów; KASZUB

Temat: Kwota słownie

Może to głupie pytanie, ale słyszałem od kogoś, że to możliwe. Mianowicie, chciałbym wiedzieć, czy Excel potrafi automatycznie zapisywać daną kwotę? Np. 765,23zł = siedemset sześćdziesiąt pięć złotych i 23/100. Jeśli jest taka możliwość to proszę o wskazówki gdzie tego szukać. Dzięki
Ryszard M.

Ryszard M. Księgowy | Analityk
danych

Krzysztof Szulc

Krzysztof Szulc Specjalista ds.
zakupów; KASZUB

Temat: Kwota słownie

Wielkie dzięki :) Bardzo mi się przyda w pracy. Pozdrawiam.
P.S.
Jeśli ktoś miałby jeszcze jekieś przydatne ciekawostki do pracy w Excelu (przede wszystkim dokumenty sprzedażowe, zestawienia, raporty itp.) proszę o wrzucenie linku. :)Krzysztof Szulc edytował(a) ten post dnia 26.10.07 o godzinie 18:35

konto usunięte

Temat: Kwota słownie

Proponuję przykleić ten temat :-)
Krzysztof Szulc

Krzysztof Szulc Specjalista ds.
zakupów; KASZUB

Temat: Kwota słownie

A czy istnieje coś taskiego jak automatyczne ukrywanie danego wiersza, gdy wartość w danej komórce w tym wierszu =0?

Chodzi o to, że pewne wartości z pierwszej zakładki kopiują mi się do drugiej i chciałbym, żeby ukrywał mi się cały wiersz (w tej drugiej zakładce) gdy skopiowana wartość będzie = 0. Nie wiem czy to dobrze wyjaśniłem. Jeśli nie to odpowiem na dodatkowe pytania. :)
Janusz K.

Janusz K. Ekspert rozwoju i
przyszłości firm,
struktur, systemów
or...

Temat: Kwota słownie

To jest możliwe tylko w wyniku wykonywania procedury, która - w jakimś swoim fragmencie - sprawdzi warunek i ew. ukryje wiersz.
Krzysztof Szulc

Krzysztof Szulc Specjalista ds.
zakupów; KASZUB

Temat: Kwota słownie

Próbowałem to zrobić przy pomocy funkcji "jeżeli". Niestety nie mam pojęcia jakie polecenie wpisać, żeby cały wiersz się ukrył... :( .
Marcin E.

Marcin E. Astrosklep.pl
(zegarki słoneczne)
ExcelBlog.pl

Temat: Kwota słownie

Próbowałem to zrobić przy pomocy funkcji "jeżeli".

Nie wydaje mi sie, aby dało sie to zrobić tylko przy użyciu formuł. W moim odczuciu nie obędzie się bez pomocy VBA. Przykładowe rozwiązanie poniżej.

Zakładając, że chcesz ukryć wiersz 10, jeżeli wartość w komórce D10 wyniesie "0". Prawy przycisk myszy na zakładce "Arkusz1" (lub inny arkusz, w którym chcesz omawiany trick zastosować) i wybierz "Wyświetl kod". Tam właśnie wstawiasz poniższy kod.

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Range("D10")) Is Nothing Then
If Range("D10").Value = "0" Then Target.EntireRow.Hidden = True
End If

End Sub

W bardziej ogólnym przypadku (wpisanie "0" w dowolnej komórce w kolumnie D ukryje wiersz, w którym właśnie to zero wpisałeś)

Private Sub Worksheet_Change(ByVal Target As Range)

With Target
If .Column = 4 And .Value = "0" Then
.EntireRow.Hidden = True
End If
End With

End Sub

Kod jest prosty aż do bólu. Pokazuje tylko jak można to zrobić. Jak oczekujesz dokładniejszej pomocy proszę opisz dokładnie co i jak chcesz, aby sie "robiło" w Twoim arkuszu. Postaram się pomóc.

MarcinMarcin Egert edytował(a) ten post dnia 30.10.07 o godzinie 19:33
Krzysztof Szulc

Krzysztof Szulc Specjalista ds.
zakupów; KASZUB

Temat: Kwota słownie

Jeśli chodzi o VBA to jestem zielony. Postaram się wytłumaczyć na przykładzie o co mi chodzi:
Na pierwszej zakładce wpisuję zamówione ilości.
Na drugiej jest faktura i ilości kopiują się z pierwszej zakładki w odpowiednie pozycje na tej fakturze (różnych rodzajów produktów jest około 50).
Chciałbym, żeby dany wiersz na fakturze ukrywał się, gdy skopiowana ilość (z pierwszej zakładki) w wybranej komórce w tym wierszu będzie równa 0 (nie zawsze są zmawiane wszystkie pozycje). Jeśli jednak ilość ta będzie większa od 0 to żeby wiersz ten automatycznie pojawiał się.
Ręczne ukrywanie wierszy zajmuje mi trochę czasu :(
Z góry dzięki za pomoc.Krzysztof Szulc edytował(a) ten post dnia 31.10.07 o godzinie 17:13
Marcin E.

Marcin E. Astrosklep.pl
(zegarki słoneczne)
ExcelBlog.pl

Temat: Kwota słownie

Cześć,

Gdybyś mi przysłał (mojego maila przesyłam w prywatnej wiadomości) przykładowy plik excela to bym Ci to odpowiednio oprogramował i odesłał. Tak na sucho (skoro w kwestii VBA zielony jesteś) może być to droga przez mękę.
Ryszard M.

Ryszard M. Księgowy | Analityk
danych

Temat: Kwota słownie

K.:
Chciałbym, żeby dany wiersz na fakturze ukrywał się, gdy skopiowana ilość (z pierwszej zakładki) w wybranej komórce w tym wierszu będzie równa 0 (nie zawsze są zmawiane wszystkie pozycje). Jeśli jednak ilość ta będzie większa od 0 to żeby wiersz ten automatycznie pojawiał się.
Ręczne ukrywanie wierszy zajmuje mi trochę czasu :(

VBA byłoby lepsze ale również mógłbyś sobie założyć filtr na te około 50 wierszy + nagłówek. Wybierz na konkretne wiersze i kolumny z menu "Narzędzia" Filtr --> Autofiltr... i w kolumnie gdzie są sztuki ustaw filtr "(Inne...)" np. na "nie równa się: 0".
Ale to tylko pół-rozwiazanie bo trzeba byłoby i tak ręcznie odświeżać.
Pozdrawiam
Marcin R.

Marcin R. Specjalista ds.
analizy danych,
Dospel sp. z o.o.

Temat: Kwota słownie

Jeśli te pozycje ze sztukami wpisywanymi mają unikalne numery (a zazwyczaj tak jest dla produktów firmy) to zrób fakturę z wszystkimi pięćdziesięcioma pozycjami, gdzie w kolumnie sztuki będzie formuła pobierająca ilości z arkusza szt do arkusza faktury.
Np. coś w ten deseń: wyszukaj.pionowo(poz ;zakres_poz; kol_poz; fałsz) i filtruj (filtrem, listą w zależności jaka wersja Excela) fakturę na okoliczność ilości > 0. Jeśli to chcesz zautomatyzować bardziej to nagraj makro - do tego nie trzeba znać VBA.
Adam Kolecki

Adam Kolecki Student, Wyższa
Szkoła Bankowa w
Toruniu

Temat: Kwota słownie

Można zrobić to jedną (choć długą) formułą, bez użycia VBA. Ponieważ formuła jest długa, nie zadziała w Excelu 2003 i wcześniejszym: http://czterycztery.pl/programy/kwota_slownie.html
Oskar Shon

Oskar Shon Dodatki do Office
www.VBATools.pl

Temat: Kwota słownie

Ja podam 2 rozwiązania:
Jedno dla Excela, które zawiera też możliwość stosowanie funkcji UDF: Zamień liczbę na słownie

Obrazek


Obrazek


Drugie dla Worda, z opcją zamiany/dopisania już istniejących wartości na słownie: Zamień liczbę na słownie

Obrazek

Następna dyskusja:

Rozbijanie_kwota_nominały




Wyślij zaproszenie do