Sobre el curso: Creación de hoja de calificaciones con Excel 2007- 30/09/2008
Espero te sirva aqui
ejemplo, thelastbrick@yahoo.es
'****************************************************************************
' exportar y gravar en nuevo archivo
Range(i1).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Workbooks.Add
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Application.CutCopyMode = False
' ChDir C:\LEE
FileName = A:\PE_ & fechaenvio
MsgBox FileName
ActiveWorkbook.SaveAs FileName:=FileName, FileFormat:= _
xlText, CreateBackup:=False
ActiveWindow.Close
' exportar y gravar en nuevo archivo
'****************************************************************************
Cursos para compartir lo que sabes
4,84/5
(
