veri alma ve verirken dosya ismi değiştirme ve manual seçme

[BESST]

Merhaba Arkadaşlar

iki tane sorum olacaktı. birincisi ;

excel'den access'e veri aktarırken "docmd.TransferSpreadsheet" aktarılacak dosyayı komut çalıştığında seçme şansımız varmıdır.mesela formdaki buton'a bastığımda almak yada vermek istediğim dosyayı seçebilirmiyim. bu mümkünmüdür ?

ikincisi ;

Access'te "docmd.sendobject" kodunda gönderilecek olan tabloyu seçip gönderiyorum ve dosya o tablonun ismini alıyor. fakat ben dosya isminin başına veya sonuna date() eklemek istiyorum , bu dosya ismini değiştirmek mümkünmüdür ?

Şimdiden İlginize teşekkür ederim .

Saygılar

 

[BESST]

Merhaba Arkadaşlar

İlk soruma ait cevap aşağıda , ikincisi için araştırmalarım sürüyor

çözüm gelirse de hayır demem hani! )

İyi çalışmalar





Forma bir komut düğmesi ekleyip tıklatıldığında kod kısmına aşağıdaki satırları ekliyoruz.


Private Sub Komut Düğmesi_Click()
Dim FileName As String
Dim result As Integer
With Application.FileDialog(msoFileDialogFilePicker)
.Title = "Select Employee Picture"
.Filters.Add "All Files", "*.*"
.Filters.Add "xls", "*.xls"
.FilterIndex = 2
.AllowMultiSelect = False
.InitialFileName = CurrentProject.Path
result = .Show
If (result <> 0) Then
FileName = Trim(.SelectedItems.Item(1))
End If
End With
DoCmd.TransferSpreadsheet acImport, , "veri alınacak tablonun adı", FileName, True
Form.Requery

End Sub