Soru Kombinasyon Hesaplayan Makroda Tolerans Yönünü Değiştirme

[ufukayyıldız]

Herkese merhaba,

Foruma yeni üye oldum. Konuyu yanlış yere açıyorsam kusuruma bakmayın lütfen.

Ekteki Excel, girilen değerler ile hedef sayıya ulaşabileceğimiz toplamların kombinasyonlarını hesaplamaktadır. Excele hedef sayı dışında tolerans da girebiliyoruz. Tolerans - ve + yönde çalışmakta.
Toleransın sadece + yönde çalışması konusunda destek verebilecek arkadaşlara şimdiden teşekkür ederim.

 

[Ömer BARAN]

Merhaba.

Yanlış anlamıyorsam;
Module1'deki findsums isimli kod blokunda yer alan aşağıda mavi renklendirdiğim satırın sonuna, yeşil kısmı eklerseniz istediğiniz gerçekleşir.

y = Sheets("Input").Range("Table3[SSum]").Cells(1) + TOL