< návrat zpět

MS Excel


Téma: vlastní záhlaví a VBA rss

Zaslal/a 15.3.2024 12:34

Ahoj ,dobrý den ,
v příloze mám vzorek souboru s makrem , které by mělo zapsat do záhlaví vlastní text zadaný pomocí proměnné z InputBoxu.
pokud je záhlaví prázdné tak se tam data vepíšou , ale pokud sešit znovu otevřu a zadám jiné hodnoty tak zůstane záhlaví stejné- původní. Musím jej ručně odmazat a pak se nová proměnná zase vepíše. Potřeboval bych aby si to uživatel mohl sám zadat pomocí VBA. Děkuji za pomoc. SV

Příloha: zip56328_zahlavi-vba.zip (14kB, staženo 5x)
Zaslat odpověď >

#056329
Začátečník
Použijte
Sub vlastnizahlavi()

Dim poznamka As String

poznamka = InputBox("Zadej vlastní záhlaví :", "OKNO", "")

With ActiveSheet.PageSetup
.LeftHeader = ""
.CenterHeader = "Text 123456 + : " & poznamka
.RightHeader = ""
End With

End Sub

citovat
#056330
avatar
Díky moc za vyřešení , jede to bezvadně. 1

SVcitovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

Vynásobit hodnoty kurzem - Power Query

Alfan • 26.4. 7:56

Relativní cesta - zdroje Power Query

Alfan • 26.4. 7:54

Vynásobit hodnoty kurzem - Power Query

elninoslov • 26.4. 7:54

Vynásobit hodnoty kurzem - Power Query

lubo • 25.4. 19:18

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 15:12

Relativní cesta - zdroje Power Query

Alfan • 25.4. 15:08

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 14:21