• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

Příspěvky uživatele

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.

No aby to bolo presne podľa zadania, tak by som to trochu upravil

Public Sub radky2()
Application.ScreenUpdating = False 'zakázat vykreslování v průběhu makra - zvýší rychlost
Dim radek As Single
radek = 1
Do While Cells(radek, 1) <> "" 'maximum řádků na listu, ale lze nastavit vlastní a nižší šíslo - makro pak bude rychlejší protože bude ověřovat jen třeba 2000 řádků
Rows(radek+1).EntireRow.Insert ' Cells(radek + 1, 1).EntireRow.Insert
radek = radek + 2
Loop
Application.ScreenUpdating = True 'povolit vykreslování
End Sub

=CHOOSE(MOD(B$86+CHOOSE(LEFT($A88;1);6;0;2;4);8)+1;"D";"D";"N";"N";"";"";"";"")

Teraz neviem či ide to overovanie aj z iných listov v starších verziách.
Skús tie oblasti pomenovať a odkazovať sa na názov.

A nie je to iba tá oklieštená verzia? Bez makier a aj bez iných funkcií? Karta "UDAJE"?

http://www.hpobchod.sk/document.asp?dc=office10

http://office.microsoft.com/sk-sk/starter-help/dostupne-funkcie-v-programe-excel-starter-HA010374501.aspx?CTT=5&origin=HA010380218

Treba si zakúpiť plnohodnotnú verziu. Napríklad pre študentov a domácnosti.

Aký je to systém.
Aká verzia excelu?

takto?

=MID(A1;1;LEN(A1)-4)&"/"&LEFT(RIGHT(A1;2);1)

Neviem prečo to takto funguje, ale funguje.
Overenie údajov.

Ale ide to tam skopírovať. Potom už pomôže iba makro.

Veď tabulka má 1048576 riadkov (excel 2010)

Alebo môžeš použiť funkciu SUBTOTAL

Vyfiltruj si potrebnú položku a spočíta ti iba zobrazené.

Nemusíš to takto robiť
stačí do bunky H10 dať vzorec.
=SUMIF(A:A;F10;C:C)
A spočíta ti to.
Samozrejme Jeza.m to chcel vylepšiť, aby bol lepší prehľad. Ale funguje to aj s tými duplicitami.

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

Formulář Faktura

Helios iNuvio

On-line nástroje