otomatik tetiklenen makro oluşturduğum çalışma kitabı dışında da çalışıyor!

[errkannaktas]

Merhabalar,

şu şekilde bir proroblemin var. belirli bir çalışma kitabının belirli bir sayfasında kopyalama yapıştırma işlemi yapan basit bir makrom var. bu makroyu belirli bir hücre aralığındaki değerler formül ile değiştiğinde otomatik çalışacak şekilde kod ladım. fakat kod ve makro eğer o anda başka bir çalışma kitabında isem, o çalışma kitabında işlem yapmaya çalışıyor. ben her hangi farklı bir çalışma kitabında olsam bile kod ve makronun ilgili sayfada işlem yapmasını istiyorum.

kod bu şekilde

Private Sub Worksheet_Calculate()
'Updateby Extendoffice


Dim Xrg As Range
Set Xrg = Range("a1:C8")
If Not Intersect(Xrg, Range("a1:C8")) Is Nothing Then
Makro2
End If
End Sub


makrom ise alttaki gibi

Sub Makro2()
'
' Makro2 Makro
'
' Klavye Kısayolu: Ctrl+Shift+U

Columns("$k:$k").Select
Range(Selection, Selection.End(xlToRight)).Select
Selection.Copy
Range("M1").Select
ActiveSheet.PasteSpecial Format:=3, Link:=1, DisplayAsIcon:=False, _
IconFileName:=False
Range("A1").Select
End Sub


çalışmasını istediğim çalışma kitabı ve sayfası ise aşağıdaki gibi

'[ECHO_Takip SON HALİ.xlsm]makroo'!$A$1


şimdiden teşekkürler.

 

[ÖmerFaruk]

Kodlarınızın baş tarafına aşağıdaki satırı koyarak kurutlabilrisiniz.
If ActiveWorkbook.Name <> ThisWorkbook.Name Then Exit Sub

 

[errkannaktas]

Kodlarınızın baş tarafına aşağıdaki satırı koyarak kurutlabilrisiniz.
If ActiveWorkbook.Name <> ThisWorkbook.Name Then Exit Sub

teşekkürler. birebir kopyaladım, ama sorun şu ki bu makroyu tetikleyen veriler formülle birlikte 3 dakikada bir değişiyor.. ben başka çalışma kitabında isemde çalışmaya devam etmesi gerekiyor. bu kodu ekleyince makronun olduğu kitapta isem makro tetiklenip çalışıyor, ama başka çalışma kitabındaysam çalışmıyor.

 

[ÖmerFaruk]

Kodlarınızdaki Columns ve Range ile başlayan satırlarda
Workbook ve Worksheet leri belirtirseniz kodlar da sadece o kitabın o sayfasında işlem yapar.

 

[errkannaktas]

Kodlarınızdaki Columns ve Range ile başlayan satırlarda
Workbook ve Worksheet leri belirtirseniz kodlar da sadece o kitabın o sayfasında işlem yapar.

teşekkürler.