Merhaba,
Excelde makro yazmaya yeni başladım. Net ücretten brüt ücreti hesaplamaya çalışıyorum.
İşime yarayan bir makro bulup kendi dosyama uyarlamakla başladım. Aldığım makroda tek bir hücre için hesaplama yapılıyor, ama aynı işlemi yaklaşık 1000 satır için yapmasını istiyorum. Formülleri kopyalamayı başardım ama GoalSeek komutunda sorun yaşıyorum. "F2:F988" dediğimde hata veriyor.
Yardımlarınızı bekliyorum.
Teşekkürler...
Sub BruteGit()
'
Sheets("Ocak").Select
Net = Range("F2").Value
Range("F2").Select
Range("F2").FormulaR1C1 = "=RC[7]-RC[1]-RC[3]-RC[5]-RC[6]"
Range("F2").GoalSeek Goal:=Net, ChangingCell:=Range("M2")
End Sub
Excelde makro yazmaya yeni başladım. Net ücretten brüt ücreti hesaplamaya çalışıyorum.
İşime yarayan bir makro bulup kendi dosyama uyarlamakla başladım. Aldığım makroda tek bir hücre için hesaplama yapılıyor, ama aynı işlemi yaklaşık 1000 satır için yapmasını istiyorum. Formülleri kopyalamayı başardım ama GoalSeek komutunda sorun yaşıyorum. "F2:F988" dediğimde hata veriyor.
Yardımlarınızı bekliyorum.
Teşekkürler...
Sub BruteGit()
'
Sheets("Ocak").Select
Net = Range("F2").Value
Range("F2").Select
Range("F2").FormulaR1C1 = "=RC[7]-RC[1]-RC[3]-RC[5]-RC[6]"
Range("F2").GoalSeek Goal:=Net, ChangingCell:=Range("M2")
End Sub