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

Příspěvky uživatele

Dobrý den,

potýkám se s dvěma problémy, které se týkají podmíněného formátování. V příloze je velmi zjednodušený příklad - jedná se o dobu trvání montáže s uvedením pracovníka, který montáž provádí. Některé buňky mohou být sloučeny v případě, že montáž trvá déle než v hlavičce uvedený časový interval.

nyní k věci

1. v oblasti A1:F10 mám nastaveno podmíněné formátování. Uměl by někdo poradit, jak zajistit, aby po znovu rozdělení sloučených buněk podmíněné formátování fungovalo? Funguje totiž vždy jen u jedné rozdělené buňky (u ostatních buněk, které byly součástí sloučené buňky, bohužel ne). Například pokud v přiloženém souboru rozdělím sloučenou buňku obsahující jméno Petr, přijdu o podmíněné formátování u buněk D6 a E6.

2. v podmíněném formátování mám nastaveno i vnější ohraničení buněk kolem buněk. U jednotlivých (nesloučených) buněk to funguje bez problémů, ale u sloučených buněk je ohraničení neúplné (jen v levé části sloučené buňky).

Měl by někdo tip, jak oba uvedené případy zdárně vyřešit?

Děkuji moc

Miroslav

Vyřešeno pomocí nástroje fotoaparát a umístěním dvou tiskových výstupů pod sebe na nový list, který následně pomocí tlačítka vytisknu.

Třeba to někomu pomůže

Dobrý večer,

v přiloženém souboru je uveden vzorový plán montáže. V souboru jsou ukotvené příčky následovně: 2 řádky a 5 sloupců. Rád bych docílil toho, abych na jeden list A4 získal výstup celého aktuálního týdne dle vzoru, který je uveden na přiloženém obrázku (spojil jsem dva výstupy pomocí grafického editoru pondělí až středa + čtvrtek až pátek).



Můžete mi prosím poradit, zda a jakým způsobem je možné takový výstup získat pomocí VBA? (přes tlačítko commandbutton?) Tisk názvů jsem nastavil pomocí návodu z odkazu níže.

https://excel.tips.net/T002702_Printing_Just_the_Visible_Data.html

Rozsah buněk určující konkrétní dny bude vždy stejný F3:AC10 (pondělí až středa) + AD3:AS10 (čtvrtek a pátek).

Jde mi prostě o to, dostat tyto dva výstupy pod sebe na jednu stránku.

Pro vytištění plánu od pondělí do středy stačí jen označit/vybrat oblast F3:AC10 (bez ukotvených příček) a v nastavení tisku vybrat možnost "vytisknout výběr".

Analogicky vytištění plánu od čtvrtka do pátku označením oblasti AD3:AS10...

Snad jsem to popsal sromzumitelně

děkuji moc

Miroslav

Děkuji moc za pomoc, funguje to skvěle.

S těmi dny v týdnu jsem se upsal. Klasická copy-paste-mistake. V takovou noční hodinu již bývám poněkud intelektuálně indisponován

Jen nerozumím pozámce, proč nedávám data pod sebe.
Vždyť tak jak to mám teď, filtrovat můžu (podle zadavatele, podle datumu vložení..)

Vy jste to myslel tak, že by jednotlivé dny (časová osa) byla položena vertikálně? To bych pak ale musel mít zadavatele horizontálně. Celé by se to prostě inverzně otočilo.. Nebo to chápu úplně špatně? Můžete mi prosím uvést příklad takového výstupu?

díky a hezký večer

Dobrý večer,

Ve sloupci B vybírám z rozbalovacího menu příslušného zadavatele, přičemž každému zadavateli jsem přiřadil jedinečnou barvu pozadí buňky. Jde mi o to, že pokud do oblasti F3:I6 vložím nějakou hodnotu (řekněme počet lidí potřebných na montáž v daný den), tak chci, aby se mi po vložení hodnoty změnilo pozadí buňky, dle zvoleného zadavatele. Prázdné buňky zůstanou bílé.

můžete mi prosím poradit, jakým způsobem rozkopírovat podmíněné formátování do vedlejších sloupců (H; I; J atd.)?

Defakto mi to funguje v oblasti F3:G6, ale to jen díky tomu, že jsem nastavil podmínky jednotlivě (prvně v buňce F3 a poté jsem formátování roztáhl dolů po buňku F6, to samé jsem provedl z buňkou G3 - roztaženo na G6).

Finální řešení chci poté zprovoznit v google tabulkách, ale to počítám půjde analogicky.

Za Vaše postřehy děkuji

Miroslav

děkuji :-) to je geniálně jednoduché BRAVO

Jen tápu u toho řešení pomocí "Comba"

Jak mám nastavit, aby se hodnota z comboboxu propisovala...

aha... pomocí linkedcell odložím hodnotu výběru do konkrétní buňky

Tohle jsem ještě nikdy nepoužil. Zase jsem díky Vám o něco málo chytřejší.

Díky moc

příklad v příloze

jde mi o to, jak pomocí vzorců docílit toho, co nyní dělá makro.

Pokud vyberu z rozbalovacího menu možnost NE, chci vložit text do buněk G62 a G64 a číselnou hodnotu do J62 a J64.
Buňky G63, J63, G65 a J65 jsou přitom prázdné.

Pokud vyberu z rozbalovacího menu možnost 2%, chci mít příslušný text v buňkách G62, G63,G64 a G65 + příslušné číselné hodnoty v buňkách J62, J63, J64, a J65.

Analogicky, pokud vyberu možnost 3%....

Logika by měla být jasná z makra.

Vzorce by mi ale výpočty prováděly hned. Řešení pomocí makra je podmíněno kliknutím na příslušný řádek v rozbalovacím menu.

Dobrý den,

je možné do funkce KDYŽ zadat vícenásobnou "událost" při splnění podmínky?

Např.

pokud hodnota v buňce A1 > 10

pak vynásob hodnotu buňky A2 číslem 3 (A2*3)
a zároveň vynásob hodnotu buňky A3 číslem 4 (A3*4)

Jde mi o řešení pomocí vzorce (ne VBA)

Díky za pomoc

Díky pánové. Fungují všechna uvedená řešení :-)

Dobrý večer,

jak prosím docílit toho, aby hodnota listindexu byla k dispozici hned po otevření sešitu?

Např pokud vyberu z rozbalovacího menu francouzštinu a soubor uložím, tak po znovuotevření souboru chci po kliknutí na commandbutton zobrazení hlášky (msgboxu) "francouzština".

Uvedené mi funguje pouze v případě, že po otevření souboru prvně vyberu příslušný jazyk z rozbalovacího menu a poté kliknu na commandbutton.

Zkoušel jsem použít worksheet.activate ale bez úspěchu.

Díky za pomoc

Private Sub ComboBox1_GotFocus()
ComboBox1.List = Worksheets("List1").Range("A10" & ":" & "A13").Value
End Sub

Private Sub CommandButton1_Click()
poradi_jazyka = ComboBox1.ListIndex
If poradi_jazyka = 0 Then
MsgBox "čeština"
ElseIf poradi_jazyka = 1 Then
MsgBox "angličtina"
ElseIf poradi_jazyka = 2 Then
MsgBox "němčina"
ElseIf poradi_jazyka = 3 Then
MsgBox "francouzština"
End If
End Sub

Děkuji moc za inspiraci, problém vyřešen.

díky za ochotu

1.ano
2.statický
3.Hodnoty buněk (supplier, Lieferant atd.) jsou načítány z jiného listu pomocí rozbalovacího menu.

Nějak si to řešení pomocí InStr nedokážu představit

Dobré ráno,

dá se prosím hledání ve VBA nějak rozšířit o podmínku OR?

děkuji za inspiraci

Private Sub CommandButton14_Click()
With Sheets("wsNabidka").Range("A:A")
Set rng = .Find(What:="*supplier*" Or "*Lieferant*" Or "*dodavatel* or "*Fournisseur*", _
After:=.Cells(.Cells.Count), _
LookIn:=xlValues, _
LookAt:=xlWhole, _
SearchOrder:=xlByRows, _
SearchDirection:=xlNext, _
MatchCase:=False)
If Not rng Is Nothing Then

gama = rng.Row

Else

Exit Sub
End If
MsgBox gama
End With
End Sub

Děkuji za inspiraci, tohle už je vyšší dívčí,nicméně ta poslední metoda mi funguje skvěle.

Lze prosím pomocí VBA zkopírovat určitou předem definovanou oblast např. A1:F28 včetně formátování (barva pozadí, font, sloučené buňky) do těla nové outlook zprávy? Zkrátka po kliknutí na ovládací tlačítko by se vygeneroval nový mail s danou oblastí.

Výsledek by měl odpovídat tomu, jako když danou oblast zkopíruji přes CTRL+C a manuálně vložím do těla nové vygenerované zprávy (CTRL+V).

Vygenerovat mail s aktuálním listem jako přílohou umím, ale nejsem si jistý, zda VBA umožňuje to, co popisuji výše.

děkuji

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse