Dante Amor

H o l a: Cambia esto: Set rBuscado = Range("B1:B17200").Find(strDato) Por esto: Set rBuscado = Range("B1:B17200").Find(strDato, lookat:=xlWhole)

H o l a: Entiendo lo siguiente: Hoja1, artículos Hoja2, compras Hoja3 a la 11, proveedores En la hoja compras tienes una descripción en la celda B5 y un valor en la celda J7. ¿Quieres buscar el dato de la celda B5 en cuál hoja? ¿Buscar solamente en...

H o l a: Antes de darte una solución, te explico cada parte de tu código: Esto significa que toma la última fila con datos de la columna A, a la última fila le suma 3 y selecciona la celda de esa fila y columna B: ult = Range("A" &...

H o l a: Te anexo la macro Sub SeleccionarCelda() 'Por.Dante Amor Set b = Range("A2:A100").Find(Range("F1"), lookat:=xlWhole) If Not b Is Nothing Then b.Select Else MsgBox "El valor no existe" End If End Sub Sigue las Instrucciones para un botón y...

H o l a: Cuando protejas la hoja, marca la casilla de Modificar objetos, y con eso podrás insertar comentarios

Para pegar tienes varias opciones, con control + v, Shift + Insert, con el botón derecho del mouse, y desde el menú, existe todo un menú para pegar: Lo que hay que hacer es deshabilitar todas esas opciones, lo único que he encontrado son algunas...

H o l a: Te anexo la macro actualizada Private Sub CommandButton5_Click() 'Act.Por.Dante Amor 'Guardar compra en tabla Dim i As Variant Dim j As Variant Dim TransRowRng As Range Dim NewRow As Integer If TextBox4 = "" Then Set lahoja = ventas Else Set...

H o l a: En el código de Loading pon lo siguiente: Loading2 ie, READYSTATE_COMPLETE En la subrutina pon lo siguiente: Sub Loading2(ie, READYSTATE_COMPLETE) Do DoEvents Loop Until ie.ReadyState = READYSTATE_COMPLETE End Sub

H o l a: Realiza los siguientes pasos: 1. Crea un formulario con un Label, un Textbox, y 2 commandbutton: 2. Pon el siguiente código dentro del formulario: Private Sub CommandButton1_Click() 'Por.Dante Amor If TextBox1 = "" Then MsgBox "Escribe el...

H o l a: Sí, envíame tu archivo de excel y me explicas qué quieres comparar y qué esperas como resultado, todo explicado con ejemplos reales. Mi correo [email protected] En el asunto del correo escribe tu nombre de usuario “Carlos Martin” y el título...