- Katılım
- 17 Haziran 2021
- Mesajlar
- 5
- Excel Vers. ve Dili
- Türkçe ve 2019 versiyon
Aşağıda belirttiğim şekilde denklem kurarak sürekli ekleyerek üstüne i ve j değerlerince devam etmesini istedim ancak "C" & J +2 kısmı doğru çalışmadı istediğim şu x_1_1*C3*Talep(1) + x_1_2 *C4*Talep(1)+x_2_1*C5*Talep(2) .................. bu şekilde c değerlerini her denklem eklediğinde C3 den başlayarak 1 arttırmasını istiyorum ne eklemem gerekiyor o kısma "C" & j + 2 & bu kısımı nasıl yazabilirm
Dim Denklem As String
Range("F1").Select
Denklem = "="
'=x_1_1*C3*u_1+
For i = 1 To MS
For j = 1 To PTS
Denklem = Denklem & "x_" & i & "_" & j & "*" & "C" & j + 2 & "*" & Talep(i) & "+"
Next
Next
Denklem = Mid(Denklem, 1, Len(Denklem) - 1)
ActiveCell.Formula = Denklem
Dim Denklem As String
Range("F1").Select
Denklem = "="
'=x_1_1*C3*u_1+
For i = 1 To MS
For j = 1 To PTS
Denklem = Denklem & "x_" & i & "_" & j & "*" & "C" & j + 2 & "*" & Talep(i) & "+"
Next
Next
Denklem = Mid(Denklem, 1, Len(Denklem) - 1)
ActiveCell.Formula = Denklem
