Sub GrafAyar()
'
' GrafAyar Makro
' Makro mehmet tarafından 27.08.2006 tarihinde kaydedildi.
ActiveSheet.ChartObjects("Grafik 1107").Activate
ActiveChart.Axes(xlValue).Select
With ActiveChart.Axes(xlValue)
Windows("BRS Sayfası.xls").Activate
Sheets("imkb").Select
.MinimumScale = [AD3]
.MaximumScale = [AD2]
.MinorUnit = 101.2032
.MajorUnit = 500
.Crosses = xlAutomatic
.ReversePlotOrder = False
.ScaleType = xlLinear
.DisplayUnit = xlNone
End With
ActiveWindow.Visible = False
Windows("BRS Sayfası.xls").Activate
Range("L32").Select
End Sub
Yukardaki makro Grafik ekseninin maksimum ve minimum değerlerini ayarlıyor. Bunu makro kayıt yöntemiyle oluşturdum. Fakat Visual basic hiç bilmediğim için
Aynı sayfadaki bulunan SpinButton2 nin Value değerini bu makro içinde değiştirmek istiyorum. SpinButton2.value = [F1] şeklinde bu makro içine nasıl yerleştiririm. Çok basit fakat Spinbutton nesnesi adresini bir türlü veremedim.
'
' GrafAyar Makro
' Makro mehmet tarafından 27.08.2006 tarihinde kaydedildi.
ActiveSheet.ChartObjects("Grafik 1107").Activate
ActiveChart.Axes(xlValue).Select
With ActiveChart.Axes(xlValue)
Windows("BRS Sayfası.xls").Activate
Sheets("imkb").Select
.MinimumScale = [AD3]
.MaximumScale = [AD2]
.MinorUnit = 101.2032
.MajorUnit = 500
.Crosses = xlAutomatic
.ReversePlotOrder = False
.ScaleType = xlLinear
.DisplayUnit = xlNone
End With
ActiveWindow.Visible = False
Windows("BRS Sayfası.xls").Activate
Range("L32").Select
End Sub
Yukardaki makro Grafik ekseninin maksimum ve minimum değerlerini ayarlıyor. Bunu makro kayıt yöntemiyle oluşturdum. Fakat Visual basic hiç bilmediğim için
Aynı sayfadaki bulunan SpinButton2 nin Value değerini bu makro içinde değiştirmek istiyorum. SpinButton2.value = [F1] şeklinde bu makro içine nasıl yerleştiririm. Çok basit fakat Spinbutton nesnesi adresini bir türlü veremedim.