tıkladığımız hücrenin hangi satırda oluğunu bilebilirmiyiz

[pcerdal]

merhabalar bana tıkladığım hücrenin hangi satırda olduğunu söyleyen kodlar lazım. buna göre macroma devam edeceğim. mesela tıkladığımız hücrenin kaçıncı satırda olduğunu bizi söyleyebilirse bende o satırda bulunan bilgilerimi değiştirdiğimde başka bir yere gene o satır olarak atsın. yardım edermisin lütfen.
teşekkür ederim

 

[N.Ziya Hiçdurmaz]

Yanıt

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
DEG = Target.Address
MsgBox " Satır" & (DEG)
End Sub

 

[pcerdal]

sayın hiçdurmaz teşekkür ederim bir ricam daha olacak.ben sadece satır numarasını istiyorum yani sheet1.cells(deg,3) formatında bana lazım şimdiden çok sağolun
ayrıca sadece sütünu gösteren koduda ayrı bir şekilde yazarsanız çok memnun olurum. sütunu hem harf olarak gösteren hemde rakam olarak göstere n makrolaraı ayrı ayrı yazarsanız işime çok yarayacaktır

 

[Ayhan Ercan]

Merhaba


Sayın Hiçdurmaz hocamın koldarındaki
Target.Address yerine
Target.Row yazarak deneyiniz..

 

[pcerdal]

komple sutunu taşıma

sayın hocam bu işlemden sonra bir soru daha sormak istiyorum bir macro yazacağım butona tıkladığımda d sutununu alıp kople taşıyarak a ile b sutununun arasına yazacak. örnek dosya ektedir.

 

[pcerdal]

teşekkür ederim sayın ercan yeni yolladığım soruna sizde bakarmısınız

 

[Ayhan Ercan]

sayın hocam bu işlemden sonra bir soru daha sormak istiyorum bir macro yazacağım butona tıkladığımda d sutununu alıp kople taşıyarak a ile b sutununun arasına yazacak. örnek dosya ektedir.

Private Sub CommandButton1_Click()
Columns("D:D").Cut
Columns("B:B").Insert Shift:=xlToRight
End Sub

 

[pcerdal]

tekra teşekkür ederim sayın ercan. ve son olacak bir sorum. yardımlarınızı aldıkça nasıl mutlu oluyorum anlatamm. benim asıl bu gün proje olarak teslim etmek istediğim şu kaç gündür uğrasıyorum ama bi türlü tam olarak çalışmadı hep eksik var. size en basitinden bir örnek yaptım inceleyip yardımcı olurmusunuz.