Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
364to368
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
364to368
364to368
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zeilenumbruch bei Datenübername

Zeilenumbruch bei Datenübername
18.01.2004 15:08:23
Wolfgang
Hallo
wenn ich Daten von einem anderen Programm an Excel übergebe
habe ich in den Zellen oftmals Zeilenumbrüche (ein kleines Quadrat).
Hat jemand nee Lösung wie ich diesen Umbruch wegbekomme.
gruß wolfgang

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilenumbruch bei Datenübername
18.01.2004 15:25:01
Bertram
Hallo Wolfgang,
hier ein Auszug aus meinem Programm. Du kanst es ja an deie Bedürfnisse anpassen.


Private Sub txtReason_AfterUpdate()
'Tabulatoren und Zeilenumbrüche löschen, falls vorhanden
With Sheets(1).Range("A1")
    .Value = txtReason
    .Replace What:=Chr(9), Replacement:=" ", lookat:=xlPart
    .Replace What:=Chr(10), Replacement:=" ", lookat:=xlPart
    .Replace What:=Chr(13), Replacement:=" ", lookat:=xlPart
    'Überflüssige Leerzeichen zwischen dem Text löschen
    Sheets(1).Cells(1, 2).Value = Application.WorksheetFunction.Trim(.Value)
    txtReason = Sheets(1).Cells(1, 2).Value
    .Value = ""
End With
End Sub

     Code eingefügt mit Syntaxhighlighter 2.5

Gruß
Bertram
Anzeige
AW: Zeilenumbruch bei Datenübername
18.01.2004 16:12:59
Wolfgang
Hallo Bertram
Danke, hat auf anhieb gepaßt.
gruß Wolgang

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige