ilk iki karakter ve son iki karakteri

[gncbeyin]

ilk iki karakter alınıp araya boşlukla birleştirip son iki karakter alıncak. Örn: CF 70

A3 hüsresinde CF-640/70

 

[gncbeyin]

acil yardım ödevi tamamlamam lazım kısa sürede

 

[ExcelF1]

1 örnek dosya ekleseydiniz. Kodları direkt olarak üzerinde yazardık, daha kolay olurdu.

 

[ExcelF1]

A sütununda verileriniz olduğun varsayarsak, b sütununa istediğiniz sonucu yazdıracaktır.

Sub Düğme1_Tıklat()
For a = 1 To [A65536].End(xlUp).Row
b = Len(Cells(a, 1))
Cells(a, 2) = Mid(Cells(a, 1), 1, 2) & " " & Mid(Cells(a, 1), (b - 1), 2)
Next a
End Sub

 

[gncbeyin]

örnek dosya

Ekli dosyayı görüntüle Book1.xlsx

burada ek dosya olarak verdim bi bakar mısınız

 

[ExcelF1]

Dosyanızı xls olarak ekleyebilir misiniz. 2003 versiyonu kullanmaktayım.
Ve üstteki kodları denediniz mi ?

 

[gncbeyin]

Ekli dosyayı görüntüle Book1.xls

Yukarıdaki kodları tam anlayamadım beceremedim o yüzden. dediğiniz gibi eklemeye çalıştım dosyayı

 

[ExcelF1]

Kusura bakma, filme dalmışım

Dosyan ektedir.

 

[ExcelF1]

Bu da fonksiyon ile yapılan hali,

B2 hücresine yazın ve köşesinden tutarak aşağı doğru sürükleyin.

=SOLDAN(A2;2) & " " & SAĞDAN(A2;2)

 

[gncbeyin]

teşekkür ederim ama dediğiniz formulde aynısını verdi bana tekrar. dosyada 2007 oldugu için galiba tıklıyorum yaptııgınız şeye olmuyo. kusura bakmayın yoruyorum sizide

 

[gncbeyin]

Çok teşekkürler şimdi yaptım verdiğiniz formülle benim hatam varmış. tekrar teşekkürler

 

[ExcelF1]

Göndermiş olduğum dosya makro içermektedir. Makro güvenlik seviyenizi düşürmeniz gerekmektedir. Forumda veya google'da arama yaptırırsanız makro güvenlik seviyesinin nasıl düşürüleceğini bulabilirsiniz.

Ve formül olarak 2007 İngilizce kullanıyorum demişsiniz. Formülü ingilizce yazmanız gerekebilir. Ben ingilizce karşılıklarını malesef bilmiyorum.

 

[ExcelF1]

Cevabınızı geç farkettik yine Kolay gelsin. (Makro güvenilk seviyesini düşürme olayını incelemenizi tavsiye ederim)

 

[gncbeyin]

Teşekkürler tekrar. Yardımlarınız çok faydalı oldu daha çok yardım alabilirim sizden bu konularda acemiyim biraz desteğe ihtiyacım var.