Pregunta en
Visual Basic
y en 2 temas más
¿Por qué este código no carga la imagen en mi archivo pero en el original si?
Private Sub CommandButton1_Click() imag = ThisWorkbook.Path & "\img\" & TextBox1 & ".jpg" On Error Resume Next Image1.Picture = LoadPicture(imag) End Sub
Pregunta en
Microsoft Excel
y en 2 temas más
Problema con Vlookup en VBA, tengo este código en un formulario, pero no de resultado, en lugar eso devuelve el error 1004.
Private Sub CommandButton2_Click() Dim Std As Variant Std = Application.WorksheetFunction.VLookup(Me.TextBox1.Value, Sheets("Componentes L2").Range("A:K"), 2, 0) Me.TextBox2.Value = Std End Sub
Pregunta en
Microsoft Excel
y en 2 temas más
Tengo un problema con un formulario, al desplegarlo me dice que no encuentra la ruta del archivo
Private Sub UserForm_Initialize() ''pict es el nombre de la cerpeta donde están las fotos, 1.1 es la imagen que aparece iniciando el formulario imag = ThisWorkbook.Path & "\Pict\" & 1.1 & ".jpg" '' Image1 nombre del cuadro de imagen Image1.Picture =...
Pregunta en
Microsoft Excel
y en 2 temas más
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.
Tengo lo siguiente: Private Sub CommandButton1_Click() Valor = Application.WorksheetFunction.VLookup(Me.TextBox1.Value, Sheets("DATA Maro-2021").Range("a:B"), 2, 0) Me.Loc.Caption = Valor End Sub