< návrat zpět

MS Excel

Téma: Součet proměnlivé obla rss

Zaslal/a jaresj 14.9.2010 10:39

Dobrý den,
možná triviální problém, ale představte si tento jednoduchý vzorec:
ActiveCell.FormulaR1C1 = "=SUM(R[-3]C:R[-2]C)"
Ale já bych potřeboval, aby čísla řádků se tahala z proměnné, mám proměnnou FristRow a LastRow, které určují pozici prvního a posledního řádku oblasti, kterou chci sečíst. Jak toto dosadit do vzorce?
Díky moc

Zaslat odpověď >
icon Poki(14.9.2010 10:49)#002403
Poki
co takto:
ActiveCell.FormulaR1C1 = "=SUM(R[" & FirstRow & "]C:R[" & LastRow & "]C)"citovat
jaresj(14.9.2010 14:35)#002424
avatar
Díky, jak jednoduché. Jde to podobně i s nastavením kritéria ve filtru? Potřebuji vyfiltrovat hodnoty, které jsou větší než proměnná Datum. Zkusil jsem to takto:
ActiveSheet.Range("Tabulka_Denni.accdb5").AutoFilter Field:=5, Criteria1:="> & Datum &"

Ale nefunguje to. Poradíte, prosím?citovat
icon Poki(14.9.2010 14:48)#002427
Poki
nemam to vyzkousene, ale co takto:
ActiveSheet.Range("Tabulka_Denni.accdb5").AutoFilter Field:=5, Criteria1:=">" & Datumcitovat
jaresj(14.9.2010 16:17)#002435
avatar
Skoro to funguje. Filtr to nastaví správně, ale nevybere to nic. Když se podívám přes menu, jak to filtr nastavilo, tak je to tam správně a když z toho vyskočím, tak se to vyfiltruje.citovat
Jeza.m(14.9.2010 16:51)#002441
Jeza.m
Trochu jsem zkoušel a vypadá to, že mu nemůžeš dodat datum ve formátu data, ale čísla:

Dim datum As Date
datum = "20.2.2010"
List1.Range("A:A").AutoFilter Field:=1, Criteria1:=">" & Format(datum, "#")

M@citovat
jaresj(16.9.2010 8:44)#002446
avatar
Tušil jsem, že to bude něco s formátem. Děkuji, takto to funguje.citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje