Actividad pública reciente
Ha valorado "Excelente" la respuesta
Tengo un problema con un formulario, al desplegarlo me dice que no encuentra la ruta del archivo
Prueba lo siguiente y dime qué mensaje te aparece Private Sub UserForm_Initialize() Dim imag As String Dim ruta As String ' ruta = ThisWorkbook.Path & "\Pict\" If Dir(ruta, vbDirectory) = "" Then MsgBox "No existe la carpeta : " & ruta Exit Sub End...
Ha valorado "Excelente" la respuesta
Problema con Vlookup en VBA, tengo este código en un formulario, pero no de resultado, en lugar eso devuelve el error 1004.
Es mejor utilizar la método Find Prueba esto: Private Sub CommandButton2_Click() Dim f As Range TextBox2.Value = "" Set f = Sheets("Componentes L2").Range("A:A").Find(TextBox1.Value, , xlValues, xlWhole, , , False) If Not f Is Nothing Then...
Ha valorado "Excelente" la respuesta
¿Por qué este código no carga la imagen en mi archivo pero en el original si?
Quita esta línea On Error Resume Next Prueba otra vez y escribe aquí qué dice el mensaje de error. Prueba esto y revisa si el archivo que aparece en el msg realmente existe en la carpeta Private Sub CommandButton1_Click() Dim imag As String imag =...
Ha valorado "Excelente" la respuesta
Que tal, me gustaría hacer un vlookup en un formulario, que devuelva un dato en un label según el dato ingresado en un textbox.
¿Cuál problema tienes con tu código? Intenta también con el siguiente: Private Sub CommandButton1_Click() Dim f As Range Set f = Sheets("DATA Maro-2021").Range("A:B").Find(TextBox1.Value, , xlValues, xlWhole, , , False) If Not f Is Nothing Then...
Ha empezado a seguir a 
Dante Amor
Dante Amor