• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

tarihe ait günü yazma

Katılım
10 Mayıs 2009
Mesajlar
1,080
Excel Vers. ve Dili
2003 türkçe
Herkese merhabalar;

A1:A32 aralığında dd.mm.yyyy formatında yazılmış çeşitli tarihler var..B1:B32 aralığına bu tarihlere ait gün isimleri nasıl bir makroyla yazılabilir?

(Not:Bu gün isimleri "Pazartesi" nin yazılışında olduğu gibi büyük harfle başlayıp küçük harfle devam edecek.)

İlgilenecek olanlara şimdiden çok teşekkür ediyorum.
 
Merhaba,

Kod:
Sub Tarih()
For i = 1 To [A65536].End(3).Row
Cells(i, "b") = Format(Cells(i, "a"), "dddd")
Next
End Sub

Alan sabitse,

Kod:
Sub Tarih()
For i = 1 To 32
Cells(i, "b") = Format(Cells(i, "a"), "dddd")
Next
End Sub

Aynı işlemi formüllede yapabilirsiniz..

=metneçevir(A1;"gggg")

.
 
Ömer hocam hızlı yanıtınız için çok teşekkür ederim.Üç halini de denedim.Çok yönlü ve güzel bir yanıt vermişsiniz.Çok teşekkür ediyorum.Ellerinize sağlık..
 
tarih'i güne çevirmek

Ömer hocam merhaba,
tarihlerin alt alta yazıldığı sütunun yanına sütun açarak tarihlerin günlerini yazdırabileceğimiz bir macro var mıdır?
 
Merhaba,

Kod:
Sub Tarih()
For i = 1 To [A65536].End(3).Row
Cells(i, "b") = Format(Cells(i, "a"), "dddd")
Next
End Sub

Alan sabitse,

Kod:
Sub Tarih()
For i = 1 To 32
Cells(i, "b") = Format(Cells(i, "a"), "dddd")
Next
End Sub

Aynı işlemi formüllede yapabilirsiniz..

=metneçevir(A1;"gggg")

.

Ömer hocam merhaba,
tarihlerin alt alta yazıldığı sütunun yanına sütun açarak tarihlerin günlerini yazdırabileceğimiz bir macro var mıdır?
 
Ömer hocam merhaba,
tarihlerin alt alta yazıldığı sütunun yanına sütun açarak tarihlerin günlerini yazdırabileceğimiz bir macro var mıdır?

Gün sayılarını yazmak için
Kod:
Cells(i, "C") = Format(Cells(i, "a"), "[COLOR="Red"]d[/COLOR]")
Ömer beyin makrosuna ilaveten
Kod:
Sub Tarih()
Columns("B:B").Select
Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
Selection.NumberFormat = "General"
For i = 1 To 32
Cells(i, "B") = Format(Cells(i, "a"), "d")
Next
End Sub
 
Sülayman bey bu verdiğiniz macro yalnızca A sütunun yanına yeni aynı formatta sütun ekliyor.
benim istediğim seçtiğin sütunu yada hücrenin yanına sütun açıp seçtiğim sütun yada hücredeki tarihlerin günü eklediği sütuna yazması.
teşekkürler.
 
ilk mesaj
tarihlerin alt alta yazıldığı sütunun yanına sütun açarak tarihlerin günlerini yazdırabileceğimiz bir macro var mıdır?
cevaptan sonraki mesaj
Sülayman bey bu verdiğiniz macro yalnızca A sütunun yanına yeni aynı formatta sütun ekliyor.
benim istediğim seçtiğin sütunu yada hücrenin yanına sütun açıp seçtiğim sütun yada hücredeki tarihlerin günü eklediği sütuna yazması.
teşekkürler.

Aynı formatta değil sadece günün rakamını yazabilmek için sayı formatında;
Aklınızdan geçeni kestirme gibi bir şansım yok,
dosya eklerseniz yardımcı olabilirim, saygılarımla.
 
ilk mesaj

cevaptan sonraki mesaj


Aynı formatta değil sadece günün rakamını yazabilmek için sayı formatında;
Aklınızdan geçeni kestirme gibi bir şansım yok,
dosya eklerseniz yardımcı olabilirim, saygılarımla.

eklediğim dosyada göreceğinz gibi D sütununa bir yandaki sütundaki tarihi text yazmak istiyorum.
ancak tarih sütunu datanın farklı sütunlarında olabilir o yüzden seçtiğim sütunu yada hücreyi referans almasını istiyorum.
bunu makro ile yapabilirmiyim?
 

Ekli dosyalar

Konuyla ilgili yardımcı olabilecek yok sanıyorum?
 
Geri
Üst