Excel 2003-2007 Makro Sornu

[zlatanobo]

Değerli Arkadaşlar Merhaba,

Daha önce Excel 2003 te yapmış olduğum bir tabloyu, bilgisayar değiştikten sonra Ecel 2007 de çalıştırmaya çalışınca hata almaya başladım. Sitede araştırma yaptım, bu sayede bazı sorunları giderdim ancak yine takıldığım bir hata var ve çözümü bulamadım. Yardımlarınızı rica ediyorum.

2003 de yazmış olduğum sonsatır makrosu şu şekildeydi:

Sheets("Bilgi").Select
son_satir = [A65536].End(xlUp).Row
SonBrm = [B65536].End(xlUp).Row

ancak dosyamı açtığımda resimde görülen hatayı alıyorum ve tıkandım açıkcası.

Kodun tam şekli şöyle :

Private Sub UserForm_Initialize()
On Error Resume Next
Sheets("Bilgi").Select
son_satir = [A65536].End(xlUp).Row
SonBrm = [B65536].End(xlUp).Row
Sofor.RowSource = "Bilgi!A2:A" & son_satir
ComboBox1.RowSource = "Bilgi!B2:B" & SonBrm
ComboBox2.RowSource = "Bilgi!B2:B" & SonBrm
ComboBox3.RowSource = "Bilgi!B2:B" & SonBrm
ComboBox4.RowSource = "Bilgi!B2:B" & SonBrm
ComboBox5.RowSource = "Bilgi!B2:B" & SonBrm
ComboBox6.RowSource = "Bilgi!B2:B" & SonBrm

Sheets("Blg").Select
With Sheets("BLG")
SonMst = [A65536].End(xlUp).Row
Musteri.RowSource = "Blg!A2:A" & SonMst
End With
End Sub


yardımlarınız için şimdiden teşekkür ederim.

 

[suleyman242]

verdiğin rakamda bir sıkıntı yok
muhtemelen başlangıçta değişkeni tanımlamıyorsun çalıştıkça üzerine ilave ediyor
boyutlarını başta tanımla bence.

 

[zlatanobo]

Nasıl yapacağımı anlayamadım, biraz daha açarmısın? Nasıl yapabilirim?

 

[suleyman242]

Nasıl yapacağımı anlayamadım, biraz daha açarmısın? Nasıl yapabilirim?

Çalışma dosyanı gönderirsen daha kolay çözüm bulunur.
dün bahsettiğim değişkenlerin tanımlanması :
mesela tarih değişkeni için
dim xx as date
256 ya kadar sayı olacaksa
dim xa as byte...
bunlar gibi

 

[Merhum İdris SERDAR]

.

[A65536] olan satırları;

son_satir = Worksheets("Bilgi").Cells.SpecialCells(xlCellTypeLastCell).Row

veya

son_satir =Worksheets("Bilgi").Range("A" & .Cells.SpecialCells(xlCellTypeLastCell).Row).End(x lUp).Row

şekline dönüştürerek deneyin.

.

 

[zlatanobo]

Sayın yurttas ve suleyman242

Öncelikle cevaplarınız ve ilginiz için teşekkür ederim.

Söylediklerinizi uyguladım ancak sonuç değişmedi, sayın yurttas dediğiniz şekilde değiştirdiğimde de sonuç aynı oldu.

Sayın suleyman242 dosyayı buraya ekleyemiyorum, zira içinde şirketimizle ilgili bilgiler mevcut. Ancak söylediğiniz gibi son_satir ve sonbrm tanımlamalarımın türünü tanıtamadığımdan olduğunu zannındayım. Bu nedenle ben bunların içeriğini size anlatayım. Son_satir, bilgi sayfasında bulunan müşteri isimlerinin en son kaçıncı satıra kadar dolu olduğunu bulmak için kullandığım bir bölüm. Bu yüzden 2003 excel de ki son satır olan 65536 kullanıyordum ve bu şekliyle excel 2003 de sorunsuz çalışoyordu. 2007 excel e geçtikten sonra yukarıdaki resimde gördüğünüz hatayı vermeye başladı. Kısacası son_satir tanımım excel deki son satır sayısına denk gelen bir birim.

Umarım anlatabilmişimdir.

Yardımlarınız için tekrar teşekkür ederim...