Wenn Sie innerhalb einer Microsoft Excel 2010 -Tabelle , so wie der Text formatiert arbeiten kann 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. Anleitung
1
Ö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.
2
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.
3
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.
4
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.
5
Kopieren Sie den folgenden Code zwischen den "Sub" und "End Sub "-Zeilen in der VBA Bearbeiter:
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 " zu
6
Geben Sie den folgenden Code zwischen dem letzten und dem Code " " End Sub " line" vbLowerCase . ":
< p> Mit CreateObject (" vbscript.regexp " )
. pattern = " [^ A-Za- z0-9 \\] "
. Globale = True
Jeder 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 .
7
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.