Adriel Ortiz Mangia

[Hola esto es para poner el enfoque cuando inicias el userform Private Sub UserForm_Activate() CommandButton1.SetFocus End Sub

[Hola Reviso tu archivo y te comento

[Hola prueba así Sub prueba() Sheets("Hoja1").Select Range("A1:D7").Copy Sheets("Hoja2").Range("A1") End Sub valora la respuesta Excelente o bueno saludos!

[Hola Te paso la macro Esto resulta con la grabadora de macros Sub Macro2() ' ' [Por Adriel ' With Range("F10:F21") .Value = "=IF(RC[-5]=""Credito"",(RC[-4]*R4C2/100),(IF(RC[-5]=""Debito"",(RC[-4]*R3C2/100))))" .Value = .Value End With ' With...

[Hola El link no sirve. Pon otro

[Hola Tu petición es similar a esto que respondió el generoso Dante. Insertar imagenes en VB de excel para un inventario Haber si puede ayudar a implementar lo que deseas Valora la repuesta para finalizar saludos!

[Hola Una vez copiado los datos adonde se va copiar

[Hola ¿Puedes poner la macro para modificar?

[Hola rioja32 Disculpa no había visto tu pregunta Si lo abres de solo lectura no va funcionar, porque guarda la cantidad de veces que abres el libro. A lo mejor sería habilitar los permisos del lectura y escritura al servidor

[Hola te paso la macro Private Sub ListBox1_Click() TextBox1.Text = ListBox1.List(ListBox1.ListIndex, 0) TextBox2.Text = ListBox1.List(ListBox1.ListIndex, 1) TextBox3.Text = ListBox1.List(ListBox1.ListIndex, 2) End Sub valora la respuesta para finalizar