Excel Vba Forum - Excelce.Net
SORU ve CEVAPLAR (Yazılabilir) => Microsoft Excel, Vba, Makro, Formül vb. Soruları => Konuyu başlatan: akngndz - 29 Kasım 2015, 18:45:13
-
Değerli Arkadaşlarım,
excelde örneğin kasım ayına ait 30 adet sayfa var ve bu 3 sayfaya isim olarak 01.11.2015 - 30.11.2015 isim olarak verildi. benim sorunum 1. sayfanın her hangi bir hücresine 01.11.2015 yazıp diğer sayfalarında aynı hücresinin devam eden günün tarihini otomatik olarak eklemesi. bu konuda yardımlarınızı bekler. şimdiden teşekkür ederim.
-
Sayfa1.Cells(1, 1) = "01.11.2015"
Sayfa2.Cells(1, 1).Value = CDate(Sayfa1.Cells(1, 1).Value) + 1
Sayfa3.Cells(1, 1).Value = CDate(Sayfa2.Cells(1, 1).Value) + 1
Sayfa4.Cells(1, 1).Value = CDate(Sayfa3.Cells(1, 1).Value) + 1
Sayfa5.Cells(1, 1).Value = CDate(Sayfa4.Cells(1, 1).Value) + 1
Sayfa6.Cells(1, 1).Value = CDate(Sayfa5.Cells(1, 1).Value) + 1
End Sub
sayfaları kısaltamadım