Excel - zobrazení / skrytí grafu VBA

Pomohli byste mi opravit kód pro zobrazení / skrytí grafu v excelu?
Jde mi o to skrýt graf, pokud je příslušná buňka prázdná a zobrazit v ostatních případech, ale programování už mi nic moc neříká

If List2.Range("C14") = "" Then ActiveSheet.ChartObjects("Graf 4").Visible = False
Else: ActiveSheet.ChartObjects("Graf 4").Visible = True

Jsou zobrazeny jen nové odpovědi. Zobrazit všechny

Předmět	Autor	Datum
Takže takto napsané to funguje, stačilo dát do jedné řádky... If List2.Range("C14") = "" Then Activ… Excel 20.04.2015 11:16	Excel	20.04.2015 11:16
Aha, takže Ti jde v podstatě jen o formální zápis kódu (protože jsem moc nechápal, s čím potřebuješ… MachR55 21.04.2015 07:12	MachR55	21.04.2015 07:12
Přesně tak, jsem si schopný leccos najít, jak se co dělá, ale když to mám pak implementovat do kódu… Excel 21.04.2015 08:06	Excel	21.04.2015 08:06
200 řádků už je na pováženou, zvlášť když jsou většinou zapsány tak prasácky, jak jsi uvedl. Začni t… poslední MachR55 21.04.2015 09:30	MachR55	21.04.2015 09:30

Takže takto napsané to funguje, stačilo dát do jedné řádky...

If List2.Range("C14") = "" Then ActiveSheet.ChartObjects("Graf 4").Visible = False Else: ActiveSheet.ChartObjects("Graf 4").Visible = True

Aha, takže Ti jde v podstatě jen o formální zápis kódu (protože jsem moc nechápal, s čím potřebuješ pomoct, když příkazy v původním dotazu byly správné). S ohledem na lepší čitelnost a snažší pochopení kódu, když se k němu po čase vrátíš (aneb - teď je jasné vše, za půl roku nebude jasné nic) je však rozhodně lepší volit tento způsob:

If List2.Range("C14") = "" Then
    ActiveSheet.ChartObjects("Graf 4").Visible = False
Else
    ActiveSheet.ChartObjects("Graf 4").Visible = True
End If

Už jen z toho důvodu, že pokud se ukáže nutnost zapsat další příkazy, jen vložíš další řádky a nemusíš předělávat celý příkaz.

Přesně tak,
jsem si schopný leccos najít, jak se co dělá, ale když to mám pak implementovat do kódu (je tam na můj vkus už docela hodně kódu, ca nějakých 200 řádků, které se ještě prolínají mezi listy) a vyhodí chybu, tak se raději zeptám, nechci něco v tabulce zničit a zároveň jsem přesvědčen, že je to nějaká (pro programátory) volovina, což byl i tenhle případ
Ten tvůj zápis je pěkný.

200 řádků už je na pováženou, zvlášť když jsou většinou zapsány tak prasácky, jak jsi uvedl.
Začni ten kód aspoň trochu strukturovat, jinak se v něm za čas fakt nevyznáš. Základní rady najdeš třeba zde.

Zpět do poradny Odpovědět na původní otázku Nahoru