Sayfada seçilen satırın bir üstü

[beza]

Merhaba,
Forumda gördüğüm kadarıyla seçili hücrenin altına, sağına, soluna vs. git komutları var. Ancak bir üstüne git komutuna rastlamadım. İşlem bittiğinde sayfada seçili olan hücrenin bir üst hücresini seçmek istiyorum. Yani işlem bittiğinde seçili hücre B50 ise B49 seçtirmek mümkün mü?

 

[Muzaffer Ali]

Merhaba.

1- İşlem bittiğinde derken neyi kast ediyorsunuz?
2- Bir üst satıra geçmek istediğiniz belli bir dosya, sayfa ve hücreler mi var yoksa bütün Excel dosyalarında her zaman bir üst satıra mı geçmek istiyorsunuz?

 

[Korhan Ayhan]

Deneyiniz.

Option Explicit

Sub Test()
    On Error GoTo 10
    ActiveCell(0).Select
    Exit Sub
10: MsgBox Err.Description
End Sub

 

[beza]

Merhaba.

1- İşlem bittiğinde derken neyi kast ediyorsunuz?
2- Bir üst satıra geçmek istediğiniz belli bir dosya, sayfa ve hücreler mi var yoksa bütün Excel dosyalarında her zaman bir üst satıra mı geçmek istiyorsunuz?

Muzaffer Ali Bey merhaba,
Sorunun özü, butona basıldığında sayfa1 üzerinde seçilmesi gereken hücrenin bir altını seçiyor.
Dim aran, degistir As Variant
Worksheets("Sayfa1").Select
aran = TextBox1.Value
Range("b:b").Find(aran).Select
bu komut textbox1ki değerin olduğu hücrenin bir altını seçiyor. Bu satırlar başka yerde doğru çalışıyor. Mesele bu. İlginiz için teşekkür ederim.

 

[beza]

Deneyiniz.

Option Explicit

Sub Test()
    On Error GoTo 10
    ActiveCell(0).Select
    Exit Sub
10: MsgBox Err.Description
End Sub

 

[beza]

ActiveCell(0).Select
sorunu çözdü. Şimdi doğru hücreye geliyor. İlgi ve emeğiniz için teşekkür ederim.