şeçili hücreyi aşağı yukarı hareket ettirme?

[f1emrecan]

Bir hücreyi şeçip tablonun içinde hareket ettiren komutlar vardı bulamadım.aşağı komutunua tıklıyoruz,tıkladıkça seçili hücre aşağı iniyor bir alttaki onun yrini alıyor.
Basit ama bulamadım.bir yardımcı olun lütfen.

 

[Ayhan Ercan]

Merhaba

İstemiş olduklarınızla ilgili ufak bir çalışma yaptım.
Umarım doğru anlamışımdır.

Ek dosyayı inceleyiniz...

Private Sub CommandButton1_Click()
If Intersect(ActiveCell, Range("e3:h5")) Is Nothing Then Exit Sub
hcr = ActiveCell.Value
ActiveCell = ActiveCell.Offset(1, 0).Value
ActiveCell.Offset(1, 0).Value = hcr
End Sub
 
 
Private Sub CommandButton2_Click()
If Intersect(ActiveCell, Range("F3:H6")) Is Nothing Then Exit Sub
hcr = ActiveCell.Value
ActiveCell = ActiveCell.Offset(0, -1).Value
ActiveCell.Offset(0, -1).Value = hcr
End Sub
 
 
Private Sub CommandButton3_Click()
If Intersect(ActiveCell, Range("e4:h6")) Is Nothing Then Exit Sub
hcr = ActiveCell.Value
ActiveCell = ActiveCell.Offset(-1, 0).Value
ActiveCell.Offset(-1, 0).Value = hcr
End Sub
 
 
Private Sub CommandButton4_Click()
If Intersect(ActiveCell, Range("e3:G6")) Is Nothing Then Exit Sub
hcr = ActiveCell.Value
ActiveCell = ActiveCell.Offset(0, 1).Value
ActiveCell.Offset(0, 1).Value = hcr
End Sub

 

[ozcanya]

hocam birden fazla hücre için ne yapmalıyım?

 

[Ayhan Ercan]

hocam birden fazla hücre için ne yapmalıyım?

If Intersect(ActiveCell, Range("e4:h6")) Is Nothing Then Exit Sub

Yukarda kırmızı olan alanları istediğiniz şekilde değiştirebilirsiniz..

 

[f1emrecan]

Hocam kusura bakma seni yorduk ama excelin kendi komutu vardı diye hatırlıyorum.yanlışım varsa düzelt araçlar,özelleştir e girip şeçebileceğimiz bir komut varmıdır.versiyon ya da seçenekler,ayarlardan bulamadım diye düşünüyorum.aşağı doldur komutu var,alttaki hücreyi üstekiyle aynı yapıyor.birde çizim için aşağı var o hiç çalışmıyor.benim söylediğim aşağı ya da yukarı tıkladığımızda öbürüyle yer değiştiriyor.yinede teşekkürler

 

[Ayhan Ercan]

Hocam kusura bakma seni yorduk ama excelin kendi komutu vardı diye hatırlıyorum.yanlışım varsa düzelt araçlar,özelleştir e girip şeçebileceğimiz bir komut varmıdır.versiyon ya da seçenekler,ayarlardan bulamadım diye düşünüyorum.aşağı doldur komutu var,alttaki hücreyi üstekiyle aynı yapıyor.birde çizim için aşağı var o hiç çalışmıyor.benim söylediğim aşağı ya da yukarı tıkladığımızda öbürüyle yer değiştiriyor.yinede teşekkürler

Tekrar Merhaba

O sizin bahsettiğiniz sanırım enter tuşundan sonra imleci sağa-sola-yukarı-aşağıya taşı diye bir yer var. Onumu demek istiyorsunuz?

Ancak onda imleci hareket ettirebilirsiniz, hücreler arasınde yer değiştirme yapamazsınız...

Eğer Özet Tablo ile ilgili birşeyse onunla ilgili bilgi sahibi değilim...