Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

Excel'e gönderilen dosyanın adını kodla değiştirme

mahirozcan
mahirozcan
Access Cevaplanmış Soruları
4
2819

Excel'e gönderilen dosyanın adını kodla değiştirme

Çözüldü #4
Kur@l
AccessTR.Net
Kur@l
Bul
Uzman
Adı Soyadı:
Yaşı: 48
Konum: -
Ofis Versiyonu: Ofis 2010 32 Bit
Son Oturumu: 22/04/2024,21:10
Yorumları: 2.047
Konuları: 59
Kayıt Tarihi: 05/11/2008
Teşekkür Puanı: 1.658
Aşağıdaki şekilde denermisiniz.


Private Sub Excel_Click()

Dim Klasor As String

Klasor = CurrentProject.Path

 

If MsgBox(Me.adı.Value & " Bilgilerini Excele aktarmak istiyor musunuz? ", 36, "Sorgu1 Aktarılacak") = 6 Then

DoCmd.TransferSpreadsheet acExport, 8, "Sorgu1", Klasor & "\" & Me.adı.Value & " Bilgileri.xls", True, "Bilgiler"

End If

End Sub
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Cvp: Excel'e gönderilen dosyanın adını kodla değiştirme - Yazar: Kur@l - 28/09/2011, 16:26