Elektroda.pl
Elektroda.pl
X
Proszę, dodaj wyjątek www.elektroda.pl do Adblock.
Dzięki temu, że oglądasz reklamy, wspierasz portal i użytkowników.

Jak działają instrukcja warunku w VBA

sharminte 30 Sty 2016 20:30 732 12
  • #1 30 Sty 2016 20:30
    sharminte
    Poziom 5  

    Witam, mam napisany pewien fragment kodu, działa on w 99% poprawnie.
    Pozwala on na przejście do karty określonej konkretnie wprowadzoną nazwą, jednak jeżeli nie ma takowej karty wypluwa on błąd makra, chciałbym aby zamiast tego wypluł komunikat że taka karta nie istnieje, po czym poprosił ponownie o wprowadzenie nazwy.

    Kod: vbscript
    Zaloguj się, aby zobaczyć kod


    Z góry dziękuję za pomoc :)

    0 12
  • #2 30 Sty 2016 21:48
    JRV
    Specjalista - VBA, Excel

    Możesz sprawdzić czy jest ten arkusz
    If IsObject(Worksheets(LCase(zmienna))) Then

    1
  • #3 30 Sty 2016 23:46
    sharminte
    Poziom 5  

    Przerobiłem wcześniej podany skrypt na coś takiego, jednak dalej otrzymuje błąd makra w momencie podania nieistniejącego użytkownika. :)

    Kod: vbscript
    Zaloguj się, aby zobaczyć kod


    Gdzie został przeze mnie popełniony błąd ? :)

    0
  • #4 30 Sty 2016 23:54
    JRV
    Specjalista - VBA, Excel

    TextBox1 jest w formie 'wybor'?

    0
  • #5 30 Sty 2016 23:55
    sharminte
    Poziom 5  

    'textbox1' jest to pole tekstowe którego zawartość jest zapisywana do zmiennej.

    0
  • #6 31 Sty 2016 00:00
    JRV
    Specjalista - VBA, Excel

    sharminte napisał:
    'textbox1' jest to pole tekstowe

    Nie pytam co jest tekstboks, tylko gdzie się znajduje (na arkuszu, formularze, jaka nazwa arkusz lub formularza)

    0
  • #7 31 Sty 2016 00:03
    sharminte
    Poziom 5  

    formularz, jego nazwa to 'skoroszyt'.

    0
  • #8 31 Sty 2016 00:18
    JRV
    Specjalista - VBA, Excel

    bez załączenia pliku jest trudno powiedzieć

    0
  • #9 31 Sty 2016 00:19
    sharminte
    Poziom 5  

    Karta 'Wybór' jest utworzona. jest to główna karta która jest kartą startową dla całego skoroszytu. w niej zaimplementowano odwołanie się do formularza który ma 2 buttony, pierwszy kieruje do innego formularza którego skrypt został zamieszczony w tym temacie, drugi zaś kieruje do karty 'Dział Kadr' oraz odwołuje się do innego formularza który prosi o podanie hasła aby móc zarządzać kartą 'Dział Kadr'.


    Główne założenie tego skryptu który został przeze mnie podany kilka postów wyżej jest takie:

    1. Wprowadzona zostaje przez użytkownika poprzez formularz nazwa arkusza ( w tym przypadku imię i nazwisko pracownika )
    2. warunek sprawdza czy pole tekstowe nie zostało puste
    3. jeżeli pole nie jest puste, kolejny warunek ma sprawdzić czy arkusz o podanej nazwie istnieje po czym:

    a) Jeżeli istnieje to ma do niej przejść po czym odwołać się do innego formularza (w tym przypadku o nazwie 'worker').

    b) Jeżeli nie istnieje ma zostać wyświetlony komunikat, że taki arkusz nie istnieje po czym ponownie poprosić o wprowadzenie nazwy

    0
  • #10 31 Sty 2016 07:32
    JRV
    Specjalista - VBA, Excel

    Jest to strata czasu. Załącz przykładowy plik.

    0
  • Pomocny post
    #12 31 Sty 2016 13:47
    JRV
    Specjalista - VBA, Excel

    Myliłem się
    Trzeba tak:

    Kod: vb
    Zaloguj się, aby zobaczyć kod

    0
  • #13 31 Sty 2016 14:02
    sharminte
    Poziom 5  

    Dziękuję bardzo :)

    0