Office: (Office 2007) Leerzeichen verhindern

Hallo!
Ich möchte verhindern, dass in einer Zelle überflüssige Leerzeichen eingegeben werden können.
Nachdem es sich bei den Zellen um Vor- und Nachname handelt sind überhauüt keine Leerzeichen notwendig.
Ich hätte mir gedacht ich mache das über bedingte Formatierung und lasse in dieser Zelle nur Buchstaben zu. Das müsste eigentlich die Leerzeichen verhindern, bzw. kann ich ja einen Text eingeben "keine Leerzeichen erlaubt" oder so.
Ist das schlau?
Ich weiß schon, dass es über "Glätten" auch geht, aber das kann ich wahrscheinlich nicht von vornherein in ein Formular einbauen oder?

Danke schön
Manda

:)

 

Hallo Manda

z.B. Spalte C markieren für Vornamen

Blattregister Code anzeigen

Worksheet selecktion change Ereignis auswählen

dann diesen Code einführen

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Zellinhalt, i, Zeichenzahl, ZellinhaltNeu, x, Zeichen

For i = 2 To 300
ZellinhaltNeu = ""
Zellinhalt = Range("C" & i).Value
Zeichenzahl = Len(Zellinhalt)
For x = 1 To Zeichenzahl
Zeichen = Mid(Zellinhalt, x, 1)

If Zeichen "" Then
ZellinhaltNeu = ZellinhaltNeu + Zeichen


End If

Next x
Range("C" & i).Value = ZellinhaltNeu

Next i

End Sub


Speichern , die Zeile for i = 2 to 300 anpassen


(2 wäre hier die Startzeile , 300 die letzte Zeile in der ein Vorname stehen könnte)

Have a lot of fun

Turbo

 

Hallo Manda,

mit der Bedingten Formatierung geht das nicht.

Markiere eine Zelle (z.B. A1), und gib über Daten > Datenüberprüfung > Zulassen: Benutzerdefiniert > Formel: folgende Formel ein und bestätige mit OK.

=NICHT(ISTZAHL(FINDEN(" ";A1)))

Dieses Format kannst Du mit dem Formatpinsel auf weitere Zellen übertragen.

 

Danke schön Rainberg!
Du verstehst mich und gibst mir Formeln, statt VBA!
Allerdings ist es etwas mühsam hunderte von Zellen mit dem Pinsel zu bearbeiten - das geht sicher auch mit hinunterziehen oder?

Im schlimmsten Fall muss ich 1200 Zellen x 2 damit bestücken!

Im übrigen habe ich mich hier jetzt registriert und bin bei euch *tongue.gif*
Nächste Frage kommt als nächstes Thema.

Liebe Grüße
Manda

 

Hallo Manda,

wie man ein Format vervielfältigt ist Geschmacksache.

Ich handhabe es bei der Datenüberprüfung und bei der Bedingten Formatierung immer so, dass ich vor dem Aufruf derselben erst alle Zellen/Bereiche markiere und dann erst die Formel eingebe.

Nach OK sind dann alle markierten Zellen formatiert.

 

Ich hab jetzt die ganze Spalte markiert und die Formel bei Datenüberprüfung eingegeben - aber ich hab noch immer die Löcher im Code wo Susi Sorglos ein Leerzeichen mitschleppt.
In der Spalte sind natürlich schon Daten und mit einem Hyperlink versehen - abgesehen davon, habe ich eine bedingte Formatierung eingegeben, die so schön nach rosa Mädchen und blauen Buben unterscheidet.
Ist das zuviel für eine Zelle?

Manda

 

Hallo Manda,

die Datenüberprüfung ist nicht für die Korrektur bereits eingegebener Daten gedacht, sondern wirkt nur vorbeugend bei Neueingaben.

Verwende zur Überprüfung Deiner Spalte die Menüfunktion Suchen/Ersetzen.

Suchen nach: gib ein Leerzeichen ein

Ersetzen durch: gib nichts ein

 

Rainberg!
Ich umarme und drücke dich - jetzt einmal vorläufig, weil die Formel muss ich auch noch prüfen (irgendwie bin ich ein bißchen zwanghaft! :-)
Ich hab jetzt die Daten überprüft und kein Leerzeichen ist mehr da!

Wunderbar - danke schön.
Und eigentlich könntest schon schlafen gehen *tongue.gif*


Liebe Grüße
Manda