formul olan hücreleri bir hücreye göre belirleme

[modoste]

ifade olarak güçlük çeksemde şu an yaptığım bi çalışmada aklıma takılan soruyu sormak istiyorum
daha önceden belirli bir aralıkta formül olan hücreleri belirlemek adına
Alan seç
F5 bas / Özel / Formüller
Enter dediğimde formülolan hücreler koyu renkle belli olduğunu öğrenmiştim

şimdi merak ettiğim ise A4:F1000 arası diyelim bu arada birkaç hücrede formül var ama formüllerden bazıları A1 hücresini $A$1 kullanarak formüllenmiş

herhangi bir hücrenin kullanıldığı (bağıl yada normal bir formül mantığı olabilir) formüllü yerler bulunabiliyomu

 

[Ömer]

Merhaba,

Yerleşik işlemlerle bu işlemi yapamazsınız. Makro kullanmanız gerekir.

Sub FormulBul()
Dim hucre As Range
On Error Resume Next
 
Range("B5:C20").Interior.ColorIndex = xlNone
 
For Each hucre In Range("A4:F1000")
    If formulicerigi(hucre) Like "*$A$1" Then
        hucre.Interior.ColorIndex = 40
    End If
Next hucre
 
End Sub
 
 
Function formulicerigi(InputCell As Range) As String
    formulicerigi = InputCell.FormulaLocal
End Function

.

 

[modoste]

anladım sayın ömer hocam teşekkür ederim

 

[KURSAT3600]

Merhaba ömer hocam acilen yardıma ihtiyacım var müsaitseniz mesaj ekindeki talodaki formüle bakabilirmisiniz

 

[Mahir64]

Merhaba ömer hocam acilen yardıma ihtiyacım var müsaitseniz mesaj ekindeki talodaki formüle bakabilirmisiniz

Merhaba
Sorularınız kendi başlığınızı açarak sorarsanız daha hızlı cevap alırsınız.
I11 yazarak deneyin

=TOPLA.ÇARPIM(--($C$8:$C$32=[COLOR=DarkRed]H11[/COLOR])*($D$8:$D$32=$I$10))

Aşağı dosru çekerek diğerlerine uygulayın

 

[KURSAT3600]

black lord tşk ederim

 

[Mahir64]

black lord tşk ederim

Kolay gelsin
3 ayrı aşlıkta bu soruyarastladım. Bunun yerine kendi başlığınızda cevap almaya çalışırsanız daha hızlı cevap alırsınız.