Vymyslel som si takéto makro. Po stisku enter alebo šípka dole(hore) sa spustí.
Private Sub Worksheet_Change(ByVal Target As Range)
Dim bunka As Range
If Target.Row <> ActiveCell.Row Then
Set bunka = Cells(Target.Row, 1)
If bunka <> "" Then
Range(bunka, bunka.End(xlToRight)).Interior.ColorIndex = Cells(bunka.Value + 1, 1).Interior.ColorIndex
Range(bunka, bunka.End(xlToRight)).Font.Color = Cells(bunka.Value + 1, 1).Font.Color
End If
End If
End Sub
Pokiaľ ide o tú udalosť, ktorá má spustiť to druhé makro. Ako si to predstavuješ?
Tu máš formátom aj vzorcom. Makro netreba.
Vyznač oblasť napríklad D2:J12 alebo E:J a klikni na makro (tisk)
Ak chceš zobraziť všetko spusti makro a iba odťukni OK.
No marža je rozdiel medzi predajnou cenou a nákupnou cenou. Teda 12,5-10=2,5.
Percentuálne sa vyjadruje v pomere k predajnej cene. Teda (2,5/12,5)*100=20%
Teda najprv musíš vedieť predajnú cenu, a až z toho sa počíta marža.
tak =ABS(A1-A2)
alebo
=IF(A1<A2;"-"&TEXT(ABS(A1-A2);"h:mm");TEXT(ABS(A1-A2);"h:mm"))
A hodnota 10 by mala byť v prvej podmienke alebo v tej druhej?
Alebo to ešte otestovať
=IF(OR(D1<0;D1>=50);"mimo rozsah";CHOOSE(INT(D1/5)+1;C1;C2;C3;C4;C5;C6;C7;C8;C9;C10))
Záleží v akom tvare to chceš. Urob rozdiel. A1-A2
stačí aj bez toho IF (KDYŽ)
=OR(AND(A1>=0;A1<=100);A1="ANO";A1="NE")
=NEBO(A(A1>=0;A1<=100);A1="ANO";A1="NE")
No aj takto.
Ale netuším, načo ti to bude.
Ak by si tam chcel dať záporné číslo excel ťa nepustí. Musel by si dať pred to apostrof
Skús pozrieť hromadnú korešpodenciu vo worde. Tlač na štítky.
Tiež si to mohla napísať skôr. Ak sú v tých bunkách rôzne funkcie, tak si to ťažko budeš vyhodnocovať makrom.
A ten vzorec tiež treba upraviť ak máš OPAKOVAT namiesto REPT
adresa = Mid(cell.Formula, 7, Len(cell.Formula) - 9)
na adresa = Mid(cell.Formula, 11, Len(cell.Formula) - 13)
Súhlasím s Jeza.m, je to tak trochu vyumelkované
Najlepšie by bolo to preniesť tak ako hovorí Jeza.m
Skúsil som niečo urobiť, ale je to založené na tom, že v oblasti musí byť použitý ten tvoj vzorec "=REPT(XXXXX;1) vo všetkých bunkách. Predpokladám, že si to použil aby sa ti tam nezobrazovali "0" namiesto "".
CTRL+C a potom CTRL+V
Alebo si na to urob makro, najlepšie nahrávaním
No asi to máš naozaj zle zadefinované.
Ale kde, to ti ťažko niekto povie, keď si to nepriložil.
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.