+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Seçilen Verilerin Word'e Aktarılması (/konu-secilen-verilerin-word-e-aktarilmasi.html)
Cvp: Seçilen Verilerin Word'e Aktarılması - feraz - 18/02/2020
O zaman ozan hoca yanlış yaptı kodları.
Berduş hocanın önceki mesajdaki kodu deneyin birde inputbox için.
Benim array için yazdığım kod belki hatalı olmuştur kafadan ve denemeden yazdığım için.mantıken öyle olur sanıyordum.Size akşama doğru bitiririm unutmazsam eğer inputbox ve textbox olarak inşAllah.Tabii yardım gelirse daha iyi olur.
Cvp: Seçilen Verilerin Word'e Aktarılması - prestij06 - 18/02/2020
onu da denedim. bu sefer formatı doğru yazınca hata vermiyor ama verileri word e aktarmıyor. boş word şablonu çıkıyor.
Cvp: Seçilen Verilerin Word'e Aktarılması - feraz - 18/02/2020
Dosyanızı çalışan son halini atarmısınız.Ona göre yapalım kodlarda en sonki olsun hani satır atlamayı düzelttiğiniz şekilde
Cvp: Seçilen Verilerin Word'e Aktarılması - feraz - 18/02/2020
Aslında ozan hocanının kodlarını deneyemedim lakin düzgün çalışıyor gibi.
İnput boş çıkmaması için ya orayı sileceksiniz yada başına tek tırnak koyup çalıştıracaksınız kodu.Dosyanın son halini yüklerseniz diğer şartlar için yardımcı olunmaya çalışılır.
Dim GVeri As String
GVeri = InputBox("İlk ve Son KAyıt", "Kayit Gir", "")
If StrPtr(Gveri) = 0 Then
MsgBox ("İptal")
Exit sub
ElseIf result = vbNullString Then
' MsgBox ("İnput boş")
Exit sub
Else
' GIlkKayit =...... ve sonrası buraya.
End If
Cvp: Seçilen Verilerin Word'e Aktarılması - ozanakkaya - 18/02/2020
Kodu
Dim GVeri As String
GVeri = InputBox("İlk ve Son KAyıt", "Kayit Gir", "")
If StrPtr(GVeri) = 0 Then
MsgBox ("İptal")
Exit Sub
ElseIf GVeri = vbNullString Then
MsgBox ("İnput boş")
Exit Sub
Else
' GIlkKayit =...... ve sonrası buraya.
End Ifşeklinde deneyiniz. Kod içerisine exit sub yazılmasına gerek yok.
Cvp: Seçilen Verilerin Word'e Aktarılması - feraz - 18/02/2020
Exit sub yazmışınız ve bir önceki mesaj ile aradaki fark nedir?
Ayrıca harf vs.. girince hata kontrolu yapılmasıda isteniyordu.
Onlarıda yaparsanız bana gerek kalmaz akşama uğraşmama
