Cara, usa o sendspace, 4shared...

ou retira uma parte desnecessária da planilha (algo que não tenha a ver com o erro, reduz as informações (caso vc tenha muitos dados cadastrados...)

http://www.4shared.com/file/gNUu3IRSce/ ... TOQUE.html
ta ai daanadinha pra testarem e me ajurem pelo amor de Deus

alguem pode me ajudar?

O que se supõe ser executado?
No seu exemplo, ao clicar no produto a primeira vez é carregado os dados do item selecionado.Mas a quantidade não é adicionada porem fica selecionada. Se não acrescentar nada gera uma mensagem. Se acrescentar um valor pode selecionar outro item.

Reinaldo , isso ta ok ,
seleciona por exemplo o código 3 , onde o estoque é 111 , vc verá que se escolher a quantidade 2 , 3 ,4 ou qualquer outro valor que nao comece com 1 , vai dar quantidade acima do estoque
seleciona o codigo 1 que a quant é 20 , só aceita 2 ou 20 , nenhuma outra quantidade.
Muito obrigado pela atenção

No evento Change dos txt de quantidade é feita uma comparação "textual", ou seja--> ...If txb_qtde4 > Txb_QuantMax4 ...
Nessa situação ambos txt são "entendidos" no VBA como valores TEXTO, então quando a quantidade existente é 10, qualquer valor entre 2 e 9 são considerados maior e rejeitados.
É necessário utilizar alguma critério de conversão (Cdbl, Ccur,Cdec...)para compara-los numericamente

Pode me dar um modelo? É que funciona assim, não entendo praticamente nada dessa programação , o que faço é pegar pedaços de códigos e ir adaptando,tentando , até chegar mais ou menos no que quero.
Muito obrigado

Nos eventos change dos txt de 1 a 10

experimente conforme abaixo(exemplo txt1 e txt2):

Private Sub txb_qtde1_Change()
If txb_qtde1 <> "" Then
    If CCur(txb_qtde1) > CCur(Txb_QuantMax1) Then
        Me.txb_qtde1 = Empty
        MsgBox "Quantidade Acima do Estoque", vbRetryCancel
    End If
End If
End Sub
Private Sub txb_qtde2_Change()
If txb_qtde2 <> "" Then
    If CCur(txb_qtde2) > CCur(Txb_QuantMax2) Then
        Me.txb_qtde2 = Empty
        MsgBox "Quantidade Acima do Estoque", vbRetryCancel
    End If
End If
End Sub

na mosca, muitissimo obrigado. mas se nao for pedir muito dá pra me exoplicar quando usar Cdbl, Ccur,Cdec... ; se o "valor quantidade fosse "letras" não precisava desse tal de Ccur?

Por default, txt "passam" os dados como string (texto), então se estiver comparando string com string funciona normal. Porem se os valores forem numéricos mas considerados como string, a comparação fica, digamos assim, capenga. Quanto a utilizar uma ou outra, não há uma regra especifica (pelo menos não conheço) vai depender do tipo de valor na origem.
No editor VBA posicione o cursor sobre o escrito ("Cdbl", por exemplo) e tecle F1 (Help) e vera os tipos e suas diferenças