prozac

Mi propuesta es que al inicializar el UserForm cargues esos 50 datos. El código sería: Private Sub UserForm_Initialize() Dim i As Integer Dim dtexto As String For i = 1 To 50 dtexto = Worksheets("Hoja1").Range("A" & i).Value If dtexto <> "" Then...

Envíame el archivo con el código y los datos. Si los datos son confidenciales o algo así cámbialos por unos cualesquiera que permitan reproducir lo que dices. [email protected]