vbamania.pl
login:
hasło:
 
  *Rejestracja *Zapomniane hasło
 Dziś jest piątek, 03 maja 2024 roku.
Ustaw jako stronę startową Ulubione Napisz
PowrótPowrót do serwisu  RegulaminRegulamin rssRSS

  tytuł wątku:
Wątki dyskusji

Dlaczego to makro nie działa ? Czyżby to przez %
Jak odszukać ciąg wyrazowy "MATERIAŁ DPAA_AA_BB 2006-10-27 xxxxxxxxxxxxxx xxxx xxxxxx xxxx xxxxx"

otwartyotwarty rozpoczął: 0jack0 postów: 2



napisał: jottad
postów: 118


umieszczony:
21 listopada 2006
21:03

  
Cytat:
sub zlicz()
Dim ile As Long
Dim Szukana As String
Dim Wks As Worksheet

Szukana = "MATERIAŁ DPAA_AA_BB 2006-10-27 %" 'szukana wartość
ile = -1
For Each Wks In ThisWorkbook.Worksheets
ile = ile + Application.CountIf(Wks.UsedRange, Szukana)
Next

MsgBox ile

End Sub


Czy ten procent to składnik szukanego ciagu? Czy też w ten sposób chcesz uzyskać liczbe wartości z podanym ciągiem i zakończonych dowolnymi znakami (tak jak w SQL)?

Jeżeli to drugie, to powinno być:
Szukana = "MATERIAŁ DPAA_AA_BB 2006-10-27 *"

Pozdrawiam
napisał: 0jack0
postów: 24


umieszczony:
21 listopada 2006
19:09

  
sub zlicz()
Dim ile As Long
Dim Szukana As String
Dim Wks As Worksheet

Szukana = "MATERIAŁ DPAA_AA_BB 2006-10-27 %" 'szukana wartość
ile = -1
For Each Wks In ThisWorkbook.Worksheets
ile = ile + Application.CountIf(Wks.UsedRange, Szukana)
Next

MsgBox ile

End Sub


<-wstecz  1  dalej->
wszystkich stron: 1


Sortuj posty: z