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
Seçilen Verilerin Word'e Aktarılması
Konuyu Okuyanlar: 1 Ziyaretçi