Příspěvky uživatele
< návrat zpět
4 kusy 1,5 m je bez odpadu.
Tak isto 5 kusov 1,2 m je tiež bez odpadu.
Neviem síce čo robíš. Neviem ako to robíš. Súbor pridať nechceš. Ani tvoju verziu excelu neviem. Tak si tipnem. 
Skús to uložiť ako TXT súbor.
A potom to premenuj na XML
Čo keby si tak priložil excelovský súbor a súbor ako má vyzerať výstup?
Možno by si mal uviesť, čo myslíš pod pojmom ENTITA. Inak to tu bude ako ja o koze a ty o voze.
Najlepší by bol nejaký príklad.
Teda vstupné dáta a ako má vyzerať podľa teba výstup.
Excel počíta iba na 15 platných číslic.Teda ak máš 6 číslic pred desatinnou čiarkou, tak nemôžeš čakať že desiata číslica za desatinnou čiarkou bude presná.
Pali, jasné, že to treba upraviť podľa zadávateľa. Ale naslepo, je to problematické presne utrafiť.
Sub Makro1()
Range("tabulka1").Copy ' tabulka1=vkladaná tabulka
Range("tabulka2").Offset(-1, 0).Insert ' tabulka2= tabulka pred ktorú sa vkladá tabulka 1
Application.CutCopyMode = False
End Sub
Palooo napsal/a:
a bude vzdy zlta? ked hej tak je to easy :)
Veď ju pomenuj a nemusí byť ani žltá.
x(t)=suma(x(i)*S(i))/suma(S(i))
y(t)=suma(y(i)*S(i))/suma(S(i))
S(i) - jednotlivé plochy
x(i), y(i) súradnice ťažiska jednotlivých plôch
Alebo bez makra.
Používaš ovládacie prvky?
=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.
Ja som iba opravil Palooov cyklus.
Zadanie som neriešil.
Vhodnejšie je ísť odzadu
for x = 666 to 1 step -1
if cells(x,1) <> "" then rows(x).delete
next
Uživatelské menu
\nMenu
On-line nástroje
Formulář Faktura
Formulář Faktura IV
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
RSS nejnovější články