M20

[k0081]

Merhaba arkadaşlar;

A1 hücresinde A5 hücresine kadar; M20X70 ,M16X78, M22X65 gibi , değerler mevcut.. bunlara CİVATA yazısı nasıl ekleyebilirim ?

M20X70 CİVATA gibi..

 

[Mahir64]

Merhaba,

Sub ekle()
For i = 1 To Range("A10").End(3).Row
Cells(i, "a") = Cells(i, "a") & " CİVATA "
Next
End Sub

 

[k0081]

Mahir;
******

Hocam çok teşekkürler, tamamdır.. Allah razı olsun..

 

[Mahir64]

İyi çalışmalar.

 

[Levent Menteşoğlu]

Sn k0081

Konu başlığınızda kullanıcı adınız gibi gizemli. "M20" başlığını görünce bir piyade tüfeğinden falan bahsediyorsunuz sandım. Eski bir üyemiz olarak bu konuya gerekli özeni göstermenizi beklerdim. Sorunuzu açıklayacak içerikte bir kaç kelimeden oluşan bir başlıkla sanıyorum klavyeniz aşınmazdı. Mahir bey Sorunuzu ciddiye alıp cevap yazmış. Sorunuza cevap verilmemiş olsaydı "Forum Kurallarına Uymayan Başlıklar" altına taşınması gereken bir konuydu.

Ben sorunuz için bir başlıkta öneriyorum:

"A1-A5 hücrelerindeki verilere CIVATA kelimesini eklemek"

Sizden ricam bu tür konulara gerekli özeni göstererek yeni üyelerimize de örnek olmanızdır.

 

[k0081]

Levent Menteşoğlu;

haklısınız, piyade silahı isimi gibi olmuş, özür,, daha dikkatli yazmaya özen gösteririm.