Yardım zamanlı çalışan makro

Koboy66

Yeni Üye
Katılım
12 Ara 2018
Mesajlar
11
En iyi yanıt
0
Puanları
3
Yaş
39
Konum
İstanbul
Ad Soyad
Erkan uzun
merhabalar butona tıklayınca ilk verileirmi database den çekiyorum sonra baska makro yoluyla aktarma yapıyorum bu makroyu
veri çeken makronun bitiminden sonra nasıl
çalıştırıabilirim
JavaScript:
Sub CommandButton1_Click()





Dim BasTar  As Date  'Declare the BasTar  as Date

Dim BitTar As Date    'Declare the BitTar as Date



BasTar = Sheets("özet").Range("b1").Value    'Pass value from cell B3 to BasTar  variable

BitTar = Sheets("özet").Range("b2").Value     'Pass value from cell B4 to BitTar variable



'Pass the Parameters values to the Stored Procedure used in the Data Connection

With ActiveWorkbook.Connections("satis_alis_maliyet").ODBCConnection

.CommandText = "select * from dbo.EBey_Maliyet_2 ('" & BasTar & "','" & BitTar & "')"

ActiveWorkbook.Connections("satis_alis_maliyet").Refresh

    



End With

Call gider

Call VERIYENILE3

Call Makro1 ' bu makro zaman veri çektikten sonra devreye girsin veriyi çekti bitti dedikten 2 saniye sonra







End Sub
 
Üst Alt