filteren van rijen met tekst in hoofdletters

[Willy]

Hoe kan ik alle rijen filteren waarvan de tekst in een bepaalde kolom in
hoofdletters staat?
Ik gebruik Excel 2002 SP3.

[hanno.o...@gmail.com]

Willy,

Hoofdlettergevoelig vergelijken doe je in Excel formules met

=GELIJK({waarde of cel 1} ;{waarde of cel 2})

=GELIJK("excel";"Excel") resulteert in ONWAAR
=GELIJK("excel";"excel") resulteert in WAAR
=GELIJK("EXCEL";"EXCEL") resulteert in WAAR

Hanno

[Wigi]

Klopt Hanno

Willy, als je die formule in elke rij gezet hebt, filter je met de cellen
met WAAR eruit.

--
Wigi
http://www.wimgielis.be = Excel/VBA, soccer and music

[Willy]

Reeds bedankt voor de antwoorden, maar misschien mas mijn vraag niet helemaal
duidelijk. Ik wil geen 2 kolommen vergelijken.
Ik zal proberen het wat duidelijker uit te leggen. Ik heb een kolom met ca.
17000 namen. Sommige daarvan staan volledig in hoofdletters. Ik wil gewoon
een lijstje met de namen die volledig in hoofdletters staan.

"Wigi" schreef:

[Willy]

OK, ik ben er uit. Ik had slechts 1 kolom (met de namen). Ik heb een
identieke 2e kolom bijgemaakt en deze 'proper case' gemaakt. Daarna kon ik
de voorgestelde formule van Hanno gebruiken (de 2 kolommen vergelijken).
Bedankt voor jullie hulp.
Willy

"Willy" schreef:

[hanno.o...@gmail.com]

Willy,

Zet vul dan de kolom er naast met deze formule:
=ALS(GELIJK(A1;HOOFDLETTERS(A1));A1;"")
Als de waarde in A1 gelijk is aan de waarde in hoofdletters in A1 dan
de waarde van A1 weergeven anders niets.

En omdat ik toch bezig was, dit in VB script.

----------
Option Explicit

Sub CapsNamen()
Dim c As Range
Dim i As Integer
For Each c In Range(Cells(1, 1), Cells(1, 1).End(xlDown))
If c.Value = UCase(c.Value) Then

'Mogelijkheid 1: De celwaarde wordt in de zelfde rij in
kolom C weergeven
c.Offset(0, 2).Value = UCase(c.Value)

'Mogelijkheid 2: Bovenaan beginnen en daar direct onder de
volgende in kolom D
Cells(1 + i, 4).Value = UCase(c.Value)
i = i + 1

End If
Next c

End Sub
----------

Kolom A is jouw namen lijst
Kolom B met bovenstaande excel formuler
Kolom C VB script mogelijkheid 1
Kolom D VB script mogelijkheid 2

Kolom A Kolom B Kolom C Kolom D

HANNO HANNO HANNO HANNO
Wendy ROELAND
ROELAND ROELAND ROELAND THOMAS
THOMAS THOMAS THOMAS MARINUS
marieke
Allart
MARINUS MARINUS MARINUS

Je kunt de macro rechtstreeks uit het dialoogvenster Marco's (Alt-F8)
activeren of anders bijvoorbeeld via een commandbutton.

Succes!! Kun je weer even vooruit ;-)

Hanno

On 18 sep, 13:42, Willy <Wi...@discussions.microsoft.com> wrote:
> Reeds bedankt voor de antwoorden, maar misschien mas mijn vraag niet helemaal
> duidelijk. Ik wil geen 2 kolommen vergelijken.
> Ik zal proberen het wat duidelijker uit te leggen. Ik heb een kolom met ca.
> 17000 namen. Sommige daarvan staan volledig in hoofdletters. Ik wil gewoon
> een lijstje met de namen die volledig in hoofdletters staan.
>
> "Wigi" schreef:
>
>
>
> > Klopt Hanno
>
> > Willy, als je die formule in elke rij gezet hebt, filter je met de cellen
> > met WAAR eruit.
>
> > --
> > Wigi
> >http://www.wimgielis.be= Excel/VBA, soccer and music
>

> > "hanno.oudej...@gmail.com" wrote:
>
> > > On 18 sep, 11:22, Willy <Wi...@discussions.microsoft.com> wrote:
> > > > Hoe kan ik alle rijen filteren waarvan de tekst in een bepaalde kolom in
> > > > hoofdletters staat?
> > > > Ik gebruik Excel 2002 SP3.
>
> > > Willy,
>
> > > Hoofdlettergevoelig vergelijken doe je in Excel formules met
>
> > > =GELIJK({waarde of cel 1} ;{waarde of cel 2})
>
> > > =GELIJK("excel";"Excel") resulteert in ONWAAR
> > > =GELIJK("excel";"excel") resulteert in WAAR
> > > =GELIJK("EXCEL";"EXCEL") resulteert in WAAR
>

> > > Hanno- Tekst uit oorspronkelijk bericht niet weergeven -
>
> - Tekst uit oorspronkelijk bericht weergeven -