cümle oluşturma

[karakayalı]

dosya ektedir...yardımlarınız için şimdiden tşk.ler

 

[leumruk]

Merhaba,
C1'i boş bıraktığınızda olabilecek tüm cümle kombinasyonunu bulur. C1'e sayı girdiğinizde girdiğiniz sayı oranında cümleyi bulur.

Sub Cumle()
Sat = 2
Range("c2:e" & [c65536].End(3).Row).ClearContents
For x = 2 To [a65536].End(3).Row
If Cells(x, "b") = "Ö" Then
    özne = Cells(x, "a")
        For y = 2 To [a65536].End(3).Row
            If Cells(y, "b") = "" Then
                nesne = Cells(y, "a")
                    For z = 2 To [a65536].End(3).Row
                        If Cells(z, "b") = "Y" Then
                            yüklem = Cells(z, "a")
                                Cells(Sat, "c") = özne
                                Cells(Sat, "d") = nesne
                                Cells(Sat, "e") = yüklem
                                If Sat > [c1] And [c1] <> "" Then Exit Sub
                            Sat = Sat + 1
                         End If
                    Next
            End If
        Next
    End If
Next
End Sub

 

[karakayalı]

syn leumruk, yardımlarınız için sonsuz teşekkürler...İlim her şeyin cehlinden güzeldir...

 

[karakayalı]

syn leumruk, "d1" hücresine de cümle sayısını yazarak işlemi gerçekleştirebilrmiyiz...yani "d1" e 4 yazdığımızda, "ALİ BUGÜN OKULA GELDİ" yazsın, 5 yazdığımda "ali bugün okula babasıyla geldi" yazsın...yardımlarınız için şimdiden tşk.ler...

 

[leumruk]

syn leumruk, "d1" hücresine de cümle sayısını yazarak işlemi gerçekleştirebilrmiyiz...yani "d1" e 4 yazdığımızda, "ALİ BUGÜN OKULA GELDİ" yazsın, 5 yazdığımda "ali bugün okula babasıyla geldi" yazsın...yardımlarınız için şimdiden tşk.ler...

Sayın karakayalı,
Ben T.Dili ve Edebiyatı öğretmeni sıfatımı kullanarak bir öneride bulunmak istiyorum. Verdiğiniz örnek cümlede farklı tümleçler var. Her öge için ayrı bir sütun kullanırsak tümleç çakışmasını da önleriz. Örneğin, yukarıdaki cümlede bugün zaman zarfı, sütunda bir de dün zarfı bulunursa "Ali bugün dün geldi." gibi anlamsız bir birleşim ortaya çıkıyor.
Ayrıca bunu istememin diğer bir sebebi, kod yazarken işim epey kolaylaşacak.
Farklı sütun kullanabilir miyiz?

 

[karakayalı]

doğrudur, anlamsız cümlede olabilir, sonuçta ben onları eleyeceğim...zahmetleriniz içi tşk.ler

 

[karakayalı]

syn leumruk, yardımlarınızı bekliyorum...kolay gelsin...

 

[leumruk]

syn leumruk, yardımlarınızı bekliyorum...kolay gelsin...

Syn. karakayalı,
Kelimeleri ayrı sütunlara alabilir miyiz? Bu sorunun cevabına göre bir şeyler yapmaya çalışacağım. Demek istediğim: Özne türündeki sözcükler A sütununda, zarf tümleci olanlar B, dolaylı tümleçler C, yüklem D sütununda olabilir mi?

 

[karakayalı]

evet olabilir...

 

[leumruk]

Merhaba,
Dosyayı isteğinize göre düzenledim. Cümle oluştururken döngü kullanma zorunluluğu olduğu için kelime sayısına göre ayrı makrolar düzenleyip bunları şarta bağladım.
b1,c1,d1 hücrelerine çift tıkladığınızda "X" işareti oluşacak. Cümle oluştururken bu işaretin bulunduğu sütundaki kelimeler cümle içinde yer alacak. 2'den 5 kelimeye kadar cümle oluşturabilirsiniz.
"X" işareti bulunan hücreye yeniden çift tıkladığınızda hücre boşalacaktır.

 

[karakayalı]

sym leumruk tşk.ler...elinize sağlık...

 

[leumruk]

sym leumruk tşk.ler...elinize sağlık...

Rica ederim. İyi çalışmalar.