Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak tamamen ücretsizdir.
Ayrıca kaydederken sıra no da kaydetmelisiniz koda ekleyip.
Ayrıca kaydederken sıra no da kaydetmelisiniz koda ekleyip.
Alttaki gibide yaprsınız eğer sonları şubesi olarak geçiyorsa..Cells(son, "G").Value = Trim(Split(Me.subesi.Text, " ")(0))
Rica ederiz hocam.Az önce bir baktım koda bir adet nokta eklemeyi untmuşum Range önüne ekleyip kodu günceledim ve trim olanın birini kaldırdım,bilginize.Teşekkürler dostlar. varolun