Aktarma kodundaki hata

[İsmail Küçükşengün]

Merhabalar;

Userform üzerindeki Combo'dan BUL ile bulduğum kişiye ait sayısal verilerin, işlem yapmak için aktarmak istediğim sayfaya göndermek için (şayet veri yoksa hata vermesin diye)

If TextBox12 <> "" Then Sheets("avukat!ax2").Value = TextBox12.Text * 1 Kodunu kullanmak istediğimde bu kez:

Runtime error '9' -Subscript out of range. hatası vermektedir.

Kodda ne gibi değişiklik uygun olur.

Şimdiden teşekkürlerimle.

 

[mehmett]

Şöyle deneyin.

If TextBox12 <> "" Then Sheets("avukat").Range("AX2").Value = TextBox12.Text * 1

 

[İsmail Küçükşengün]

Sn. Mehmet;

Sizlerin sayesinde, bu acemilikle sora sora birşey bir şeyler yapmaya çalışıyorum.

Şayet becerebilirsem, kendimi birşeyler bildiğimi sanacağım.

Teşekkür ve saygılarımla.

 

[İsmail Küçükşengün]

Sn. Mehmet;

Verdiğiniz kod bazen ve boş verilerde "Type mismatch" hatası veriyor.
Tam sevinmişken, sorunu çözememekten yine moral sıfır.

Herhalde biraz eceleciyim.

Saygılar.

 

[İsmail Küçükşengün]

Yukarıdaki kodları, sayı olan hücreler için uyguladığımda, TextBoxlardan sayı olan
ilk boşta, yukarıdaki hatayı veriyor.
Fakat bu hata verdiği textBox'a kadar olanlar yine aktarılıyor, bundan sonrakiler
aktarılmıyor.

 

[mehmett]

Kodlarınızın Sub'dan sonraki ilk satırına "On Error Resume Next" yazmayı denediniz mi?

 

[İsmail Küçükşengün]

Sn. mehmett,

Bir kez daha teşekkürlerimi sunuyorum.

On Error Resume Next >Bu kod sadece aktarmalarda mı kullanılmalı. Anlamı ve fonksiyonu nedir?

Burası bir okul, sizler hocamız ve bizler de öğrenmeye meraklı öğrenciler olduğumuz için, sizleri bu tür sorularla meşgul etmekteyiz.

Selam ve saygılarımla.

 

[mehmett]

Sn kucuksengun,

Ben de kodlar konusunda pek iyi değilim ama "bir kelime" bile olsa bildiğimi bilmeyenlerle paylaşmaktan zevk alıyorum.

Kod bilgimiz az olsa bile ingilizce sözlükten çevirdiğimizde On error resume next ifadesi Hata durumunda sonraki işlemden devam et demektir.

Yanlışsam kod üstadları düzeltsinler.

 

[İsmail Küçükşengün]

Sn. mehmett;

Sn. Hocam ( çok büyük ihtimalle, sizden yaşlı olsam da) kendimi,
sizlere böyle böyle hitap etmek zorunda hissettim.

Paylaşımcılığınıza bir kez daha teşekkürler.

Selam ve saygılarımla.

 

[xxrt]

yaşlı olsam da)

Abi kaç yaşındasın..
:?: Yanlış anlamayın sadece merakımdan soruyorum..

 

[İsmail Küçükşengün]

Sn. xxrt;

55 yaşındayım.

Excel'le 10 ay kadar önce (ilk kez sizin sitenizde) tanıştım.

Bu zaman zarfında bir yerlere geldiğimi umuyorum. Fakat sistematik bir öğrenme durumu olmadığı için (meslekten dolayı fazla zaman da bulamadığım ve kitap vs. desteklemediğim için) yine de acemi sayılırım.

Saygılarımla.

 

[xxrt]

55 yaşındayım

:shock:
Bu yaşta bu performans.. :bravo:

 

[İsmail Küçükşengün]

Excel'i sevdiren sizler sayesinde. :hey: