Textbox vazio

[Neri]

Pessoal
Me dêem uma ajuda... tenho alguns textbox que são para valores. Caso não preencho eles, logicamente fica vazio na hora de salvar na planilha. Até aí tudo bem. Mas na hora de abrir o Listview dá erros, pois ele soma as colunas.
Pensei em colocar no "Salvar" do primeiro form a expressão "0,00" não funciona. Coloque 0 e tb não funciona.
O que posso fazer?

Para somar uso a função
Sub calcularbruto()
Dim i As Long
Dim valor As Double
For i = 1 To Me.ListView1.ListItems.Count
valor = valor + CDbl(Me.ListView1.ListItems(i).ListSubItems(5))
Next i

txtbruto.Text = valor
txtbruto.Value = Format(txtbruto, "R$ #,##0.00")

End Sub

Alguma sugestão de alterar?

[Guima]

Ola Neri,

Onde você colocou o valor zero ?

Teoricamente se colocar um IF dizendo que se o valor da planilha estiver vazio, ele sera "0" daria certo. Pois, assim quando houver a soma ela será feita em cima de zero e não de vazio. Ja tentou isso ?

Abraço

[Neri]

Bom dia Guima
Obrigado pela sua pergunta. Voltei para analisar o que estava fazendo e vi um erro grave meu....(hehehehe)

Quando estava vazio pedia para colocar zero, porém no local errado (erro feio)...
Ao invés de colocar zero na planilha, colocava zero no Textbox....

Muito obrigado
Abraço