Şimdi Ara

Makro ile çizim nesnelerini gruplamak

Daha Fazla
Bu Konudaki Kullanıcılar: Daha Az
2 Misafir - 2 Masaüstü
5 sn
1
Cevap
0
Favori
876
Tıklama
Daha Fazla
İstatistik
  • Konu İstatistikleri Yükleniyor
0 oy
Öne Çıkar
Sayfa: 1
Giriş
Mesaj
  • Makro ile çizim nesneleri oluşturup gruplamam gerekiyor. aşağıdaki gibi bir kod kullanıyorum ancak çizim nesnelerinin adı her seferinde farklı olduğu için kod hata veriyor.
    Koddaki (Array("Line 2", "Rectangle 1") ifadeleri nasıl değiştirirsem o anda oluşturulan bu iki nesneyi (adı ne olursa olsun) gruplayabilirim?

    Sub Makro2()
    ActiveSheet.Shapes.AddShape(msoShapeRectangle, 128.25, 52.5, 87, 121.5).Select
    ActiveSheet.Shapes.AddLine(140.25, 106.5, 210, 106.5).Select
    ActiveSheet.Shapes.Range(Array("Line 2", "Rectangle 1")).Select
    Selection.ShapeRange.Group.Select
    End Sub

    dosya indir
    http://rapid share.com/files/185326576/CizimNesnesi.xls.html



    < Bu mesaj bu kişi tarafından değiştirildi feryat -- 18 Ocak 2009; 11:55:52 >







  • Yapay Zeka’dan İlgili Konular
    Photoshop nesne taşıma yardım
    10 yıl önce açıldı
    Daha Fazla Göster
    
Sayfa: 1
- x
Bildirim
mesajınız kopyalandı (ctrl+v) yapıştırmak istediğiniz yere yapıştırabilirsiniz.