VBA Hazırladığımız programı masa üstünden...

[puma22]

Arkadaşlar VBA haırlamış olduğumuz programı Excel sayfasına girmeden direk masa üstünden istediğimiz simgeyi vererek çalıştarabilirmiyiz

 

[alpi]

Dosyanızı sağ tıklatarak masaüstüne sürükleyip bırakın
Kısayol oluştur u seçin
Kısayola sağ tıklatıp Özellikleri seçin.
Açılan pencerede simge değiştirebilirsiniz.

 

[puma22]

Alpi hocam dediğinizi yaptım benim asıl istediğim direk User Forma giriş yapmak istiyorum yani Excel den tabloyu çağırmadan gelmesini istiyorum

 

[alpi]

VBA Excel 'in alt elemanıdır. Dolayısı ile Excel'i açmadan Excel VBA'ya ulaşılamaz.

 

[puma22]

Hocam sağolasın birşey daha öğrendim sayesinizde Allah razı olsun

 

[alpi]

Ancak şöyle bir çözüm getirilebilir

c dizinine Yeni.xls adlı bir dosya oluşturunuz.
Bu dosyayı açıp bir form birde modül ekleyin ve modüle aşağıdaki kodu yazın

sub FormAc()
     userform1.show
end sub

Yeni bir metin dosyası oluşturun aşağıdaki kodları bu metin dosyasına yazınız

Set i = CreateObject("Excel.Application")
Set Ex = i.workbooks.Open("c:\Yeni.xls")
i.Run ("'Yeni.xls'!FormAc")

Dosyanın uzantısını *.vbs olarak değiştirin.

Bu dosyaya iki kere tıklattığınızda c sürücüsündeki Yeni.xls adlı dosyayı açacak ve FormAc makrosunu çalıştıracaktır. FormAc makrosunda da Formu açmak için gerekli kod yazdığından form açılacaktır.

 

[puma22]

Hocam excelde açtığım modül ,Userformu ve metin dosyasını (C.Yeni.xls )dosyasına mı kaydetcem çünkü açtığım yeni dosyada bunları yapacak bir yermi var acaba

 

[alpi]

Örnek ekte

Yeni.xls yi c dizinine kopyalayın. Diğer dosyanın nerede olduğu önemli değil.

 

[Mdemir63]

VBA Excel 'in alt elemanıdır. Dolayısı ile Excel'i açmadan Excel VBA'ya ulaşılamaz.

Sn. alpi
Private Sub Workbook_Open()
Application.Visible=False
Userform1.Show
End Sub

kodları nı ThisWorkbook kod penceresine kopyalasak dosyayı açmak için tıkladığımızda direkt olarak Userformla açmaz mı?

Saygılar

 

[puma22]

hocam ne yaptıysam olmadı metin dosyasındaki xls uzantını *vba yaptım olmadı
c/yeni.xls uzantısını vbs yapıyorum dosyayı kapadım zaman tekrar xls oluyor
kısaca yapamadım sizinde vaktinizi almayım
acaba metin dosyasına yazdığım kodda benim form adınımı yazmam gerekiyor

 

[alpi]

Sayın Komutan'ın önerdiği çözümü deneyin.

 

[puma22]

Sn Alpi ve Sn Komutana teşekkür ederim Alpi hoocamın dediği gibi yaptım oldu çalışıyor