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?
Excel vragen
Re: Excel vragen
Met =VIND.SPEC("XD";A1) krijg je een waarde als het voorkomt en een fout (#WAARDE!) als het niet voorkomt.
Kun je dat gebruiken?
Kun je dat gebruiken?
Re: Excel vragen
Of natuurlijk een filter, met Bevat XD.
Re: Excel vragen
In de Engelse versie: Search
Re: Excel vragen
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?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?
Re: Excel vragen
=ALS.FOUT(VIND.SPEC("XD";A1);"")Auto schreef: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?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?
Waar nu "" staat kun je een andere waarde of tekst invoeren die je wilt zien bij een fout.
Re: Excel vragen
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
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
Lijkt het ouwe Basic wel.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
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
Sterker nog: het is Basic. VBA staat voor Visual Basic for Applications.refo schreef:Lijkt het ouwe Basic wel.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