Substitua a linha a seguir:
localizar.RowSource = "dadosproduto!a2:a" & linhastotal
Além disso, clique na caixa de combinação 'localizar', em modo de design, e altre sua propriedade ColumnCount para 2 e ColumnWidths para, por exemplo 100;100
Felipe Costa Gualberto - http://www.ambienteoffice.com.br