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.

Excel/VBA - zakres dla calej kolumny o podanym wierszu

ttrx123 14 Kwi 2017 13:10 639 11
  • #1 14 Kwi 2017 13:10
    ttrx123
    Poziom 3  

    Hej,

    potrzebuje zrobić funkcję, która sprawdzi czy pole w wierszu 139 jest równe Mandatory jezeli tak to sprawdza czy pola ponizej jest puste, potrzebuje to żeby odznaczyć checkbox.

    To na czym utknąłem to :

    Kod: vbscript
    Zaloguj się, aby zobaczyć kod



    ale nie chce dla każdej kolumny pisac ifa

    help

    0 11
  • #2 14 Kwi 2017 13:31
    lesławek
    Poziom 31  

    Zamieść arkusz z tym co napisałeś...

    0
  • #3 14 Kwi 2017 13:45
    ttrx123
    Poziom 3  

    Całego arkusza nie dam rady wrzucić musiałbym tworzyć cały na nowo. Generalnie całe makro wygląda tak:

    Kod: vbscript
    Zaloguj się, aby zobaczyć kod

    Także pytanie jak kolumne "C" zamienić na dowolną. Czyli żeby osiągnąć efekt o którym pisałem:
    -> jeśli pole w kolumnie oznaczonej w wierszu 149 = mandatory jest puste to odznaczyc checkbox

    0
  • #4 14 Kwi 2017 14:44
    lesławek
    Poziom 31  

    No tak, ale gdzie jest ten checkbox, czy jest dla każdego wiersza ?

    0
  • #5 14 Kwi 2017 15:00
    ttrx123
    Poziom 3  

    Checkbox jest dla kazdego wierszu w pierwszej kolumnie. także to wszystko działa tylko musze teraz napisac to:

    Kod: vbscript
    Zaloguj się, aby zobaczyć kod


    w formie ktora przyjmie vba, bo niestety takiego ifa nie akceptuje

    0
  • #6 14 Kwi 2017 15:19
    lesławek
    Poziom 31  

    Jak te checkboxy się nazywają??? Ręcznie dodałeś kilkaset checkboxów???
    Iterację po kolumnach zrobi taka pętla...

    Kod: vbnet
    Zaloguj się, aby zobaczyć kod

    0
  • #7 14 Kwi 2017 15:26
    ttrx123
    Poziom 3  

    Checkboxy dodaje poprzez funcje:

    Code:
    Set chk = ws.CheckBoxes.Add(cel.Left, cel.Top, 30, 6) 'you can adjust left, top, height, width to your needs
    

    0
  • #8 14 Kwi 2017 15:31
    lesławek
    Poziom 31  

    Rozumiesz, że aby ktokolwiek ci pomógł musi mieć pełne informacje o tym co chcesz zrobić i co masz do tej pory? Ty zaś zamieszczasz kod po jednej linijce...

    0
  • #9 14 Kwi 2017 15:41
    ttrx123
    Poziom 3  

    Wydawało mi się, że nie ma sensu zamieszczania całego kodu dodawania w pierwszej kolumnie checkboxów bo generalnie całość prakytcznie produkuje ta linijka, którą wkleiłem.
    Do meritum, na chwile obecną cała funkcja wygląda tak i niestety zawiesza excela.

    Kod: vbscript
    Zaloguj się, aby zobaczyć kod

    0
  • #11 14 Kwi 2017 16:03
    ttrx123
    Poziom 3  

    wartosc checkboxa, ale to nie jest problem.
    Generalnie chk to checkboxy i jeśli mamy

    Kod: vbscript
    Zaloguj się, aby zobaczyć kod


    To wszystko działa, ale teraz chce działanie tego rozszerzyć do wszystkich kolumn ktore sa w wierszu 139 oznaczone jako Mandatory. A nie tylko do tych trzech.

    0
  • #12 15 Kwi 2017 08:22
    adamas_nt
    Moderator Programowanie

    Tak "na oko": dodatkowa pętla dla kolumn + instrukcja warunkowa.

    Ale bez przykładu, to możemy tylko zgadywać...

    Kod: vbscript
    Zaloguj się, aby zobaczyć kod

    0