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

• #32948 Agostino addikt Agostino #32946

  Új Válasz 2016-10-14 10:33:29 #32948

  Ú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

  

  Agostino

  addikt

  válasz Agostino #32946 üzenetére

  no, csak sikerült egyet működésre bírnom

  Sub export()

strFileSaveName = Application.GetSaveAsFilename(Range("X6") & " " & Range("X9") & "01 munkalap feltoltesre" & Range("X10"), _
fileFilter:="Pontosvesszővel tagolt CSV file (*.csv), *.csv")

ActiveWorkbook.SaveAs Filename:=strFileSaveName, FileFormat:=xlCSV, Local:=True

End Sub

  Ez tök jó és a jelek szerint a kívánalmak szerint működik is, ami nekem nem tiszta - nem annyira asztalom a makrózás - az a range beállítás fent. ez biztos láma kérdés...

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