Označení každého 7. řádku - Excel

[Vodny]

Dobrý den,

potřeboval bych poradit (Excel 2007):

1) Jak označit každý 7. řádek např. žlutě přes podmíněné formátování.

2) Jak k řádkům, kde mám pouze čísla, přidat text, v tomto případě email. V jednom sloupci mám čísla např. 123456 a ke každému číslu potřebuji přidat email např. mail.domu@seznam.cz, aby vzniklo na řádku 123456mail.domu@seznam.cz? Takto sloučit buňky nelze.

Mockrát děkuji.

[Štučka]

2) Vyberte bunky s čísly a přes Macro

Sub AddEmailAddress()

Dim cell As Range

For Each cell In Selection
cell.Value = cell.Value & "mail.domu@seznam.cz"
Next

End Sub

[Mirdad69]

ad 1) vzorec pro podmíněné formátování = mod(řádek();7) = 0

[Vodny]

2) Vyberte bunky s čísly a přes Macro

Sub AddEmailAddress()

Dim cell As Range

For Each cell In Selection
cell.Value = cell.Value & "mail.domu@seznam.cz"
Next

End Sub

Děkuji, funguje. Nevíte ještě nějaký jiný, jednodušší postup? Před nějakou dobou mi někdo poradil jednodušší postup, bohužel jsem ho zapomněl, ale makra v tom vůbec nebyly.

[Štučka]

Custom Number Format 0"mail.domu@seznam.cz"

[Vodny]

Děkuji, funguje také a řekl bych i pro mé účely rychlejší varianta. Moc díky.