VB'den Exeldeki Macroyu Çalıştırmak??

[DeViaNce]

*.xls'de bulunan macromu *.xls açılmadan (dosya açılmadan,ekrana gelmeden ) VB den bir kodla çalıştırabilirmiyim.
Teşekkürler...

 

[Ferhat Pazarçevirdi]

İyi de .. O zaman kodları neden xls dosyanın içinde tutuyorsunuz ?

VB'de yazın olsun bitsin ...

VB'de VBA kodu çalıştıracak kod yerine, direkt VB kodu çalışsın. Olmaz mı ?

 

[DeViaNce]

exelde okuttuğum veriler var ve cok fazla makro iç içe ben bir exe oluşturup tek bir macroyu VB den exel içerisinde çalıştırıp ekrana gelmeden exel işlemi bitirsin istiyorum.

 

[Mahmut Bayram]

Şu kodun işiniz görmesi lazım.

[COLOR=Navy]Dim wb As Object
Set xls = CreateObject("Excel.Application") 
   Set wb = xls.Workbooks.Open(".xls")
      xls.Application.Run "say" ' say makrosu çalışır
          wb.Save
          wb.Close 
      Set wb = Nothing
   xls.Quit
Set xls = Nothing[/COLOR]

 

[Yakut]

slm,

Mahmutt hocam , uzmanliginizi gösterdiniz, kodlari denedim,tek kelime ile süper.
tesekkürler

saygilar

 

[DeViaNce]

Hata veriyor set xls satırında referanslardanda ekledim exeli(11) ama düzeltemedim neden olabilir başka
Set xls = CreateObject("Excel.Application11") olarak olmadı
:S

 

[Yakut]

Private Sub Command1_Click()
Dim wb As Object
Set xls = CreateObject("Excel.Application")
Set wb = xls.Workbooks.Open("VB.xls")
xls.Application.Run "A" ' say makrosu çalisir
wb.Save
wb.Close
Set wb = Nothing
xls.Quit
Set xls = Nothing
End Sub

"VB" Excel dosya adi "A" ise senin kullanacagin Excel kodu

bu durumda bende hata vermedi ,gayet güzel calisti

 

[DeViaNce]

evet sorunu buldum portable kullanıodum vb yi sorun oymuş eksik yükleme:S

Teşekkür ederim. Emeğinize sağlık