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 - Wyszukiwanie wartości

jelczan123 06 Wrz 2013 12:05 2109 1
  • #1 06 Wrz 2013 12:05
    jelczan123
    Poziom 5  

    Witam,
    Mam taki problem. Wyszukuje komórek w następujący sposób:

    Selection.Find(What:="System_Erfassung", After:=ActiveCell, LookIn:=xlFormulas, LookAt :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
    False, SearchFormat:=False).Select

    później potrzebuję wyszukac kolejnej takiej wartości więc mam:
    Cells.FindNext(After:=ActiveCell).Activate

    To wszystko działa sobie w pętli for i=1 to ? no i właśnie tu jest problem, bo nie wiadomo do kiedy. Nie wiem ile takich pól będę miał i ile powtórzeń pętli potrzeba. Jeśli wpiszę za dużo wartość, to wyszuka mi wszystkie, a potem zaczyna od poczatku i potem wychodzą nieprawidłowe wartości, bo dodaje mi po 2 razy to samo.
    Czy jest jakiś sposób żeby po prostu zakończyć wyszukiwanie na ostatniej komórce zawierającej "System_Erfassung", i żeby nie wracał już do poczatku?

    0 1
  • #2 06 Wrz 2013 13:09
    cbrman
    Poziom 27  

    Policz sobie funkcją akuszową licz.jeżeli ilość wystąpień "System_Erfassung" w danym obszarze, np.:

    Kod: vb
    Zaloguj się, aby zobaczyć kod

    0