Here is a macro you could run: Sub ConvertToXlsx() Dim strPath As String Dim strFile As String Dim wbk As Workbook ' Path must end in trailing backslash strPath = 'C: Excel ' strFile = Dir(strPath & '*.xls') Do While strFile ' If Right(strFile, 3) = 'xls' Then Set wbk = Workbooks.Open(Filename:=strPath & strFile) wbk.SaveAs Filename:=strPath & strFile & 'x', _ FileFormat:=xlOpenXMLWorkbook wbk.Close SaveChanges:=False End If strFile = Dir Loop End Sub Warning:.xlsx workbooks don't store macros, so any macros from the. Gilles Peterson Brazilika Zip on this page. xls workbooks will be lost. --- Kind regards, HansV www.eileenslounge.com.

Converter utilities capable of shs file to xls format conversion. A file with SHS extension is a file created by Microsoft Word and Excel when a user drags and drops a selected document text onto the desktop. It is not possible to open SHS files directly. You have to drag and drop the file back into an opened Word or Excel document. Fortunately, you can convert the information in scrap files to.xls format using a simple drag-and-drop. Open a blank Excel workbook by selecting 'New' from the 'File' menu. Drag and drop the.shs file on to the new workbook by highlighting the scrap file icon on the desktop and dragging it onto the worksheet. Excel & Data Entry Projects for $10 - $30. I have a scrap file (.shs ) that is associated with old version of microsoft office and windows xp so I can't open it in windows 7,, this type of files can normally be opened on win.