So löschen Sie Interpunktion Alle Caps in Excel

Wenn Sie in einem Tabellenkalkulationsprogramm Microsoft Excel 2010 arbeiten, können die Art und Weise der Text formatiert wird sehr wichtig sein. Während Sie steuern können, wie Sie Text eingeben in die Zellen, wenn Sie Informationen aus anderen Quellen importiert haben, können sie enthalten alle Arten von Formatierungen und Zeichen, die Sie nicht auf Ihrer Tabellenkalkulation wollen. Wenn Ihre Daten ist derzeit in Großbuchstaben und Satzzeichen enthält, können Sie mit VBA, die eingebaute Programmiersprache, um einen schnellen Makro, das die Aktivierung verändern wird, und entfernen Sie alle Satzzeichen aus dem Text in Ihrer Tabelle zu schreiben.

Öffnen Sie die Tabellenkalkulation Excel 2010, wo Sie wollen Satzzeichen entfernen und einen anderen Fall. Klicken Sie auf die Registerkarte "Entwicklertools" am oberen Rand des Bildschirms. Klicken Sie auf "Makro aufzeichnen"-Taste auf der linken Seite der Band entfernt.

Type "RemovePunctuationCaps" in der "Macro Name" ein. Geben Sie "q" in die "Shortcut Key" ein. Klicken Sie auf "OK", um das Fenster zu schließen. Klicken Sie auf die Schaltfläche "Stop" auf dem Band, um das Makro von Aufnahme zu stoppen.

Klicken Sie auf "Visual Basic"-Taste auf dem Band, um den VBA-Editor zu starten. Doppelklicken Sie auf "Modul 1" auf der linken Seite des Editors. Wenn Sie bereits ein Modul in dieser Arbeitsmappe erstellt haben, müssen Sie auf der letzten gelistet Baugruppe klicken, anstelle von "Modul 1". Sie werden "Sub RemovePunctuationCaps ()" auf der rechten Seite des Fensters zu sehen.

Klicken Sie auf der rechten Seite des Fensters. Ziehen Sie mit der Maus über den grünen Text zwischen "Sub entfernen ..." und "End Sub". Löschen Sie alle diesen Text so, dass die "Sub" und "End Sub" Linien alles, existieren.

Kopieren Sie den folgenden Code zwischen den "Sub" und "End Sub"-Zeilen im VBA-Editor:

Dim rng As Range

For Each rng In Selection

rng.Value = StrConv (rng.Text, vbProperCase)

Next rng

Damit wird ein Variable mit dem Namen "RNG" und geben Sie den Code benötigt, um Ihre Auswahl in die richtige Fall ändern. Wenn Sie lieber Kleinbuchstaben verwenden, verändern "vbProperCase" bis "vbLowerCase."

Geben Sie den folgenden Code zwischen dem letzten und dem Code "" End Sub "-Linie:

Mit CreateObject ("vbscript.regexp")

. Pattern = "[^ A-Za-z0-9 \]"

. Globale = True

For Each rng In Selection.SpecialCells (xlCellTypeConstants)

rng.Value =. Replace (rng.Value, vbNullString)

Next rng

End With

Damit entfernen Sie alle Satzzeichen aus den ausgewählten Zellen.

Klicken Sie auf das "X" in der oberen rechten Ecke des Editors, um es zu schließen. Klicken Sie auf die Zelle oder Zellen, wo Sie den Text den Sie konvertieren möchten. Drücken Sie "Strg-Q" und das Makro wird die Aufgabe auszuführen.