Příspěvky uživatele
< návrat zpět
Sub ukazovatko()
Application.Cursor = xlIBeam
Select Case Application.Cursor
Case 1
MsgBox "xlNorthwestArrow"
Case 2
MsgBox "xlwait"
Case 3
MsgBox "xlIbeam"
Case Else
MsgBox "xldefault"
End Select
Application.Cursor = xlDefault
End Sub
No môže si tam pridať riadok
Sheets("Nastavení").Cells(9, 17) = TextBox1*1
Sheets("Nastavení").Cells(9, 17).NumberFormat = "0000"
A bude to mať 0600
A mohol by si priložiť postup ako by si to riešil bez excelu?
Do excelu ti to potom hodí hocikto. 
@opičák
Stačí testovať zmenu v stlpci A
$A1<>$A2
A čo tak automatický filter?
To by som asi riešil podmieneným formátovaním.
=KDYŽ(A(NYNÍ()-DNES())*24>6,5;(NYNÍ()-DNES())*24<=18,5);"DENNÍ";"NOČNÍ")
Alebo kontingenčná tabuľka.
Skús toto.
Takto nejako, ako písal Opičák
daj tam vzorec =AND(COLUMN()<14;COLUMN()>6)
česky
=A(sloupec()<14;sloupec()>6)
Na to musíš odzadu
príkaz
For radek = 1 To ActiveSheet.UsedRange.Rows.Count
nahraď príkazom
For radek = ActiveSheet.UsedRange.Rows.Count to 1 step -1
Libor-Smolka napsal/a:
Ten způsob znám také, ale jde mi o to, ať se soubor zavře na jakémkoliv listu, tak se potom otevře vždy na prvním.
No keď sa ti to nechce uložiť tak ako požaduješ aby sa to otvorilo, tak jedine makro to zabezpečí skok na prvý list.
Zatvorenie nie je uloženie.
Je to jednoduché.
Nastav sa na prvý list a daj uložiť zošit.
Dian napsal/a:
tak už vim řešení, musí se to prvně seřadit, od A-Z a pak Vloopup funguje, názvy nakonec nebyly špatně...takže to nefungovalo jen kvuli tomu, že to nebylo seřazený já se picnu
Nemusí to byť zoradené, ak je štvrtý parameter FALSE alebo 0.
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