< návrat zpět

MS Excel


Téma: Úprava makra - vkládání sloupců rss

Zaslal/a 18.2.2016 11:08

Ahoj,

mám tu makro, které slouží ke vkládání nových sloupců za každý čtvrtý, ale potřeboval bych ho upravit tak aby vkládání začalo až od patnáctého sloupce a ne od začátku. Dokázal byste mi někdo poradit?
Díky.

Sub insert_column_after_interval_4()
For colx = 4 To 200 Step 5
Columns(colx).Insert Shift:=xlToRight
Next
End Sub

Zaslat odpověď >

Strana:  « předchozí  1 2
#030187
avatar

dontom napsal/a:

Už se mi to podařilo, díky. Ještě bych potřeboval sečíst každý pátý sloupec, vidíte v tom vzorci nějakou chybu?

=SOUČIN.SKALÁRNÍ((MOD(SLOUPEC($N$4:$BFP$4);5)=0)*($N$4:$BFP$4))


Vzorec je asi dobrý.
Možno tam niekde nemáš číslo ale nejaký text. 4citovat
#030189
avatar

marjankaj napsal/a:

dontom napsal/a:Už se mi to podařilo, díky. Ještě bych potřeboval sečíst každý pátý sloupec, vidíte v tom vzorci nějakou chybu?

=SOUČIN.SKALÁRNÍ((MOD(SLOUPEC($N$4:$BFP$4);5)=0)*($N$4:$BFP$4))

Vzorec je asi dobrý.
Možno tam niekde nemáš číslo ale nejaký text.

A je nějaký způsob jak to sečíst když se v řadě text objevuje?citovat
#030190
avatar
A ako chceš ten text spočítať? Mňa nič nenapadá. To nás v škole neučili.citovat
#030192
avatar
Nechci spočítat text, jen se objevuje v tom řádku. Přikládám screen. Potřeboval bych sečíst položku "Dnů v prodlení" za všechny měsíce.

http://www.jpeg.cz/images/2016/02/18/Sr2J.jpgcitovat
#030193
avatar
Tak mám, Sumifs se ukázalo jako použitelné, ale díky.citovat
#030195
avatar

dontom napsal/a:


http://www.jpeg.cz/images/2016/02/18/Sr2J.jpg

Hezká vymalovánka. 2
Ale tu je to o exceli.citovat
#030225
avatar

marjankaj napsal/a:

dontom napsal/a:
http://www.jpeg.cz/images/2016/02/18/Sr2J.jpg
Hezká vymalovánka.
Ale tu je to o exceli.

A ta tvá poznámka do místního konceptu zapadá jak?citovat
#030227
avatar

dontom napsal/a:


A ta tvá poznámka do místního konceptu zapadá jak?

No kto chce adekvátnu radu, tak dá súbor v exceli.
Takýmito obrázkami sa ja zaoberať nebudem a predpokladámže tak isto aj ostatní.
Myslel som, že ti to "došlo".citovat
#030229
avatar

marjankaj napsal/a:

dontom napsal/a:
A ta tvá poznámka do místního konceptu zapadá jak?
No kto chce adekvátnu radu, tak dá súbor v exceli.
Takýmito obrázkami sa ja zaoberať nebudem a predpokladámže tak isto aj ostatní.
Myslel som, že ti to "došlo".

Jo takhle, nedošlo. To jsem samozřejmě chtěl, ale už je moc velký.citovat
#030235
elninoslov

dontom napsal/a:

...vidíte v tom vzorci nějakou chybu?

=SOUČIN.SKALÁRNÍ((MOD(SLOUPEC($N$4:$BFP$4);5)=0)*($N$4:$BFP$4))


Samozrejme. Stĺpec N nieje deliteľný 5, a nieje tam ošetrenie čísla/textu. Takže takto zráta každý 5-ty stĺpec daného riadku počnúc stĺpcom N:
=SUMPRODUCT((MOD(COLUMN($N$4:$BFP$4)+1;5)=0)*(ISNUMBER($N$4:$BFP$4));$N$4:$BFP$4)
=SOUČIN.SKALÁRNÍ((MOD(SLOUPEC($N$4:$BFP$4)+1;5)=0)*(JE.ČISLO($N$4:$BFP$4));$N$4:$BFP$4)


EDIT: A ak sa v tom každom 5-tom stĺpci nevyskytuje text (to nevadí, že v iných stĺpcoch v tom riadku text je), tak stačí:
=SUMPRODUCT((MOD(COLUMN($N$4:$BFP$4)+1;5)=0)*($N$4:$BFP$4))
=SOUČIN.SKALÁRNÍ((MOD(SLOUPEC($N$4:$BFP$4)+1;5)=0)*($N$4:$BFP$4))


Prvý krát som to totiž pochopil, že v zrátavaných dátach je aj text aj čísla. Každopádne, to je ten súbor, kde som Vám robil tie vzorce a formátovanie ?
http://wall.cz/index.php?m=topic&id=29903#post-29967
Tam je v PF vzorec napr.
=INDEX(TBL;TRUNC(COLUMN(D4)/4)*4+13)="NEZAPLACENO"
=INDEX(TBL;USEKNOUT(SLOUPEC(D4)/4)*4+13)="NEZAPLACENO"

Myslím, že to formátovanie Vám prestane korektne fungovať ak tam vložíte stĺpce. Tá kontrola je robená práve na deliteľnosť počtom stĺpcov skupiny. Keď to zmeníte - NOT WORK.citovat

Strana:  « předchozí  1 2

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