Worksheet Oluşturulma Tarihi

[yasko_nova]

Herhangi bir worksheet'in ne zaman oluşturulduğunu (Tarih ve saat) gösteren koda ihtiyacım var. Yardımlarınız için şimdiden teşekkürler, herkese iyi çalışmalar.

 

[Levent Menteşoğlu]

Bunun için hazır bir fonksiyon varmı bilemiyorum. Ancak sabit bir sayfaya, yeni bir sayfa oluşturulurken gerekli bilgileri kaydedebilirsiniz. Bunun içinde aşağıdaki kodu thisworkbook kod sayfasına kopyalayın. Bilgilerin "sayfa1" isimli sayfaya kaydedildiği kabul edilmiştir.

Private Sub Workbook_NewSheet(ByVal Sh As Object)
say = WorksheetFunction.CountA([sayfa1!a:a])
Sheets("sayfa1").Cells(say + 1, "a") = Sh.Name
Sheets("sayfa1").Cells(say + 1, "b") = FormatDateTime(Now, vbLongDate) & " " & FormatDateTime(Now, vbLongTime)
End Sub

 

[yasko_nova]

Levent Bey çok teşekkürler, oldukça faydası oldu.

İyi çalışmalar.

 

[ismailmuhcu]

Excel çalışma kitabımızın oluşturulma tarihini bu şekilde değiştirebilir miyiz?