Pagina 1 van 1

Excel vragen

Geplaatst: 20 jan 2012, 15:37
door Auto
Als je in een kolom allemaal codes hebt staan, bijvb "AA-12-12" en "11-XD-00"

Welke formule moet je gebruiken in de kolom er naast om alle records waar XD in voorkomt eruit te halen?

In oude versies had je volgens mij een formule die iets had met "=Contain("XD";A1) waarna er TRUE of FALSE kwam te staan. Of klopt dat niet?

Re: Excel vragen

Geplaatst: 20 jan 2012, 15:47
door ZWP
Met =VIND.SPEC("XD";A1) krijg je een waarde als het voorkomt en een fout (#WAARDE!) als het niet voorkomt.
Kun je dat gebruiken?

Re: Excel vragen

Geplaatst: 20 jan 2012, 15:49
door ZWP
Of natuurlijk een filter, met Bevat XD.

Re: Excel vragen

Geplaatst: 20 jan 2012, 15:49
door Tiberius
In de Engelse versie: Search

Re: Excel vragen

Geplaatst: 20 jan 2012, 16:05
door Auto
ZWP schreef:Met =VIND.SPEC("XD";A1) krijg je een waarde als het voorkomt en een fout (#WAARDE!) als het niet voorkomt.
Kun je dat gebruiken?
Die heb ik uitgeprobeerd en alleen dan krijg ik in veel velden die foutmelding (#waarde!) hoe kan je die dan wegkrijgen en dat het veld leegblijft indien er geen match is?

Re: Excel vragen

Geplaatst: 21 jan 2012, 10:00
door ZWP
Auto schreef:
ZWP schreef:Met =VIND.SPEC("XD";A1) krijg je een waarde als het voorkomt en een fout (#WAARDE!) als het niet voorkomt.
Kun je dat gebruiken?
Die heb ik uitgeprobeerd en alleen dan krijg ik in veel velden die foutmelding (#waarde!) hoe kan je die dan wegkrijgen en dat het veld leegblijft indien er geen match is?
=ALS.FOUT(VIND.SPEC("XD";A1);"")
Waar nu "" staat kun je een andere waarde of tekst invoeren die je wilt zien bij een fout.

Re: Excel vragen

Geplaatst: 21 jan 2012, 20:53
door RacecaR
Je kunt ook een EXCEL macro maken, dan heb je veel meer mogelijkheden:

Option Explicit

Sub test()
Dim nCnt1 As Integer

nCnt1 = 1
Do While Cells(nCnt1, 1) <> ""
If Right(Left(Cells(nCnt1, 1), 5), 2) = "XD" Then
Cells(nCnt1, 2) = 1
Else
Cells(nCnt1, 2) = 0
End If
nCnt1 = nCnt1 + 1
Loop
End Sub

Re: Excel vragen

Geplaatst: 23 jan 2012, 09:28
door refo
RacecaR schreef:Je kunt ook een EXCEL macro maken, dan heb je veel meer mogelijkheden:

Option Explicit

Sub test()
Dim nCnt1 As Integer

nCnt1 = 1
Do While Cells(nCnt1, 1) <> ""
If Right(Left(Cells(nCnt1, 1), 5), 2) = "XD" Then
Cells(nCnt1, 2) = 1
Else
Cells(nCnt1, 2) = 0
End If
nCnt1 = nCnt1 + 1
Loop
End Sub
Lijkt het ouwe Basic wel.

Volgens mij is de vraag dat gesignaleerd moet worden of er ergens XD staat.
Het lijkt me dat deze macro het alleen signaleert als het in het midden staat.

Re: Excel vragen

Geplaatst: 23 jan 2012, 10:19
door Tiberius
refo schreef:
RacecaR schreef:Je kunt ook een EXCEL macro maken, dan heb je veel meer mogelijkheden:

Option Explicit

Sub test()
Dim nCnt1 As Integer

nCnt1 = 1
Do While Cells(nCnt1, 1) <> ""
If Right(Left(Cells(nCnt1, 1), 5), 2) = "XD" Then
Cells(nCnt1, 2) = 1
Else
Cells(nCnt1, 2) = 0
End If
nCnt1 = nCnt1 + 1
Loop
End Sub
Lijkt het ouwe Basic wel.
Sterker nog: het is Basic. VBA staat voor Visual Basic for Applications.