Trekke ut riktige ordene

March 28  by Eliza

Vanita har et regneark som inneholder ulike kombinasjoner av bokstaver i hver celle i kolonne A. Han er på jakt etter en måte å hente ut ordene fra den listen som er "riktig", som betyr at de er funnet i en stavekontroll ordbok.

Forutsatt at kolonnen bare inneholder ord (ingen mellomrom, tegnsetting eller setninger), kan du manuelt sjekke listen på denne måten:

  1. Lag en kopi av kolonne A i kolonne B. Du har nå to identiske kolonner.
  2. Kolonne Velg B og kjøre stavekontroll.
  3. Hver gang en stave endring er foreslått, godta det. Når du er ferdig, bør du ha kolonne A som den opprinnelige og kolonne B som et spell-sjekket versjon av kolonne A.
  4. I kolonne C, skriv inn formelen = HVIS (A1 = B1, B1, "") og kopiere formelen nedover. Denne formelen viser kun et ord i kolonne C hvis det opprinnelige ordet matcher spell-sjekket versjon av ordet.
  5. Kopiere alle ordene i kolonne C og bruker Lim inn for å lime inn verdier i en annen plassering. Du har nå en liste over gyldig stavet ord.

Hvis du trenger å utføre valideringen regelmessig, kan det være lurt å bruke en makro til stedet opprette din endelige listen. Følgende makro skritt gjennom listen ord i kolonne A og fjerner eventuelle celler som inneholder ord i ordlisten. Etter å ha sjekket alle ordene, deretter sletter den alle ryddet celler.

Sub ExtractDictionaryWords ()
Dim rWords As Range
Dim Rceii Som Range

Application.ScreenUpdating = False
Set rWords = Range (Range ("A1"), _
Range ("A65536"). End (xlUp))
For Hver Rceii I rWords
Hvis ikke Application.CheckSpelling (rCell.Value) Deretter
rCell.Clear
End If
Neste
On Error Resume Next
rWords.SpecialCells (xlCellTypeBlanks). _
Slett (xlShiftUp)
On Error GoTo 0
Satt Rceii = Nothing
Set rWords = Nothing
Application.ScreenUpdating = True
End Sub

Husk-denne makroen er forsettlig destruktiv i sin adferd, noe som betyr at det klarner ut celler. Hvis du har behov for de opprinnelige dataene, vil du ønsker å kjøre makroen på en kopi av dataene, ikke på din eneste eksemplar.

ExcelTips er din kilde for kostnadseffektiv Microsoft Excel trening. Dette tipset (11284) gjelder for Microsoft Excel 2007 og 2010. Du kan finne en versjon av dette tipset for den eldre menygrensesnittet av Excel her: Trekke riktige ordene.