AccessTr.neT

Aşağıdaki kodu düğmelere atar ve her excelde çalıltırmak için menüye ekleyip ve tüm sayfalarda çalıştırabilirsiniz benim için yeterli olur.


Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Step 1:  Declare Variables
    Dim strRange As String
'Step2:  Build the range string
    strRange = Target.Cells.Address & "," & _
               Target.Cells.EntireColumn.Address & "," & _
               Target.Cells.EntireRow.Address
'Step 3: Pass the range string to a Range
    Range(strRange).Select
End Sub

Üstadım dediğinizi yapması zor değil lakin menüye ekleyince nasıl tetiklenecek kod tetiklenmesi için ya sayfanın selectionchange yada çift tıklama olayları lazım.
Yinede bir örnek hazırlayayım.

Abey gifi izleyin böylemi olacak?
Çift tıklaınca olayına yaptım.

Ayrıca menü hazırlamada videoda ilk o çıktı aratmamda.

Eğer istediğiniz gibiyse vetdiğim dosyayı xlam olarak(eklenti format) kaydederseniz ve gerekli işlemleri yaparsanız başka excellerdede çalışır diye düşünüyorum.

Üstad ellerine sağlık güzel olmuş. Son aşamadayız inşallah. Düğmeye tıklayıp başladığında çift tıklama değilde direk başlasın ve devam etsin. Tekrar düğmeye tıklayınca dursun. Bunu da gerçekleştireblirsen muradımıza ermiş olucaz inşallah. Birde düğmeli şekilde paylaşabilirseniz güzel olur.