Thema Datum  Von Nutzer Rating
Antwort
22.06.2019 11:22:29 Mathias
NotSolved
22.06.2019 11:54:52 Gast01233
NotSolved
22.06.2019 11:57:01 Gast01233
NotSolved
22.06.2019 12:15:50 Mathias
NotSolved
22.06.2019 12:17:45 Gast01233
NotSolved
22.06.2019 12:29:28 Mathias
NotSolved
22.06.2019 12:40:02 Mathias
Solved
22.06.2019 12:58:12 Gast01233
****
Solved
22.06.2019 13:58:03 Mathias
NotSolved
Blau Geburtstagsmailer mit Excel - Kann Fehlermeldung nicht zuordnen
 27.04.2020 15:50:01 Gast96182
NotSolved

Ansicht des Beitrags:
Von:
Gast96182		 Datum:
27.04.2020 15:50:01		 Views:
581		 Rating:
     
Antwort:
  Ja
Thema:
Geburtstagsmailer mit Excel - Kann Fehlermeldung nicht zuordnen
   Dim sFilename As String
    Dim sFiles As String
    sFiles = ""
    '----< @Loop: Files >----
    Dim iFile As Integer
    For iFile = 1 To objFiledialog.SelectedItems.Count
        '------< Loop.Item  >------
        DoEvents
 
        '< get selection >
        sFilename = objFiledialog.SelectedItems(iFile)
        '</ get selection >
            
        '< correct >
        sFilename = Replace(sFilename, ActiveWorkbook.Path & "\", "", 1, 1, vbBinaryCompare)
        '</ correct >
        
        
        '< add >
        sFiles = sFiles & ";" & sFilename
        '</ add >
    Next
    '----</ @Loop: Files >----
    '< correct >
    sFiles = Replace(sFiles, ";", "", 1, 1, vbBinaryCompare)
    '</ correct >
    
    
    '< write_into_cell >
    ActiveWorkbook.Names("varFiles").RefersToRange.Value2 = sFiles
    '</ write_into_cell >
    '-----------</ Select_File() >-----------
End Sub
'===================</ Region: Helper-Functions >===================

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
22.06.2019 11:22:29 Mathias
NotSolved
22.06.2019 11:54:52 Gast01233
NotSolved
22.06.2019 11:57:01 Gast01233
NotSolved
22.06.2019 12:15:50 Mathias
NotSolved
22.06.2019 12:17:45 Gast01233
NotSolved
22.06.2019 12:29:28 Mathias
NotSolved
22.06.2019 12:40:02 Mathias
Solved
22.06.2019 12:58:12 Gast01233
****
Solved
22.06.2019 13:58:03 Mathias
NotSolved
Blau Geburtstagsmailer mit Excel - Kann Fehlermeldung nicht zuordnen
 27.04.2020 15:50:01 Gast96182
NotSolved