VBA.Mania

vbamania.pl

Dziś jest sobota, 18 maja 2024 roku.

Ustaw jako stronę startową

Ulubione

Napisz

Powrót

Powrót do serwisu

Regulamin

RSS

	tytuł wątku:
Wątki dyskusji	Access-(pod)formularz otwarty rozpoczął: Chudy postów: 2

napisał: Chudy postów: 7 umieszczony: 18 listopada 2007 20:57
	może ktoś powiedzieć, że to głupie, bo odpowiadam sam sobie, no ale w końcu znalazłem rozwiązanie... no cóż-wiadomo-google! http://www.bratki.w.v1.pl/accesspseudofaq/11a_VbaWinFrmFaq.htm#vba11a_08 i dalej http://tinyurl.com/svkk5 i cytuję kod Public Function kpIsSubForm(frm As Access.Form) As Boolean Dim f As Access.Form For Each f In Forms If f.hwnd = frm.hwnd Then kpIsSubForm = True Exit For End If Next kpIsSubForm = Not kpIsSubForm End Function

napisał: Chudy postów: 7 umieszczony: 16 listopada 2007 11:02
	witam zbudowałem funkcję VBA "Przychod2()", którą wykorzystuję w polu tekstowycm "A" na formularzu. Funkcja ta bada wartość z pola "Podstawa" i w zależności od tej wartości wykonuje różne działania matematyczne (metoda SELECT CASE....). w skróconej wersji wygląda to tak: Public Function Przychod2() As Double Dim strPodstawa As String strPodstawa = Forms!frmKoszty_light![PODSTAWA].Value Select Case strPodstawa Case " 2", " 4", " 5", "23", "24", "35", "53", "59", "62", "61", "73", "77" Przychod2 = ............... .............. .............. Case " 6", " 7", " 8", "11", "15", "38", "41", "42", "45", "57", "67" Przychod2 = ............... .............. .............. Case "31", "32", "33", "43", "52", "78", "81", "85", "86" Przychod2 = ............... .............. .............. Case Else Przychod2 = 0 End Select End Function okazało się, że ten obecnie ten formularz chciałbym wykorzystać jako podformularz. Jednak konieczne jest zmiana ścieżki do pola "Podstawa" strPodstawa = Forms![frmPorownanie]![frmKoszty_light].Form![PODSTAWA] czy można i jak zmusić acces do tego, aby sam podmieniał ścieżkę (?sprawdzić czy formularz "frmKoszty_light" otworzono samodzielnie albo jako podformularz do głównego pt "frmPorownanie"?) dajcie jakąś podpowiedź, może jest inne rozwiązanie? a tak na marginesie - otworzenie formularza ze złą ścieżką powoduje u mnie błąd accessa, komunikat oznajmia mi że b.chętnie powiadomią o tym błędzie Billa Gatesa i że baza wymaga odzyskania po błędzie...

wstecz 1 dalej

wszystkich stron: 1