komut butonu ile excel sayfası açmak

[inowjoin]

merhabalar
açık olan bir excel dosyasında oluşturduğum komut butonuna tıklayınca ağdakı paylaşımdaki bir excel dosyasının açılmasını istiyorum
bunu nasıl sağlarım

teşekkürler

 

[excelman]

Private Sub CommandButton1_Click()

dosyaac="C:\Excel_Dosyalarım\RAPORLAR\acılacakdosya.xls"

Workbooks.OpenText Filename:=dosyaac, Origin:= _
xlWindows, StartRow:=1, DataType:=xlDelimited, TextQualifier:= _
xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=False, _
Comma:=False, Space:=False, Other:=False, FieldInfo:=Array(1, 1)

End Sub

 

[inowjoin]

teşekkürler