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

Příspěvky uživatele

Ahoj asi jde o triviální problém, nicméně stále se mi nedaří to rozlousknout. Ve formuláři zadávám do textboxu text, který se mi vkládá do sloučených bunek F15:G15. Podle délky zadaného textu potřebuji automaticky upravit výšku bunky a text zalomit. Funguje mi to v případě, že zadávám výšku pevně, ale příkaz AutoFit mi excel proste nesežvejká, což mi nejde do hlavy. Děkuji za rady. Zkoušel jsem to následovně:
Private Sub TextBox1_Change()
Sheets("List1").Range("F15:G15").WrapText = True
Sheets("List1").Range("F15:G15").Rows.AutoFit
'Sheets("List1").Range("F15:G15").Rows.RowHeight = 30
End Sub

Dobrý den,

prosím o radu. Potřeboval bych vytvořit adresář s proměnnou jako názvem podle aktuálního datumu, což není problém..následně bych do něj chtěl uložit sešit, ale nevím jak zadat cestu do tohoto adresáře. Děkuji za rady.
Private Sub CommandButton2_Click()
adresar = Format(Now, "yyyymmdd")
MkDir adresar
ActiveWorkbook.SaveAs Filename:="C:\User\215781\????\poptavka" & Format(Now, "yyyymmdd") & ".xlsm"
End Sub

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse