Soru Özel Alt Bilgi kısmına Hücredeki Tarihi Atamak

[htsumer]

A1 Hücresindeki tarihi Özel Alt Bilgi kısmına aldırmak istiyorum. Baskı ön izlemede alt bilgi A1 hücresindeki tarih gelecek bir fonksiyon

 

[Mdemir63]

Selamlar

Makro ile isterseniz kullanabilirsiniz

Sub AltBilgiEkle()
    Dim tarih As String
    tarih = Sheets("Sayfa1").Range("A1").Value
    With ActiveSheet.PageSetup
        .RightFooter = tarih
    End With
End Sub

 

[htsumer]

Çok teşekkür ederim

 

[Mdemir63]

Rica ederim.
İyi çalışmalar