Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: am Anfang und am Ende die Leerzeichen entfernen

am Anfang und am Ende die Leerzeichen entfernen
27.12.2013 19:19:05
Selma
Hallo Leute,
wie kann ich bitte per VBA in aktivem Arbeitsblatt am Anfang und am Ende die Leerzeichen entfernen.
Es soll an gesamten Arbeitsblatt angewendet werden!
Gruß,
Selma

Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Trim(Zelle.Value)
27.12.2013 19:31:03
Matthias
Hallo Selma

Option Explicit
Sub Selma()
Dim Bereich, Zelle As Range
Set Bereich = ActiveSheet.UsedRange.Cells
For Each Zelle In Bereich
Zelle.Value = Trim(Zelle.Value)
Next
Set Bereich = Nothing
End Sub
Gruß Matthias

Wichtig! Nicht bei Formeln geeignet !! owT
28.12.2013 00:33:56
Matthias

Anzeige
Korrektur! SpecialCells(xlCellTypeConstants,23)
28.12.2013 00:30:06
Matthias
Hallo Selma
Besser ist es so:
Option Explicit
Sub Selma()
Dim Bereich, Zelle As Range
Application.ScreenUpdating = False
Set Bereich = ActiveSheet.UsedRange.Cells.SpecialCells(xlCellTypeConstants, 23)
For Each Zelle In Bereich
Zelle.Value = Trim(Zelle.Value)
Next
Set Bereich = Nothing
End Sub
So ist sichergestellt das er keine Formeln in Werte ändert.
Gruß Matthias

Anzeige
AW: Korrektur! SpecialCells(xlCellTypeConstants,23)
29.12.2013 20:53:50
Selma
Hallo Matthias,
ich habe es jetzt erst testen können.
Ich habe eine Beispieldatei mit den Blättern "VORHER" und "NACHHER" hochgeladen.
Im Arbeistblatt "NACHHER" haben einige Zellen die Formatierung verloren.
Die Zellen habe ich gelb dargestellt für besseren Verständnis.
Woran liegt das bitte?
https://www.herber.de/bbs/user/88638.xls
Danke und Gruß,
Selma

Anzeige
SpecialCells(xlCellTypeConstants,2) owT
30.12.2013 00:07:28
Matthias

AW: SpecialCells(xlCellTypeConstants,2) owT
30.12.2013 12:39:53
Selma
VIELEN DANK!!!
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige