Thema Datum  Von Nutzer Rating
Antwort
Rot string vorne vor erstes zeichen in string einfügen
 06.08.2017 09:57:55 joerg
Solved
06.08.2017 10:57:33 Werner
Solved
06.08.2017 19:46:24 joerg
Solved

Ansicht des Beitrags:
Von:
joerg		 Datum:
06.08.2017 09:57:55		 Views:
1385		 Rating:
     
Antwort:
 Nein
Thema:
string vorne vor erstes zeichen in string einfügen

hallo,

ich habe einen string z (er kommt aus dem Dateinamen (file.name) - z.B. "werner"). Vor diese Zeichenfolge soll ein _ eingefügt werden - also "_werner".

Wie bekomme ich das hin?

Sub t()
Dim fs As Object
Dim MDfsp As Integer, spF As Integer
Dim z As String, b As String
Set fs = CreateObject("Scripting.FilesystemObject")
Set folder = fs.getfolder("D:\Daten\aktuell\Dropbox\mdisc\test")
For Each file In folder.Files
    If Left(file.Name, 1) <> "#" Then
        MDfsp = 2000
        Do While MDfsp >= 0
            spF = file.Size / (1048576)
            If spF <= MDfsp Then
            z = file.Name
            b = z.Insert(1, "_")
            MDfsp = MDfsp - spF
        Loop
    Else
    End If
Next file


End Sub

Vielen Dank für die Hilfe...

Gruß, Jörg

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
Rot string vorne vor erstes zeichen in string einfügen
 06.08.2017 09:57:55 joerg
Solved
06.08.2017 10:57:33 Werner
Solved
06.08.2017 19:46:24 joerg
Solved