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

Příspěvky uživatele

mozna jsi nebyl prihlaseny nebo nevkladas zip nebo... nebo ... nevim...

.7z neotevru, mohl byste vlozit verzi v .zip nebo .rar?

Pokud vim, tak to slo menit u Excelu 2003 (ve 2007 to nefunguje).
Slo o to zmenit barevne schema vybrany polozek v celem windows.

Na plose klik pravym/Vlastnosti/karta Vzhled/Upresnit/v rozbalovacim menu vybrat 'Vybrane polozky' a zmenit barvu/OK
...ale jestli to bude fungovat v Excelu 2010 nevim...

...a co je ted jinak? Muzete vlozit nejaky printscreen?

Nejak moc jsem to nezabezpecoval, ale myslim, ze princip bude jasny...viz priloha

Problem je, ze nelze jednoduse pouzit ten pristup, co jsem pouzil, pro oblasti, ktere nejsou souvisle.
Prikladam tedy novou prilohu, kde to bude fungovat pro vsechny vase vstupy, musel jsem ale predelat rozvrzeni listu DB.
Pokud jde o podporu portalu, urcite to nejak zaridime, paypal existuje, dam vam vedet...

Kazdopadne diky, protoze jste snad jediny, kdo by mel zajet podporit tento projekt...

Podivejte se na prilohu, jestli to bude takto vyhovovat...

V rychlosti jsem to upravil, ale uz nemam cas to zkontrolovat, tak si to otestujte.
Oceneni fora se rozhodne nebranim, co mate na mysli?

hm, tak mozna takto:
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Target.Column = 1 And Len(Target) = 0 Then
Range(Cells(Target.Row, Target.Column + 1), Cells(Target.Row, Target.Column + 2)).ClearContents
Range(Cells(Target.Row, Target.Column + 3), Cells(Target.Row, Target.Column + 4)).ClearContents
Range(Cells(Target.Row, Target.Column + 5), Cells(Target.Row, Target.Column + 6)).ClearContents
End If
Application.EnableEvents = True
End Sub

Zdravim,
pokud potrebujete hodnoty ve sloupcich 2-4 skutecne smazat a nej skryt (coz by udelalo to podminene formatovani), tak musite pouzit makro - to bude navazano na udalost proceduru.
Tedy vzdy, kdyz smazete hodnotu ve sloupci A, tak smazete prislusne hodnoty ve sloupcich B-D

Tento kod vlozte do modulu prislusneho listu:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Len(Target) = 0 Then
Cells(Target.Row, Target.Column + 1).ClearContents
Cells(Target.Row, Target.Column + 2).ClearContents
Cells(Target.Row, Target.Column + 3).ClearContents
End If
End Sub

Nezlob se na me, ale to je jak hluchej do vrat!
Popis je uz sice lepsi, ale stejne bych si musel ty hodnoty, co ty uz v souboru mas, nejak nasimulovat a nevidim jedinej duvod, proc bych mel delat neco, co ty uz mas!!!

To je takovej problem se zaregistrovat a prilozit prilohu v .zip???

Precti si pravidla fora a pak se ptej!
http://wall.cz/index.php?m=topic&id=8351

Protoze jinak ti muzu rict jen, ze by mozna slo pouzit kombinaci funkci POZVYHLEDAT a VVYHLEDAT

ahoj,
srozumitelne to moc neni, aspon pro me - tohle by fakt zaslouzilo prilohu (prilohu smi vkladat jen registravni uzivatele)...

Zdravím,
zkusil jsem to dát dohromady, ale predem rikam, ze to je vyssí divci ve vzorcich.
Netusil jsem, co je doplnujici informace, takze jsem tam dal ten sloupec, kde je vsude OK.

Dva predpoklady:
1) pokud je nekde 0 ks, tak na liste DB musi byt zapsana nula (nestaci prazdna bunka)
2) pocet polozek, ktere mohou byt vypsany je omezen na 10 (podle polozek v DB) - pokud bude potreba rozsirit, museji se upravit vzorce...

..snad to bude OK

pokud bude hodnota, kterou chcete otestovat v bunke A2
C1 bude spodni limit
E1 bude horni limit

tak vzorec:=A(A2>=$C$1;A2<=$E$1)vam pozadovane zajisti. PRAVDA pokud se nachazi v intervalu a NEPRAVDA pokud je mimo interval

Mozna takto...

Zdravim,
pokud vim, tak ten 'vodoznak' vypnout nejde.
Jedine, co me napada je pouzit pozadi ve stejne barve, jako je ten 'vodoznak', coz je tusim nejaka seda cca 40% - to ale neni asi uplne idealni.
Pak by slo dosahnout toho, co potrebujete nejakou procedurou VBA, ale to by bylo potreba vedet presne, ceho chcete dosahnout...

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

Formulář Faktura

Helios iNuvio

On-line nástroje