Příspěvky uživatele
< návrat zpět
Zdravím všechny zkušené uživatele a obracím se na vás s tímto dotazem.
Nechci uživatele tabulek pouštět přímo k datům v tabulce, kde je snadná možnost přepsání dat. Všechny přístupy povoluji pouze přes ListBox. Zároveň ale hojně využíváme v tabulkách barevné písmo, které významně zrychluje orientaci v tabulce.
Je nějaká možnost obarvit písmo i v ListBoxu?
Předem dík za vaše nápady.
Díky za radu, vyzkouším.
Potřeboval bych prosím poradit s následujícím problémem. Mám 2 sloupce záznamů v tabulce. Zobrazení vybraných hodnot potřebuji provádět ve formuláři buď v label.caption nebo textbox.text. Následující kód funguje tak, že si vyberu část zázanů ohraničenou řádkem začátku záznamů - zac a řádkem konce záznamů - kon. Z tohoto intervalu vyberu náhodným číslem záznam a hodnotu z prvního sloupce chci zobrazit v textbox5.text a po uplynutí 2s zobrazit hodnotu z druhého sloupce v textbox6.text. Pokud program trasuji, funguje správně, pokud jej spustím bez přerušení, zobrazí se pouze první hodnota v textbox5.text a po dokončení cyklu poslední hodnota v textbox5.text a v textbox6.text. Jako kdyby zobrazení ve dormuláři nestíhalo rychlost výpočtu v cyklu a požadavek na zobrazení v textboxech.
Měl by někdo ideu, jak tento problém vyřešit, abych dosáhl správného zobrazení hodnot?
Private Sub CommandButton1_Click()
For i = 1 To 5
zaznam = Int((kon * Rnd) + zac)
TextBox5.Text = Cells(zaznam, 33)
Application.Wait (Now + TimeValue("0:00:02"))
TextBox6.Text = Cells(zaznam, 32)
Next i
End Sub
Uživatelské menu
\nMenu
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.
RSS nejnovější články