ÜST BİLGİ

[furkan55makine]

Herkese merhaba.
Sayfa 1 de A1 hücresindeki ifadeyi diğer tüm sayfaların üst bilgi kısmına nasıl otomatik getirebilirim.
Teşekkür ederim.

 

[euphrates55]

makro ile yapılır fakat makrosuz çözüm isterseniz, tüm sekmeleri seçin ve a1 hücresine yazmak istediğiniz değeri yazın. diğerlerine de yazacaktır. ya da çok sayfanız yoksa formülleyin, sayfa1a1 i diğer sayfalara bağ yapıştırın.

 

[Seyit Tiken]

Bu şekilde deneyebilirsiniz.

Sub üstbilgi()
For h = 1 To Sheets.Count
Sheets(h).PageSetup.RightHeader = Sayfa1.[a1]
Next
End Sub

 

[furkan55makine]

Bu şekilde deneyebilirsiniz.

Sub üstbilgi()
For h = 1 To Sheets.Count
Sheets(h).PageSetup.RightHeader = Sayfa1.[a1]
Next
End Sub

Çok Teşekkür ederim