Új hozzászólás Aktív témák

• #22643 slashing senior tag

  Új Válasz 2014-07-28 15:31:30 #22643

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  slashing

  senior tag

  Miért nem találja a fájlt?
  A kill sornál áll meg file not found-al de nem értem miért

  Sub DeletTxtFiles()
  Dim Filename, Pathname As String, ASN As String
  ASN = ActiveSheet.Name
  Pathname = "q:\SPC 2010-2012-2013\Bosch\TXT\" & ASN & "\"
  Filename = Dir(Pathname & "*.txt")
  
  Do While Filename <> ""
  
  Kill "q:\SPC 2010-2012-2013\Bosch\Gyártott termékek\txt\" & Filename
  Filename = Dir
  Loop
  End Sub

  (excel 2013)

Új hozzászólás Aktív témák