Thema Datum  Von Nutzer Rating
Antwort
14.12.2011 09:02:40 pag
Solved
14.12.2011 10:16:08 Holger
NotSolved
14.12.2011 11:23:04 pag
NotSolved
14.12.2011 13:10:26 Dekor
NotSolved
14.12.2011 13:55:14 pag
NotSolved
Blau Leerzeichen an bestimmter Stelle einfügen
 14.12.2011 17:04:50 Dekor
NotSolved

Ansicht des Beitrags:
Von:
Dekor		 Datum:
14.12.2011 17:04:50		 Views:
1737		 Rating:
     
Antwort:
  Ja
Thema:
Leerzeichen an bestimmter Stelle einfügen

Hallo pag,

das WITH könnte das Problem sein.

 

Dim ausl As Worksheet
Dim V1
Dim rngZelle As Range
Dim lngAnz As Long
Dim x As Long, y As Long, lngZeilen As Long
  
With ThisWorkbook
   Set ausl = .Worksheets("Auslieferung")
   lngZeilen = ausl.Cells(ausl.Rows.Count, 1).End(xlUp).Row
   x = 1
   For y = 2 To lngZeilen
      V1 = .Cells(y, 1).Value
      If V1.Cells(y, 1).Value <> "" Then
         .Cells(y, 1).Value = Left(.Cells(y, 1).Value, 4) & " " & Mid(.Cells(y, 1).Value, 5)
      End If
   Next y
End With

Gruß Detlev

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
14.12.2011 09:02:40 pag
Solved
14.12.2011 10:16:08 Holger
NotSolved
14.12.2011 11:23:04 pag
NotSolved
14.12.2011 13:10:26 Dekor
NotSolved
14.12.2011 13:55:14 pag
NotSolved
Blau Leerzeichen an bestimmter Stelle einfügen
 14.12.2011 17:04:50 Dekor
NotSolved