I am trying to create a macro from several existing macros. 

I am getting a type mismatch error that I just cannot figure out. 

The error is here (LN 193):

If UBound(Bodies) > 1 And LCase(Right(SwComp.GetPathName, 3)) = "asm" Then