Zdravim,
tak takova funkce, ktera by umela formatovat barvy neexistuje (alespon mezi vestavenymi funkcemi Excelu) - tady pomuze jen makro, ktere nebude na par radku, musel byste PRESNE definovat, co ma delat.
Tzn. kdy ma mit slovo jakou barvu, kdy ma byt podtrzene...atd
Hm, to je zvlastni, napada me jedine to, ze mate v sesitu proceduru, ktera pred zavrenim formatovani odstrani...
No tak do formulare, jako takoveho, zadny text nedostanete.
Musite na formular dostat nejaky textbox nebo combobox nebo label.
s pomoci procedury, napr. Initialize (ktera probehne pri zavadeni formulare):
UserForm1.TextBox.Text = Worksheets("List1").Range("A1").Value
Taky jsem to zkusil...
nechtelo se mi ten strasne dlouhej kod moc studovat, ale myslim, ze by to slo zapsat takto:
Sub secti()
Dim i As Long
' sloupce B a I
For i = 5 To 13
Cells(i, 2) = Cells(i, 2) + Cells(i, 9)
Cells(i, 9).ClearContents
Next i
' sloupce D a J
For i = 5 To 13
Cells(i, 4) = Cells(i, 4) + Cells(i, 10)
Cells(i, 10).ClearContents
Next i
End Sub
vzorec vyse zkratka jen naleznete polohu znaku '=' (v prikladu je to 2) a pak jen vezme vsechny znaky za rovnitkem (12,6) a prevede je na hodnotu
jde temer vsechno, jen presne vedet, co vlastne chcete... :-) - a pak se taky presne zeptat.
Takze, chcete secist oblast A1 az A10 a pak k tomu jeste pricist B1 az B10?
nebo chcete mit matici deseti souctu (A1+B1;A2+B2...)?
Zdravim,
takovy event na listu neexistuje, k dispozici jsou tyto:
- Activate BeforeDoubleClick
- BeforeRightClick
- Calculate
- Change
- Deactivate
- SelectionChange
Budete muset zalozit sve makro na nekterem z vyse uvedenych s nejakymi dodatecnymi podminkami...
Postup byl spravny, jen to chtelo dalsi funkci...
Treba takto:
To Lano: Myslim, ze pouzit kont. graf nepomuze, protoze pri dopsani dat pod oblast, ze ktere je kont. tabulka udelana se v tabulce (ani v grafu) neprojevi, musela by se muset aktualizovat oblast vstupnich dat pro kont. graf...
S Office 2000 nemam zadne zkusenosti a nejsem schopen otestovat:
Zkuste nahradit radek, ktery haze chybu timto:
ActiveChart.Legend.Delete
Něco se řešilo tady: http://wall.cz/index.php?m=topic&id=5406&page=1#posts
Nejak takto?
Myslim, ze ve verzi Excelu 2007 se musi pred pojmenovanou oblast dat i nazev sesitu, jinak to nefunguje:
takze treba takhle: Sešit1!nazev_oblasti
Tady jsem zkusil udelat dynamicky graf.
Ve sloupci A a B jsou vstupni data (tam se muzou pridavat a ubirat popisky (A) a hodnoty (B) libovolne az do radku 100 (lze i zvetsit).
Dalsi dva zaplnene sloupce slouzi ke "scuknuti" mezer mezi vstupnimi daty.
Taky bylo potreba vytvorit pojmenovane oblasti 'osa_x' a 'graf_hodnoty', ktere pak vstupuji pres funkci SADA do grafu...
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
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.