Bir makroyu çalışma kitaplarında ortak kullanma

[Biolightant]

Benzer şekilde yaklaşık otuz adet değişken var.

böyle bir şey işine yararmı?

Option Explicit
Public shtzoom01 As Integer
Public shtzoom02 As Integer
Public shtzoom03 As Integer
Public shtzoom35 As Integer

Public Sub shtzoomYAP(Deger As Integer, DegiskenAdi As String)
    Select Case DegiskenAdi
        Case "shtzoom01": shtzoom01 = Deger
        Case "shtzoom02": shtzoom02 = Deger
        Case "shtzoom03": shtzoom03 = Deger
        Case "shtzoom35": shtzoom35 = Deger
        Case Else: MsgBox "Tanımsız değişken adı!", vbExclamation
    End Select
End Sub

değiştirmek içinde herhangi bir excel de

Sub zoomAyarla()
    Application.Run "shtzoomYAP", 60, "shtzoom03"
End Sub

 

[kykbt]

Hocam Merhaba
Public ler farklı ve farklı macrolarda kullanılıyor

Public ActWrkbkName As String
Public WrkbkName As String
Public WrkName As String
Public AnlWrkName, WrkNameAy, ShtNameAy
Public sht, n, x1, y1
Public shtzoom 'As Integer
Public shtnm As String
Public ShtName As String
Public acshtnm As String
Public kayıtpas As Variant
Public durum As String
Public güncellendimi As String
Public güncelleme
Public değiştimi As String
Public admin As String, farklıuser As String
Public username As String, usernametext As String
Public userhddc As String, userhddD As String, servhdd As String
Public useryetki As String
Public usernamemacro As String
Public döngüsay As Integer
Public macrosay As Integer, makrolarıkes As String
Public msg As Variant, MsgMacro As Variant
Public MsgDevammı, MsgSor As String
Public uyarı As Variant
Public kayıtoldumu As String
.......
.......

yani sabit değerler almıyor, her makroya göre değer değişebiliyor

 

[Biolightant]

Bu tip bir eklenti işinize yararmi ?

Değişken Kütüphanesi Paylaşımlı - PublicAd.xlam Eklentisi

? PublicAd.xlam Eklentisi ? Amaç : "Bu eklenti içinde özel AD verebileceğiniz değişkenleri tanımlamak, okumak, silmek ve listelemek için pratik bir sistem sunar. Bu değişkenler her dosyada işlem yapılabilir ve en son kaydedilen değerde hafızada tutulur." ? Eklenti yüklenmesi : PublicAd rar...

www.excel.web.tr