Başka excel dosyasındaki hüçre içerisindeki yazının renk kodunu almak

[maxcilopez]

İyi günler merhaba,
Excel makro ile dosyaları açmadan ExecuteExcel4Macro fonksiyonu ile hücreler içerisinden verileri alabiliyorum. Fakat Benim isteğim Almış olduğum verinin aynı zamanda renk kodunu almak. Çünkü Bu renk koduna göre özel komutlar yazacağım. Bu konuda destek sağlamanızı rica ederim.

deg = "'" & Kaynak & "\" & "[" & h & "]" & "Teklif" & "'!R" '//Veri alınacak dosyalardaki sayfa isimi
Cells(sat, "D") = ExecuteExcel4Macro(deg & 18 & "C" & 2) ' 18. Satır   2. Sutun

 

[Orion1]

ExecuteExcel4Macro ile renk kodu alınmaz diye biliyorum.

 

[maxcilopez]

Dostum merhaba,
Dim sngLeft As Single
sngLeft = Application.ExecuteExcel4Macro("GET.CELL(24, DURUM!R3C2)")

Bu kodu kullandığımda aktif excel dosyasındaki başka bir sayfa içerisinde yer alan yazının renk kodunu alabiliyorum. Fakat sorun şu ki kapalı bir excel dosyasından renk kodu alamıyorum. Eğer ki kapalı bir excel dosyasından hücre içeriği alına biliyor ise renk konunda da bir şekilde alına bileceğini düşünüyorum. Konu Hakkında tekrar yardımlarınızı rica ederim.