excel formülü vba ya yazma

[leonurdo]

Merhabalar,

Aşağıda yazdığım kodda yer alan formülü çalıştıramadım vba da. nerde hata yapıyor olabilirim acaba fikriniz var mı? N8-p8 arasına (3),(2),(1)lerin maximumunu E8 hücresine getirmek amacım. 3 -2 ya da 1 şeklinde



Private Sub Worksheet_SelectionChange(ByVal Target As Range)


LastRow = ActiveSheet.USEDRANGE.Rows.Count

For Each cell In Sheets("K1").Range("E8:E" & LastRow).Cells

cell.Formula = "=IF(ISNUMBER(MATCH(""*""&""(3)"";N88;0));""3"";IF(ISNUMBER(MATCH(""*""&""(2)"";N88;0));""2"";IF(ISNUMBER(MATCH(""*""&""(1))"";N88;0));""1"";"""")))"


Next


End Sub

 

[mancubus]

öncelikle formüller excel sayfalarında kullanılmak içindir... kodlar ise excel'de bulunmayan, formülü olmayan veya rutin olarak tekrar edilecek işlemler blokunu otmatik hale getirmek için kullanılır.

ikinci olarak, Worksheet_SelectionChange olayına her hücreye tıklamada tetiklenecek basit bir formül yazma işlemi excel'i yavaşlatır. önermem.

üçüncü olarak, foruma kod kopyalarken cevaplama panelinin üzerindeki # düğmesine tıklarsanız boşluksuz olarak [ CODE ][ /CODE ] tag'leri çıkar. kodları bu ikisinin arasına kopyalayınız.

dördüncü olarak, hücredeki formülü aynen buraya yazarsanız uyarlayalım.

beşinci olarak, asıl amacınızı daha somut açıklarsanız alternatif çözümler de sunulabilir. bunu yapmanın en iyi yolu mevcut veriyi ve kodlar çalıştıktan sonraki durumu gösteren bir dosya eklemektir.