napisał: nichu
postów: 11
 umieszczony:
3 września 2005
11:21
|
|
Na poczatek to jeszcze raz wielkie dzieki dla CIEBIE za pomoc !!
Respect ! :)
No faktycznie ostatnio duzo korzystam z VBA i mam zamiar sie douczyc
w tym zakresie...
Co do tej ksiazki to mam juz ja na oku od jakiegos czasu i planuje
ja jakos niedlugo kupic.
I z ta funckja wlasnie o takie cos mi chodzilo :)
ostatnio nawet znalazlem slownik pl-ang funkcji excelowych
takze mysle ze jakos sobie bede radzil:)
co nie znaczy ze nie bede sie na forum z problemami wpisywal :D
Dzieki :) |
|
|
napisał: Stanislaw
postów: 109
umieszczony:
2 września 2005
23:58
|
|
Witaj Nichu,
uzupełniając moją poprzednią wypowiedź...
Widzę, że często korzystasz z VBA, więc zachęciłbym Cię
do zdobycia usystematyzowanej wiedzy o tym języku.
W moim poscie
Arkusz excela -> pola formularza - przekazywanie danych
http://www.vbamania.estrefa.pl/index.php?go=forum&go2=zobacz&id_watek=203
zamieściłem 3 linki do stron o VBA,
ale sądzę, że to nie zastąpi dobrego podręcznika.
Bardzo bym polecił książkę Johna Walkenbacha
"Excel 2003 PL. Programowanie w VBA. Vademecum profesjonalisty"
http://helion.pl/ksiazki/e23pvb.htm
Książka kosztuje co prawda 99.90 zł
ale jak się uczyć, to od najlepszych w branży!
Na dłuższą metę warto wiedzieć co to są procedury, funkcje,
zmienne, instrukcje warunkowe, pętle, ...
To co napisałem nie oznacza, że nie możesz na mnie liczyć w razie problemów,
a jedynie, że wtedy rozmawialibyśmy na wyższym poziomie 
Wracając do problemu, o którym piszesz...
W VBA możesz tworzyć tzw. funkcje użytkownika (User Defined Function,
w skrócie UDF).
Np. po wpisaniu w module standardowym poniższej funkcji
Function Wydziel_liczbę(liczba)
Wydziel_liczbę = Left(liczba, InStr(liczba, ":") - 1)
End Function
możesz ją wykorzystywać w arkuszu jak funkcje wbudowaną.
Jest umieszczana w kategorii "Użytkownika"
Możesz ją także wykorzytywać w modułach VBA.
--
Powodzenia
Stanislaw |
|
|
napisał: Stanislaw
postów: 109
umieszczony:
2 września 2005
19:55
|
|
MsgBox Left(Range("Q2").Value, InStr(Range("Q2").Value, ":") - 1)
--
Stanislaw |
|
|
napisał: nichu
postów: 11
umieszczony:
2 września 2005
18:54
|
|
Mam problem z wykonywaniem formul w vba.
Mam taka sytuacje
w ComboBox1 mam dane w formacie LICZBA: WYRAZ (np. 234: COSTAM)
potrzebuje tylko tej liczby w excelu wiem jak to zrobic
=LEWY(Q2;ZNAJDŹ(":";Q2)-1)
a w vba nie mam pojecia
probwalem cos w tym stylu:
aaa = Left(ComboBox1.Value, Find(";", ComboBox1.Value) - 1)
Mysle ze rozwiazanie jest banalne ale ja nie wiem
Moze ktos wie gdzie jest jakis dobry poradnik (moze byc ang)
jak uzywac formul w VBA?
PS A wogole dzieki Stanislaw za pomoc przy poprzednich problemach :) |
|
|
 wstecz 1 dalej  wszystkich stron: 1
|
