[Yardım]  Office2013 makro sorunu

VBA Makrolar ile ilgili sormak istedikleriniz, yapmak istedikleriniz hakkında yardım alabileceğiniz bölümdür.

Office2013 makro sorunu

İleti#1)  xpeker » 12 Şub 2019 15:39

Aşağıda verdiğim kod daha önceden çalışmamda çalışıyor iken Win10 ve Office2013 yüklü sistemde çalışmamakta, düzenleyebileceğim bir eklenti varmıdır yada uyarlayabilinir mi? [ilginc]
(Kodun hata satırı ilk baştaki " Son_Dolu_Satir = "

Kod: Tümünü seç
Private Sub CommandButton2_Click()
If TextBox4.Text <> "" Then
Son_Dolu_Satir = Sheets("ALINAN").Range("C65536").End(xlUp).Row
    Bos_Satir = Son_Dolu_Satir + 1
    Sheets("ALINAN").Range("C" & Bos_Satir).Value = _
                   Application.WorksheetFunction.Max(Sheets("ALINAN").Range("C:C")) + 1
    Sheets("ALINAN").Range("C" & Bos_Satir).Value = TextBox4.Text
    Sheets("ALINAN").Range("D" & Bos_Satir).Value = ComboBox4.Text
    Sheets("ALINAN").Range("E" & Bos_Satir).Value = TextBox5.Text
    Unload Me
UserForm1.Show
End If
TextBox4 = Empty
TextBox5 = Empty
ComboBox4 = Empty
End Sub
Kullanıcı avatarı
xpeker
Siteye Alışmış
 
Kayıt: 05 Oca 2015 19:41
Meslek: memur
Yaş: 37
İleti: 116
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Balıkesir

Cevap: Office2013 makro sorunu

İleti#2)  askmadige34 » 12 Şub 2019 20:24

Örnek dosyanızı eklerseniz daha iyi olur.
Dim Son_Dolu_Satir as long
Dim Bos_Satir as long şeklinde tanımlama yaparak deneyin.
Bir de referanslarda missing ile başlayan bir referans varsa kaldırın.
askmadige34
Forum Moderatörü
 
Kayıt: 20 Kas 2015 13:04
Meslek: memur
Yaş: 38
İleti: 1687
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Kayseri

Cevap: Cevap: Office2013 makro sorunu

İleti#3)  xpeker » 13 Şub 2019 03:00

askmadige34 yazdı:Bir de referanslarda missing ile başlayan bir referans varsa kaldırın.


şkşk
Düzeldi, teşekkür ederim.
Kullanıcı avatarı
xpeker
Siteye Alışmış
 
Kayıt: 05 Oca 2015 19:41
Meslek: memur
Yaş: 37
İleti: 116
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Balıkesir


Forum Genel Makro Soruları

Online Kullanıcılar

Bu forumu görüntüleyenler: Kayıtlı kullanıcı yok ve 3 misafir

Bumerang - Yazarkafe