text bestand opslaan als xlsx.

[Jeneroy]

Allen,

Kan iemand mij helpen met dit probleem!

Ik heb een macro die een tekst bestand opent in Excel. Dit bestand moet worden opgeslagen als xlsx bestand in andere map in sharepoint.


De macro loopt soms vast bij het opslaan van dit bestand. Wat doe ik fout! Hij loopt vast bij de laatste regel met onderstaande foutmelding.

   Workbooks.OpenText Filename:= _
        "C:\Users\a123456\SAPLOADS\File" _
        , Origin:=xlWindows, StartRow:=1, DataType:=xlDelimited, TextQualifier _
        :=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, Semicolon:= _
        False, Comma:=False, Space:=False, Other:=False, FieldInfo:=Array(Array _
        (1, 1), Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 2), Array(6, 1), Array(7, 1), Array(8 _
        , 1), Array(9, 1), Array(10, 1), Array(11, 1), Array(12, 1), Array(13, 1), Array(14, 1), _
        Array(15, 1), Array(16, 1), Array(17, 1), Array(18, 1), Array(19, 1), Array(20, 1), Array( _
        21, 1)), TrailingMinusNumbers:=True
  
   
     Windows("File").Activate
 
    ActiveWorkbook.SaveAs Filename:= _
        "https://tsx-my.sharepoint.com/personal/Documents/File1.xlsx" _
        , FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False

 

[OctaFish]

Wellicht heeft het te maken met het SharePoint adres? Heb je al geprobeerd om het bestand eerst op de lokale pc op te slaan? Dan weet je dat het niet aan het opslaan an sich ligt.

 

[Jeneroy]

Sharepoint adres is gewoon goed.

 

[OctaFish]

Tja, dat kan wel zijn, maar de grap is nu juist om te zien of het opslaan wél lukt als je dat lokaal doet. Als je dat niet wilt testen, dan houdt het voor mij snel op....

 

[edmoor]

Je kan een werkboek alleen opslaan naar een locatie die via de Verkenner bereikbaar is.