Hücredeki kelimenin sağındakileri çıkarma

[steppe]

Aşağıdaki örnek dosyadaki makro ile kelimenin solundakiler çıkarılıyor.Sadece sağındakiler nasıl çıkarılabilir?Yardımlarınız için teşekkürler.

 

[uzmanamele]

Merhaba

Bunu deneyiniz.

Sub yıldız_sil()
For i = 1 To Range("h65536").End(3).Row
Cells(i, "h") = Split(Cells(i, "h"), "*")
Next
End Sub

 

[steppe]

Uzmanamele kardeş,
Yardımların için teşekkür ederim.