- Katılım
- 17 Haziran 2006
- Mesajlar
- 348
- Excel Vers. ve Dili
- 2003 - TR / 2007 - TR
Merhabalar..
Aşağıdaki formülü nasıl yineletebilirim...
Sub topla()
toplam = WorksheetFunction.SumIf(Sheets("10HaneliSeriNo").[B2:B65536], [B2], Sheets("10HaneliSeriNo").[A2:A65536])
[h2] = toplam
End Sub
B2 nin B3, B4 ... bir alt hücreden referans alması
H2 nin H3, H4 ... bir alt hücreye yazdırılması
Diğer bir şekilde açıklamak gerekirse aşağıdaki formülün makro karşılığı,
=+ETOPLA('10HaneliSeriNo'!$B$3:$B$65536;"*"&$B2&"*";'10HaneliSeriNo'!$A$3:$A$65536)
Teşekkürler...
Aşağıdaki formülü nasıl yineletebilirim...
Sub topla()
toplam = WorksheetFunction.SumIf(Sheets("10HaneliSeriNo").[B2:B65536], [B2], Sheets("10HaneliSeriNo").[A2:A65536])
[h2] = toplam
End Sub
B2 nin B3, B4 ... bir alt hücreden referans alması
H2 nin H3, H4 ... bir alt hücreye yazdırılması
Diğer bir şekilde açıklamak gerekirse aşağıdaki formülün makro karşılığı,
=+ETOPLA('10HaneliSeriNo'!$B$3:$B$65536;"*"&$B2&"*";'10HaneliSeriNo'!$A$3:$A$65536)
Teşekkürler...