Wordart'a formül girmek

[diplimit]

Öğrenmek istediğim konu word art gibi sayfaya eklediğimiz nesneleri herhangi bir hücredeki metinle besleyebilir miyiz?

Mesala A3 hücresindeki metin eklenen wordart nesnesinde görünür mü?

Bunu şu yüzden soruyorum her gün güncellenen hücre değeri kendiliğinden wordart nesnesinde gözüksün istiyorum.

Teşekkür ederim

 

[alpi]

'Aşağıdaki kodlar işinizi görecektir
'Referans olarak Excel ieklemeyi unutmayın

Sub WordArtOluştur()
Dim Exc As New Excel.Application
Dim Dosya As Excel.Workbook
Dim DosyaAdıYolu As String
Dim WordArtMetni As String


DosyaAdıYolu = "c:\Örnek.xls" 'metni almak istediğiniz dosyanın tam yolu
Set Dosya = Exc.Workbooks.Open(DosyaAdıYolu)

'Metni almak istediğiniz Sayfa adını ve hücre adresini burada belirtin
WordArtMetni = Dosya.Sheets("Sayfa1").Range("A1").Value

CommandBars("WordArt").Visible = True
ActiveDocument.Shapes.AddTextEffect(msoTextEffect26, WordArtMetni, _
"Arial Black", 36#, msoFalse, msoFalse, 173.6, 168.3).Select

Dosya.Close
Exc.Quit
End Sub

 

[Merhum İdris SERDAR]

Ekteki dosyayı inceleyin.

 

[yucel baygul]

wordart

sn yurttas wordart verisini başka bir dosyadan alabilirmiyim. başka dosyadan veri aldıramadım, bu mümkünmüdür.

 

[Merhum İdris SERDAR]

sn yurttas wordart verisini başka bir dosyadan alabilirmiyim. başka dosyadan veri aldıramadım, bu mümkünmüdür.

Nasıl yani? Ne yapmak için?

 

[diplimit]

Çok teşekkür ederim. Pekala bir sorum daha olacak

Sayfa arka planına resim eklemiştim bu yüzden formül hücresindeki yazıların görünmesini engelleyemiyorum.(normal koşullarda beyaz yazı biçimini seçerek yaptığımız gizlemeyi arka plan resmi varken nasıl yapabiliriz)

Maksadım sadece word art nesnesindeki rakamlar görünsün.

Tekrar teşekkürler.

 

[diplimit]

Tamamdır

Son sorduğum sorunun yanıtına gerek kalmadı. Ben kendimce bir formül buldum