TextTemp=QB1ANAA878-
Mid(TextTemp,1,1)=Q-
Mid(TextTemp,2,1)=B-
Mid(TextTemp,3,1)=1-
Mid(TextTemp,4,1)=A-
Mid(TextTemp,5,1)=N-
Mid(TextTemp,6,1)=A-
Mid(TextTemp,1,2)=QB-
Mid(TextTemp,2,2)=B1-
Mid(TextTemp,3,2)=1A-
Mid(TextTemp,4,2)=AN-
Mid(TextTemp,5,2)=NA-
Mid(TextTemp,6,2)=AA-