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

• #14530 lacipapi csendes tag

  Új Válasz 2012-08-02 10:51:09 #14530

  Ú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

  

  lacipapi

  csendes tag

  Sziasztok!

  Azt szeretném, hogy egy fájl mentésekor automatikusan hozzon létre egy másik fájlt a fájlnévben "_masolat" kiegészítéssel. Ezt akárhányszor mentem az eredeti fájlt csinálja meg, és ne jelenjen meg az az ablak hogy "Ez a fájl már létezik. Felülírjam?". Én csináltam egy makrót, de sajna nem működik.

  Sub Workbook_Save()
  Dim filenev As String, kiter As String, WB As Workbook
  Set WB = ActiveWorkbook
  filenev = WB.Name
  kiter = Right(filenev, 5)
  filenev = Left(filenev, Len(filenev) - 5)
  filenev = filenev & "_masolat" & kiter
  filenev = WB.Path & filenev
  
  End Sub

  Azt érzem, hogy még innen hiányzik valami, de nem jövök rá hogy mi.
  Arra is kíváncsi lennék, hogy egy profi hogyan oldaná meg ezt a feladatott, mert biztos sokat lehetne tanulni belőle.
  Előre is köszönöm a segítséget.

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