Üye Girişi
Bağlan Google+ ile Bağlan Facebook ile Bağlan
Yeni Kayıt
Tüm Forumlar
  • Tüm Forumlar
  • Web Tasarım - Programlama
  • Yazılım Geliştirme
  • Delphi / C++ /Vb
  • Bu Konuda
Şimdi Ara

excel makro, grafik- kullanıcı girişi nasıl yapılır?

Sıcak Fırsatlarda Tıklananlar
Editörün Seçtiği Fırsatlar
Daha Fazla
Bu Konudaki Kullanıcılar: Daha Az
2 Misafir - 2 Masaüstü
5 sn
1
Cevap
0
Favori
1.908
Tıklama
Daha Fazla
İstatistik
  • Konu İstatistikleri Yükleniyor
Konuya Özel
0 oy
Öne Çıkar
Cevapla
Sayfa: 1
Giriş
Mesaj
  • Merhaba arkadaşlar,
    Excel'de grafik çizerken, hazır şablon kullanıyorum. Bu işlemi makro olarak kaydettim, aşağıda kayedilmiş olan bu makroyu genele yaymak istiyorum.Şöyle ki, o anda çizdiğim grafik örneğin A1 :V300 aralığındaysa, A1 hücresinden verilerin başlangıcı sabit olmak kaydıyle, bitiş için kullanıcıya soran, kullanıcının girdiği son hücre değerine göre aynı işlemi yapan bir makro kaydetmek istiyorum. Bununla beraber, aşağıdaki uygulamada yer alan :"Test No: 1209, Motor Test1 " grafik başlığı kısmınında kullanıcıya "grafik başlığını giriniz" diye soran ve grafik başlığına bu girilen yazıyı yazan bir makro oluşturmak istiyorum.
    Bu konu için yardımcı olabilirseniz, çok memnun olurum. Çünkü çizmem gereken ve de çizilecek o kadar çok grafik var ki!!!


    Range("M4:V300").Select
    Charts.Add
    ActiveChart.ApplyCustomType ChartType:=xlUserDefined, TypeName:="graph1"
    ActiveChart.SetSourceData Source:=Sheets("Mdata").Range("M4:V300"), _
    PlotBy:=xlColumns
    ActiveChart.Location Where:=xlLocationAsNewSheet
    With ActiveChart
    .HasTitle = True
    .ChartTitle.Characters.Text = _
    "Test No: 1209, Motor Test1 "
    .Axes(xlCategory, xlPrimary).HasTitle = True
    .Axes(xlCategory, xlPrimary).AxisTitle.Characters.Text = "Time (hours)"
    .Axes(xlValue, xlPrimary).HasTitle = True
    .Axes(xlValue, xlPrimary).AxisTitle.Characters.Text = "Temperature (°C)"
    End With
    End Sub







    • 
Sayfa: 1

Benzer içerikler

- x
Bildirim
mesajınız kopyalandı (ctrl+v) yapıştırmak istediğiniz yere yapıştırabilirsiniz.
Hizmet kalitesi için çerezleri kullanabiliriz. DH’ye girerek kullanım izni vermiş sayılırsınız.
Anladım Veri Politikamız