Que onda JorgitoFRyOle,
EL MID() te regresa en una variable tipo RESULTADOstring el formato obtenido de stringATRABAJAR definido por la longitud de inicio y la longitud de tamaño(esta opcional) de la siguiente forma:
RESULTADOstring= MID(stringATRABAJAR,longitud_de_inicio,longitud_de_tamaño)
Ejemplo :stringATRABAJAR = "Jorgito FR y OLE"
RESULTADOstring=MID(stringATRABAJAR,9,2) "Texto Resultado es FR
Actua como filtro (tambien estan el Len(),left() right(),Instr(),split(),etc..)
¿de donde sale la sentencia if err then msgbox err.description, 48? no entiendo bien tu pregunta pana aqui lo que se hace es poner un error , podrias agregarle vbOKOnly,etc.. como todo msgbox . Este error viene tipificado por el sistema.asi que no hay que definirlo.
Un salu2