Wort im Excel nach einer bestimmten Stellenzahl abhacken

21-07-2005, 14:39

Sven Sven ist offline

Tech-Admin

Registriert seit: Dec 2000

Ort: Neuss

Beiträge: 37.843

OL Nick: xysvenxy

Style: cncboard

VBA:

Code:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Characters.Count > 13 Then
    string_cell = Left(ActiveCell.Value, 13)
    ActiveCell.Value = string_cell
End If

Das aber nur als Denkansatz, es kürzt den Inhalt der aktiven Zelle auf 13 Zeichen wenn sich die Zellauswahl ändert.

End Sub

__________________

Zitat:

Wir sind im Augenblick dabei, zu prüfen, ob es im öffentlichen Interesse liegt, ihnen mitzuteilen, ob wir die Informationen haben, die Sie erbitten, und ob es, sollte das der Fall sein, im öffentlichen Interesse liegt, Ihnen diese Informationen zur Verfügung zu stellen.

Lesezeichen

« Vorheriges Thema | Nächstes Thema »

Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Gäste: 1)

Forumregeln
Es ist Ihnen nicht erlaubt, neue Themen zu verfassen. Es ist Ihnen nicht erlaubt, auf Beiträge zu antworten. Es ist Ihnen nicht erlaubt, Anhänge hochzuladen. Es ist Ihnen nicht erlaubt, Ihre Beiträge zu bearbeiten. BB-Code ist An. Smileys sind An. [IMG] Code ist An. HTML-Code ist Aus.

Gehe zu

Alle Zeitangaben in WEZ +2. Es ist jetzt 23:42 Uhr.