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.

VBA Exel - Zaciąganie max wartości z pliku .txt

seba78787878 09 Sty 2016 18:18 645 4
  • #1 09 Sty 2016 18:18
    seba78787878
    Poziom 6  

    Witam
    Potrzebuję skrócić następujący kod w celu lepszego wyglądu.

    Kod: vbscript
    Zaloguj się, aby zobaczyć kod

    Makrem tym zaciągam wszystkie wartości z pliku txt do kolumny "AD" i poprzez funkcję Application.WorksheetFunction.Max szukam maksymalnej wartości do której dodaję 1 i wykorzystuję dalej do następnego makra. Celowo zaciągam dopiero do kolumny "AD", żeby nie rzucało się to w oczy. Potrzebuję tak skrócić te makro aby w komórce np. "AD1" zaciągnąć max liczbę z pliku .txt a nie wszystkie wartości w kolumnie "AD". Jeśli ma ktoś jakiś ciekawy pomysł proszę o pomoc.

    1 4
  • Pomocny post
    #2 09 Sty 2016 18:35
    marcinj12
    Poziom 40  

    Kod: vbscript
    Zaloguj się, aby zobaczyć kod

    0
  • #3 09 Sty 2016 18:55
    seba78787878
    Poziom 6  

    @marcinj12 dzięki za pomoc. To działa. Jeśli masz chwilę to tylko wyjaśnij dlaczego :) Nie rozumię dlaczego po zastosowaniu tego kodu

    Kod: vbscript
    Zaloguj się, aby zobaczyć kod

    twój kod tak dobrze działa.

    0
  • Pomocny post
    #4 09 Sty 2016 19:11
    marcinj12
    Poziom 40  

    To prosty kod do ustalania wartości minimalnej / maksymalnej z wykorzystaniem zmiennej pomocniczej.
    Zaczynasz od ustawienia wartości początkowej - w tym wypadku maxVal = 0. W pętli odczytujesz kolejne wartości z pliku i porównujesz je ze swoim "maximum" w zmiennej pomocniczej. Jeżeli wartość jest większa - to zastępujesz zmienną pomocniczą tą wartością. W przeciwnym wypadku - nic nie robisz. Po przejściu wszystkich liczb w zmiennej pomocniczej zostanie najwyższa wartość.

    Na tabeli może to lepiej widać:










    maxVal (przed)KiedymaxVal (po)
    022
    233
    377
    757
    799
    919
    959

    0
  • #5 11 Sty 2016 09:51
    kinggustav
    Poziom 21  

    Jeszcze jeden drobiazg: wartość maksymalną masz w zmiennej. Zastanów sie czy musisz ją wogóle gdzieś zapisywać? Wtedy nikt jej nie zauważy, bo jej nie będzie. Może da się połączyć te dwa makra w jedno i wtedy powinno to być możliwe?

    0