Excel Vba Forum - Excelce.Net

SORU ve CEVAPLAR (Yazılabilir) => Microsoft Excel, Vba, Makro, Formül vb. Soruları => Çözülen Excel, Vba, Makro, Formül vb. Soruları => Konuyu başlatan: Sabri ŞİRİN - 01 Şubat 2011, 13:16:37

Başlık: [Çözüldü] Hareketli Buton Hakkında
Gönderen: Sabri ŞİRİN - 01 Şubat 2011, 13:16:37
İyi günler,
Sayfada aşağı inildikçe dahi butonumuz sabit kalsın.
Hareketli buton yapabilirmiyiz.
Saygılarımla...
Başlık: Ynt: Hareketli Buton hk.
Gönderen: Hüseyin Çoban - 01 Şubat 2011, 14:06:12
Sayfada aşağı inildikçe dahi butonumuz sabit kalsın.
Hareketli buton yapabilirmiyiz.

Merhaba, sorunuz tam anlaşılır değil. Biraz daha açar mısınız?
Başlık: Ynt: Hareketli Buton hk.
Gönderen: Sabri ŞİRİN - 01 Şubat 2011, 14:58:30
Hüseyin Bey Merhaba,
Sayfa1'de çalışma alanı geniş olduğundan,Bazen A3500 hücresine kadar gidilmesi gerekiyor.
Ana sayfa butonuna tıklamak için tekrar yukarı çıkmak yerine sürekli sabit durmayıp aşağı hücrelere indikçe bizimle beraber inebilecek buton kodlarına ihtiyacım var.
 
Saygılarımla...
Başlık: Ynt: Hareketli Buton hk.
Gönderen: Hüseyin Çoban - 01 Şubat 2011, 15:04:33
Sayfa1'de çalışma alanı geniş olduğundan,Bazen A3500 hücresine kadar gidilmesi gerekiyor.
Ana sayfa butonuna tıklamak için tekrar yukarı çıkmak yerine sürekli sabit durmayıp aşağı hücrelere indikçe bizimle beraber inebilecek buton kodlarına ihtiyacım var.

Buton, hücrelerde hareket ettikçe sağa sola gitsin mi yoksa sadece belirli bir sütunda yukarı aşağıya mı hareket etsin?
Başlık: Ynt: Hareketli Buton hk.
Gönderen: Sabri ŞİRİN - 01 Şubat 2011, 15:18:06
Hüseyin Bey Merhaba,
Sadece belirli sutün aralığında olursa daha iyi olur.
Teşekkür ederim.
Başlık: Ynt: Hareketli Buton hk.
Gönderen: Hüseyin Çoban - 01 Şubat 2011, 15:21:11
Sabri Bey, aşağıdaki kodları çalışma sayfasının kod bölümüne yapıştırarak deneyiniz.
Butonları eklediğiniz sütun üzerinde yukarı-aşağı hareket ettirecektir.

CommandButton İçin:
Kod: [Seç]
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveSheet.Shapes("CommandButton1").Top = ActiveCell.Offset(2, 2).Rows.Top
End Sub

Düğmeler İçin:
Kod: [Seç]
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveSheet.Shapes("düğme 1").Top = ActiveCell.Offset(2, 2).Rows.Top
End Sub
Başlık: Ynt: Hareketli Buton hk.
Gönderen: Sabri ŞİRİN - 01 Şubat 2011, 16:28:22
Hüseyin bey,
Çok teşekkür ederim. Harika çalışıyor.
Ellerine sağlık. :alkis
:saygilar
Başlık: Ynt: [Çözüldü] Hareketli Buton Hakkında
Gönderen: Hüseyin Çoban - 01 Şubat 2011, 17:11:32
Hüseyin bey,
Çok teşekkür ederim. Harika çalışıyor.
Ellerine sağlık. :alkis
:saygilar

Rica ederim Sabri Bey. İyi çalışmalar dilerim.    :begendim
Başlık: Ynt: Hareketli Buton hk.
Gönderen: lion2577 - 16 Ocak 2024, 15:55:47
Buton, hücrelerde hareket ettikçe sağa sola gitsin mi yoksa sadece belirli bir sütunda yukarı aşağıya mı hareket etsin?

Hüseyin bey bu dediğinizi nasıl yapabilriz. Yardımcı olabilirmisiniz lütfen.