(15/08/2021, 11:12)feraz yazdı: InStrRev(Target.Value, " ")ben de zaten bu kodu kullandım gerisi çoklu kopyala-yapıştırda ve silmede düzgün çalışması için
8. mesajdaki modül koduna bakarsanız 5. satırda zaten
Kod:
Dgr = Mid(Dgr, InStrRev(Dgr, " ") + 1)
(15/08/2021, 11:12)feraz yazdı: Berduş hocam o kadar kod yazmadan yukardaki basitçe buluyor örnekayrıca benim yazdığım kod satırı toplamda 23 iken sizin ki 33 ))