Cümle içerisinde boş yerleri otomatik doldurma

[ozkan283]

Merhabalar, "Ali 20.03.2023 tarihinde okula gelmedi." Şeklinde bir cümlemiz var, tarih bölümü boş olacak." Ali tarihinde okula gelmedi." Mesela a2 hücresindeki tarihi makro ile Ali kelimesinden sonra nasıl yazdırabilirim.

 

[Muzaffer Ali]

Merhaba

Sub test()
    MsgBox "Ali " & range("A2") & " tarihinde okula gelmedi."
End Sub

 

[ozkan283]

Teşekkür ederim, fakat ben eksik anlattım sanırım, msgbox şeklinde değilde A5 hücresinde yazan Ali şu tarihde okula gelmedi. Metnini düzenlemesini istiyorum. Hücre içindeki metne eklenmesini istiyorum

 

[Korhan Ayhan]

Alternatif;

Option Explicit

Sub Test()
    If InStr(1, Range("A5").Value, Range("A2").Text) = 0 Then
        Range("A5").Replace "tarihinde", Range("A2").Text & " tarihinde"
    End If
End Sub

 

[Muzaffer Ali]

Sub test()
    range("A5")= "Ali " & range("A2") & " tarihinde okula gelmedi."
End Sub

 

[ozkan283]

Sub test()
    range("A5")= "Ali " & range("A2") & " tarihinde okula gelmedi."
End Sub

Teşekkürler işime yaradı, 2 nizede teşekkür ederim