Kullanıcının girdiği değere göre değişken belirleme.

[smh44]

Öncelikle merhaba arkadaşlar , hepinize kolay gelsin.Bir sorunum var bunun hakkında çözüm aramaktayım yardımcı olursanız sevinirim.

Şimdi kullanıcı text boxa , bir değer girecek ve bu değere göre değişken sayısı belirlenecek.
Ben şöyle düşünmüştüm ama VBA yemedi

x=TextBox1.value
SolverOk SetCell:="$N$18", MaxMinVal:=2, ByChange:="$O$2:$W$(x)"

Fakat VBA hata vermemisne ragmen bu olayı gerçekleştirmiyor bu olayı nasil çözebilirim?
İlginiz için teşekkür ederim.Kolay gelsin İyi akşamlar..

 

[Ömer]

Merhaba,

Sorunuzu tam olarak anlayamadım.

Dim aralik As Range
Set Aralik = Range("O2:W" & textbox1.Text)

İstediğiniz bu tarz bir uygulama mı?

Sizin tanımla;

ByChange:="$O$2:$W$" & x

.

 

[smh44]

Yok şöyle açıklıyım daha açık bir şekilde mesela kullanıcı textboxa 10 girdi benim range'im
O2:W10 olacak eğer 20 girdiyse O2:W20 şeklinde olacak.

 

[Ömer]

ByChange:="$O$2:$W$(x)"

değil;

ByChange:="$O$2:$W$" & x

bu tanımlama işinize yaramadı mı?

.

 

[smh44]

Evet çalıştı , çok teşekkür ederim gerçekten.

Kolay gelsin iyi akşamlar.

 

[Ömer]

Rica ederim, iyi akşamlar...