Šmarjá, veď to musíte vidieť, že to máte celé červené. To preto, lebo fórum pridáva medzi riadky prázdne riadky. A teda rozdelí náš jednoriadkový kód. On je totiž jednoriadkový, aj keď ho máme s pomocou " _" akože rozdelený na viac.
Zmažte tie medzery medzi riadkami.
Alebo si to nechajte v dlhej jednoriadkovej forme.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$E$1" Then PageSetup.LeftHeader = "Příloha č. 3 ke Kolovadlu č. " & CStr(Range("E1").Value) & " IPP" & Chr(10) & "&""-,Bold""Přehled vydaných částek Sbírky zákonů s obsahem za dané období"
End Subcitovat
Zmažte tie medzery medzi riadkami.
Alebo si to nechajte v dlhej jednoriadkovej forme.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$E$1" Then PageSetup.LeftHeader = "Příloha č. 3 ke Kolovadlu č. " & CStr(Range("E1").Value) & " IPP" & Chr(10) & "&""-,Bold""Přehled vydaných částek Sbírky zákonů s obsahem za dané období"
End Subcitovat