Yardım TARİHTEKİ YAZIYI BAŞKA HÜCREYE YAZDIRMA

EpsilonMurat · 31 Ağu 2021

HERKESE MERABA!! GRUPTA YENİYİM YANLIŞ Bİ YERE KONU AÇTIYSAM AFFOLA.

ASKERİ PERSONELLERİN GÖREV YOLLUKLARINI YAPIMINI HIZLANDIRMAK İÇİN AŞAĞIDA EKİ BULUNAN EXCEL SAYFASINDA YARDIMA İHTİYACIM VAR.

BİR AYIN 31 GÜNÜ İÇİNDE HANGİ TARİHTE G HARFİ VARSA O GÜNÜN TARİHİNİ YAZI İLE BAŞKA BİR SATIRA YAZI OLARAK YAZDIRMAM GEREKİYOR ÖRNEĞE GİRİNCE NE DEMEK İSTEDİĞİM ANLAŞILACAKTIR. YARDIMLARINIZ İÇİN ŞİMDİDEN TEŞEKKÜRLER

Mahir64 · 31 Ağu 2021

Merhaba,

Öncelikle hoşgeldiniz. Forumlarda büyük harfle yazım bağırmak anlamına gelmektedir.
Çözüm nasıl olsun, formülle derseniz uzun olabilir ama olur.

EpsilonMurat · 31 Ağu 2021

otomatik kendi yazsın istiyorum. ben tarihleri işliyorum yazılarını yazmak uzun sürüyor 2. sekmedeki. o yazıları otomatik yazdırmak istiyorum. yardımlarınız için teşekkür ederim. Kusura bakmayın büyük yazı için.

Mahir64 · 31 Ağu 2021

Nasıl olursa olsun ama yazsın mı?

EpsilonMurat · 31 Ağu 2021

Mahir64' Alıntı:
Nasıl olursa olsun ama yazsın mı?

örneği ekte bulunan excel deki 2. sekmede yazıyor.

Yani şöyleki Görev Bodrosu yazan sekmede bulunan b2 deki bilgiyi orda yazdığım şekilde otomatik yazacak formül istiyorum. görev tarihleri yazan sekmeden alacak bilgiyi

EpsilonMurat · 31 Ağu 2021

mesela ayın 3 ve 10. günün de "G" harfi varsa yazıyla 3, 10 görev yapmıştır diye yazacak otomatik.

Mahir64 · 31 Ağu 2021

İnceleyin.
Formül farklı gelebilir, sonuca odaklanın.

EpsilonMurat · 31 Ağu 2021

çok teşekkür ederim elinize sağlık.

Mahir64 · 31 Ağu 2021

EpsilonMurat' Alıntı:
çok teşekkür ederim elinize sağlık.

İyi çalışmalar.

lebom · 31 Ağu 2021

Merhaba kısa formülü ekte takdim edilmiştir.

Mahir64 · 31 Ağu 2021

Sayın @lebom formül çözüm ama sadece 365 sürümünde geçerli.

365 sürümü DİZİleri dimaik olarak destekliyor ve yeni çözümler var, alt rüsümlerde kullanılamıyor.

lebom · 31 Ağu 2021

Function Text_Join(delimiter As String, ignore_empty As Boolean, arr As Variant) As Variant
Dim itm As Variant
Dim retval As String
On Error Resume Next
For Each itm In arr
If Not ignore_empty Or Not IsEmpty(itm) Then
retval = retval & delimiter & itm
End If
Next itm
If retval <> "" Then
retval = Mid(retval, Len(delimiter) + 1)
End If
Text_Join = retval
End Function

Bu kodda kulanılabilir.
=TEXT_JOIN(",";TRUE;IF((B2:AF2)="G";$B$1:$AF$1;""))&" Tarihi/Tarihlerinde görev yapmıştır."

sonuç bu şekilde çıkyor.

1,2,3,4,5,,,,,,11,12,13,14,15,,,,,,,,,,25,26,27,28,,, Tarihi/Tarihlerinde görev yapmıştır.

Yardım TARİHTEKİ YAZIYI BAŞKA HÜCREYE YAZDIRMA

Daha fazla seçenek

EpsilonMurat

Ekli dosyalar

Mahir64

EpsilonMurat

Mahir64

EpsilonMurat

EpsilonMurat

Mahir64

Ekli dosyalar

EpsilonMurat

Mahir64

lebom

Ekli dosyalar

Mahir64

lebom