O que pode estar errado que sempre que lanço o numero da nota fiscal o campo ele zera
Se o numero da nota for maior que zero ele me preencheria o campo desejado. Segue a sintaxe
Private Sub userform_Initialize()
If Txt_Data > 0 Then
If nface > 0 Then
Dim ws As Worksheet
Dim i As Long
Set ws = ThisWorkbook.Sheets("acetona")
With ws
i = .Rows.Count
lstdt = .Range("F" & i).End(xlUp).Value
Me.Txt_MedIniAce.Value = lstdt
'End If
End With
End If
End If
End Sub
Postado : 28/02/2015 4:28 pm