< návrat zpět

MS Excel


Téma: graf sumy dynamicky pocitaneho sloupce rss

Zaslal/a 14.6.2013 19:47

Ahoj. Mam sloupec s cislama a vedle nebo vzorec, ktery cislo nasobi promennou.

Kdyz je prumenna treba 0,5, tabulka by vapadala asi takhle:
5|2,5
8|4
1|0,5
0|0
10|5
Ja potrebuju data pro graf, kde Y bude ta promenna a X bude suma druheho sloupce. Vite jak to jednoduse udelat? Diky.

Zaslat odpověď >

Strana:  « předchozí  1 2
icon #014171
eLCHa
Řeknu to takto:

Přes COUNTIFS to nejde.

A ještě doplním, že to určitě půjde přes vzorce, ale studium toho souboru mi zabralo skoro hodinu a ještě jsem je nezačal dělat (je to děsně provázané). Kdybych ten soubor vytvářel od začátku, tak bych to tam asi měl, teď mi nezbývá než poradit - napište (nahrajte) si makrocitovat
#014176
avatar
Makro jako script ve visual basicu nebo makro jako nahravani toho, co delam?
Jestli to ma bejt nahravani, tak jak ho naucim zvysit hodnotu jedny bunky o jeden krok (0,001) a jinde pod sebe zapisovat hodnotu jiny bunky jako data pro graf?
Je na to nekde navod nebo pod cim to mam hledat? Diky.citovat
icon #014178
eLCHa
Nahrajte makro - stačí tak 3, 4 kroky a dejte ho sem - on to už pak někdo upraví na těch 400 ;)citovat
#014181
avatar
Jak jsem se koukal na ten kod, trochu jsem tomu porozumel a pokusil jsem se si to napsat nejak sam. Problem nastal na radkach typu: Range("BD" + i).Select, kde chci, aby vyber u kazdyho kroku cyklu byl BD0, BD1, BD2, ...

Cely makro:
Sub mojemakro()
krok = 0.001
aktualni = 0

For i = 0 To 10
Range("C94").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = aktualni + krok
Range("C94").Select
Selection.Copy
Range("BD" + i).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False



Range("M97").Select
Application.CutCopyMode = False
Selection.Copy
Range("BE" + i).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False



Range("O97").Select
Application.CutCopyMode = False
Selection.Copy
Range("BF" + i).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Next i
End Subcitovat
#014184
avatar
Tak uz jsem na to prisel. Po zjednoduseni to ma jen par radku. http://pastebin.com/fR6amQiP

Diky za rady.citovat

Strana:  « předchozí  1 2

Uživatelské menu

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

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

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

Aktivní diskuse

Řazení podle času v kategoriích

veny • 16.7. 11:34

špatný výpočet ze zisku - příčina?

Anonym • 12.7. 22:56

špatný výpočet ze zisku - příčina?

Jakoby • 12.7. 12:35

Řazení podle času v kategoriích

Marekh • 12.7. 9:55

Porovnávací Tabulka

Jess • 8.7. 20:49

Vzorec pro zkopírování obsahu buňky.

veny • 6.7. 8:28

Vzorec pro zkopírování obsahu buňky.

Tonda_Hu • 5.7. 21:17