Stránka 1 z 1
makro na vyplnění záhlaví
Napsal: 21 zář 2012 11:03
od Sirka
Ahoj, potřeboval bych poradit nějaký makro něbo něco automatizovaneho co by vždy vyplnilo záhlaví například buňkou A1 z listu Vzor. Klidně na nějaký tlačítko v tom Vzor ... tzn po kliknutí přepsat záhlaví v určitém listu
předem Díky za pomoc :)
Re: makro na vyplnění záhlaví
Napsal: 21 zář 2012 11:40
od Azuzula
Ahoj, co třeba dát na každý list, kde je potřeba to záhlaví, vzorec? =vzor!A1 Pokud teda je celé záhlaví v jedné buňce jak jsem snad pochopila.
Re: makro na vyplnění záhlaví
Napsal: 21 zář 2012 11:59
od Sirka
sakra xD špatná odpověĎ xD mno nevím jak přesně to myslíš ale nejde mi tam vložit vzorec mohl by jsi mi popsat kam to napsat přesně?
Re: makro na vyplnění záhlaví
Napsal: 21 zář 2012 13:36
od cmuch
Makro takto.
Vloží do aktivního listu
Kód: Vybrat vše
Sub Zapati()
With ActiveSheet.PageSetup
.LeftFooter = Range("A1")
.CenterFooter = ""
.RightFooter = ""
End With
End Sub
Re: makro na vyplnění záhlaví
Napsal: 21 zář 2012 19:52
od Sirka
je to sice zápatí né záhlaví ale funguje děkuju :)))
Re: makro na vyplnění záhlaví
Napsal: 21 zář 2012 20:47
od cmuch
Já si to asi špatně přečet. Tady je záhlaví.
Kód: Vybrat vše
Sub Zahlavi()
With ActiveSheet.PageSetup
.LeftHeader = Range("A1")
.CenterHeader = ""
.RightHeader = ""
End With
End Sub