Detect missing CTB with lisp

[The_Caddie]

If I go and plot but my ctb is missing AutoCAD is able to detect this and prompt me with the warning PLOT STYLE MISSING (found in the plot dla box, under Plot style table pen assignments).

Can I get lisp to detect this also so that I can launch a vb.net dialog box?

[phanaem]

Try this

(findfile
  (strcat
    (vla-get-PrinterStyleSheetPath
      (vla-get-Files
        (vla-get-Preferences
          (vlax-get-acad-object)
        )
      )
    )
    "\\"
    (vla-get-StyleSheet
      (vla-get-ActiveLayout
        (vla-get-ActiveDocument
          (vlax-get-acad-object)
        )
      )
    )
  )
)