MS Excel

Ve VB jsem si udelal okynko kde mam vstupy - datum a cislo tlacitkem spocitej a tlacitkem konec

funguje to v pohode spocita mi to kolikrat je na vsech listech dany datum a zaroven to cislo ve stejnym radku s datumem. Ted to potrebuju jen upravit aby mi to nehledalo primo cislo ale aby mi to spocitalo kolikrat je tam dany datum a "cokoliv" ve sloupci a radku jako predtim to cislo..

Nyní to mam takhle, to počítání datumu pocitam v tabulce pres vzorec, ale je to takovy nespolehlivy - spocita to jen datumy(kontroluje jednu bunku) takze kdyz tam budu mit spatnej zapis (zapisuje se rucne treba 180 polozek denne - takze si predkopiruju datum a obcas se stane ze zapomenu smazat ty datumy co jsou tam k prdu), muzu pridat list a hned musim pridavat vzorec :)

Toto je teda to vyhledani datumu a urcityho cisla(funkcni):

Private Sub CommandButton1_Click()

Dim MyValue, MyDate, b
Dim c As Object
Dim Počet As Integer

Počet = 0
MyDate = CDate(TextBox1.Text)
MyValue = TextBox2.Text
On Error Resume Next
For Each List In Sheets
With List
With .Range("E1", .Cells(.Rows.Count, "E").End(3))
b = .Address
Set c = .Find(MyValue, LookIn:=xlValues, LookAt:=xlWhole)
If Not c Is Nothing Then
firstAddress = c.Address
Do
If CLng(c.Offset(0, -4)) = CLng(MyDate) Then Počet = Počet + 1
Set c = .FindNext(c)
Loop While Not c Is Nothing And c.Address <> firstAddress
End If
End With
End With
Next List
Label3.Caption = Počet
If Počet <> 0 Then
Label3.ForeColor = RGB(255, 0, 0)
End If
End Sub

Private Sub CommandButton2_Click()
End
End Sub

Funkce na spocitani datumu:

=COUNTIF('857822'!A:A;B4)+COUNTIF('857823'!A:A;B4)+COUNTIF('857862'!A:A;B4)+.... atd. v b4 zadam datum co hledam.

momentalne jsem si jeste udelal tabulku s celym rokem a pomoci makra se mi vzdy zkopiruje datum vysledek zapise pod datum a tak se mi vyplni cela tabulka - ale je to krevsky pomaly kdyz to dela celej rok dopredu tak sem tam aspon pridal ze si muzu zvolit do jakyho radku to ma doject ( je to rozhozeny na 23 radku)

http://imgbank.cz/images/excel.jpg

http://imgbank.cz/images/excel2.jpgcitovat

Několik připmínek:
Jak jsem uvedl již dříve a jak vyplynulo z toho, že se to zacyklilo, máme různé formáty dat, nevím, zda používáš český nebo jiný Excel, ale zřejmě je nastavení jiné, z obrázků co jsi poslal, se to poznát nedá, z nich nepoznáš, zda je 1 jako číslo nebo text a nevzájem je také jednotuše nenajdeš, nejde jen o to jak vypadají při zadaní, ale zejména jak vypadají na jednotlivých vyhledávaných listech!!!
Ty nejsou ani na obrázku.
Pro alespoň trochu odpovídající program je nutno znát i řádově počty dat.
Jinak vyhledávám jednu hodnotu v malém počtu dat jinak ve velkém počtu dat a jinak, když vyhledávám více dat ne jedno datum jak bylo v zadaní, narozdíl od celého roku jak je na obrázku.
Obrázek jsem musel nějak převést do Excelu, pokud neodpovídá musíš opravit je to jen skica, návrh neměl jsem nic jiného.
Zadáš od a do a stiskneš vyplni pokud nebude fungovat je chyba v zobrazování datumu a tu přes obrázek nevyřeším.
http://LeteckaPosta.cz/987142023citovat