Celwaarde van cel die formule bevat ontbreekt bij Zoeken/vba

[Senso]

Er staat 4 x -14,28 in een document/cel en ik wil die lokaliseren maar krijg er maar twee d.m.v. zoeken. Waar een formule staat wordt niet aangegeven. Is daar een optie voor?
Was er ook niet vba om gezochte waarden met een celkleur aan te geven/markeren?

 

[snb]

Ik tref het niet een keer aan in je voorbeeldbestand.

 

[Senso]

Screenshot.

 

[AHulpje]

"Zoeken in:" Waarden en niet Formules

 

[Senso]

Heel mooi! Bedankt.:thumb:

 

[Senso]

Kan iemand deze aanpassen voor het zoeken op een getal?

Sub j()
 a = Application.InputBox("Zoek tekst/getal", "Vul iets in")
    If a <> "" Then
            Set c0 = ActiveSheet.Cells.Find(what:=a)
            If c0 Is Nothing Then
                MsgBox "Niets gevonden", vbOKCancel, "Let op"
                Exit Sub
            End If
    
            c00Address = c0.Address
            Set c00 = c0
            Do
                Set c0 = ActiveSheet.Cells.FindNext(After:=c0)
                Set c00 = Application.Union(c00, c0)
            Loop Until c0.Address = c00Address
        
            If c00.Count > 0 Then c00.Interior.ColorIndex = 8
            b = MsgBox("Markering weghalen?", vbYesNo, "Let op")
            If b = vbYes Then c00.Interior.ColorIndex = xlNone
    End If
End Sub

 

[snb]

In welk bestand ?

 

[Senso]

@snb
Iedereen weet nu wel dat jij mijn schoonmoeder bent.

 

[snb]

Mijn zoon zou niet met zo'n stijfkoppig type hoeven aankomen.

 

[Haije]

Zie post #5 in dit draadje

https://www.helpmij.nl/forum/showth...le-(gemiddelde-van-4-niet-aanliggende-cellen)

 

[Senso]

@Haije
Het is niet toegestaan een bestand te plaatsen met persoonsgegevens en privacygevoelige informatie. Een document met een contract en cijfers over tig jaren lijkt mij niet wenselijk te plaatsen.

Deze vraag, zie screenshot is zo simpel dat iedereen even die getallen in een document kan zetten om even de vraag/uitkomsten te reproduceren. Met de code markeer je alle tekst die hetzelfde is, maar getallen worden niet geaccepteerd. Dus dat is de vraag. Maak de vba ook geschikt voor getallen.

 

[huijb]

@ Senso: Wat denk je nou te bereiken met dit hautaine gedrag. Dat de helpers harder voor je gaan "lopen" Jij weet net zo goed als ieder ander dat je een voorbeeld bestand dient te plaatsen. Niet het originele bestand, maar een voorbeeld. Hetgeen je dus zelf ook aangeeft in andere topics waarin je reageert.

 

[popipipo]

Deze vraag, zie screenshot is zo simpel dat iedereen even die getallen in een document kan zetten om even de vraag/uitkomsten te reproduceren.

Als dat zo simpel is kun je het ook zelf doen.

 

[Haije]

@senso,

Ik haal uit je oorspronkelijke vraag, dat er cellen met waarden en cellen met formules voorkomen. Dat alleen zou je moeten doen beseffen dat "even simpel" getalletjes overnemen geen optie is.

Bovendien: in de aangehaalde post geef je notabene zelf aan dat een voorbeeld bestand altijd gewenst is.