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
Teda Vy jste rychlík :-) Děkuji moc. Já měl myšlenku, že bych číslo řádku z prvního výskytu uložil do proměnné a pak pomocí této proměnné omezil prohledávanou oblast. To by asi také šlo, nicméně tohle je podstatně jednodušší.
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.