- Katılım
- 14 Ocak 2005
- Mesajlar
- 807
- Excel Vers. ve Dili
- Microsoft Office Professional Plus 2021
Kod:
Dim FormatliBslTarih As String
Dim FormatliBtsTarih As String
'bsltarih = Range("A3")
'NewDate = Format(DateAdd("m",1,StartDate),"dd/mm/yyyy")
'BURDAKİ "m",0, değeri yada ,1 bir sonraki ayı alır 0 kendi aynı -1 bir önceki ayı alır.
FormatliBslTarih = Format(DateAdd("m", 0, Range("A3")), "yyyy-mm-dd")
FormatliBtsTarih = Format(DateAdd("m", 0, Range("D3")), "yyyy-mm-dd")
