Skip to main content

AccessTr.neT


Etiketler
Yazar: ucloy - Cevaplar: 7 - İzleme: 4243
csv uzantılı dosyaları seçerek tabloya alma
Herkese Merhaba

C:\OKUMA\ Klasöründe
OKUMA_01
OKUMA_02
OKUMA_03
gibi daha fazla da olabilir .csv uzantılı aynı özellikte dosyalarım var bu dosyaları
DENEME_01 adlı Vt daki
CVS_DOSYASINDAN_ALINAN_HAM_VERI tablosuna almak istiyorum
Tek dosya yı makro ile aldım ama 2 den fazla dosya da yapamadım.
C:\OKUMA klasöründen dosyaları seçerek alabilirsem çok güzel olacak.
Yardımlarınız için teşekkür ederim.
Saygılarımla
Yazar: ucloy - Cevaplar: 8 - İzleme: 4540
adresi belli klasorden csv dosyası alma
Herkese merhaba


Ekteki

“Kopya_ Maytas_Klasor+ csv Veril al + ayır” Vt Win 7 ve Acsess run time olan bir PC de çalışmadı

Vt daki “Maytas_Form” formu açılıyor “ klasore gozat” penceresi de açılıyor ama dosyaları
listelemiyor

“Maytas_Form” da klasör seçme yerinde doğrudan
C: /OKUMA/ adresindeki “. csv” dosyaları listelemesi de benim için yeterli

Mevcut kodu nasıl değiştirmek gerekir


Private Sub Komut2_Click()
Me.Liste18.RowSource = ""

Dim Obj As
Yazar: ramazanemrullah - Cevaplar: 13 - İzleme: 3978
Csv formatina gönderme
Merhabalar arkadaşlar ben bir excelin (orjinal.xlsx) içine istediğim satıra veri yazıyorum (düzenlenen.csv) dosyası olarak yapmak istiyorum fakat her o bire bir gerçek cvs dosyası olmuyor her seferinde açarken hata veriyor konu hakkında yardım eder misiniz? 


[vb]Public Function ExportRequest() As String

   Dim appExcel As Excel.Application
   Dim wbk As Excel.Workbook
   Dim wks As Excel.Worksheet

   Dim sTemplate As String
   Dim sTempFile As String
   Dim sOutput As String
   
Yazar: accessman - Cevaplar: 0 - İzleme: 445
Access Tablosunu Csv Dosyasına Göndermek
Access Tablosunu Csv Dosyasına Göndermek
Dim DATE1 As String
Dim PATH As String

DATE1 = Format(Date, "yyyymmdd")
PATH = "location where the CSV file is stored\prefix name" & DATE1 & ".csv"
DoCmd.TransferText acImportDelim, "Import Specification", "Table", PATH, True
Task