=A1+A2+IF(WEEKDAY(A1+A2;2)>5;2;0)
Zakáž makrá. Či to bude robiť aj potom.
eLCHa napsal/a:
Je to pořád dokola to samé - stačí trošku hledat
@Palooo, marjankaj
Taky byste už mohli zareagovat na to co tu sem tam píšu. :(
Proč cyklus.
Vhodnejšie je ísť odzadu
for x = 666 to 1 step -1
if cells(x,1) <> "" then rows(x).delete
next
A kríž tam nie je?
riadok zelený a stlpec žltý.
A tlačítko CTRL ti inak funguje?
Skús pravé CTRL.
Když dám formát a upravit šířku buňky
Takéto niečo som v exceli 2010 nenašiel. Že by v exceli 2013 také zapracovali?
Čo myslíš pod vyfiltrovať?
Vylúčiť duplicity?
Alebo tie duplicity vypísať?
=IF(ISBLANK(A1);"";A1)
No je tam rekurzívne volanie, takže asi ten OLDPOINTER sa stále mení.
Možno by stačilo napríklad
Application.Cursor=xlNorthwestArrow
Neviem, musel by som skúšať. A teraz nemám čas.
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
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.