B sutunundan A sutuna gecirmek?

[lapot]

Gunaydin arkadaslar
Ekteki sayfada B sutunundaki Personel Kodlarini formul ile A Sutunundaki Personel Toplaminin yerine yerlestirmek istiyorum.Nasil yapabilirim.Yardim ederseniz cok sevinirim.

 

[lapot]

yardim edebilecek bir arkadas yokumu?
saygilar

 

[Korhan Ayhan]

Selamlar,

İşlem sonucu nasıl olacak örneklermisiniz.

 

[lapot]

ornegin B stunundaki 1NB yi , A sutunundaki Personel Toplami'nin yerine gecirmek.
tabiki obur Personel kodlarida ayni sekilde A daki toplamlarin yerine konulacak.

saygilar

 

[hamitcan]

Umarım doğru anlamışımdır. Aşağıdaki kodu deneyin.

Sub DEGIS()
For j = 1 To Cells.SpecialCells(xlCellTypeLastCell).Row
    If Cells(j, 1) = "Personel Kodu:" Then adres = Cells(j, 2)
    If Cells(j, 1) Like "*Toplami:*" Then Cells(j, 1) = adres & " Toplamı"
Next
End Sub

 

[lapot]

harikasin kardes. yine sensin Hamitcan.sana nekadar tesekkur etsem azdir.
Ecel.web.tr formuna saygilar sunarim.islem tamam