Respuesta
en
Microsoft Excel
y en 2 temas más
a
Como usar BUSCARV para encontrar valores en una celda con varios caracteres
Te anexo la macro, deberás ajustar la macro con los nombres de archivo, hojas y columnas En la macro van unos comentarios para que sepas qué datos debes completar Sub Buscar_Numero() 'Por.Dante Amor Set l1 = ThisWorkbook Set h1 = l1.Sheets("Hoja3")...
Respuesta
en
Microsoft Excel
y en 1 temas más
a
Insertar celdas de una hoja a otra hoja de excel en VBA
Te anexo la macro Sub Copiar_Celdas() 'Por.Dante Amor Set h1 = Sheets("TOPCON") 'hoja origen Set h2 = Sheets("DEVOLUCIONES") 'hoja destino ' If h1.Range("B5") = "" Then MsgBox "Falta el dato de la celda B5" Exit Sub End If u2 = h2.Range("A" &...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Hacer que me salga un mensaje cuando se cumpla una condición
Envíame tu archivo y me explicas con ejemplos. Mi correo [email protected] En el asunto del correo escribe tu nombre de usuario “José Luis Junco”
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Excel. Macro para resaltar en rojo las filas que contengan el valor de un TextBox (Userform)
Te anexo la macro, pon todo el siguiente código en tu formulario Private Sub anular_Click() 'Act.Por.Dante Amor If TextBox1 = "" Then Exit Sub ' Call Actualizar("BASE DE DATOS FACTURACION", "12345", "C", "A", "O", "O") Call Actualizar("BASE DE...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
¿Cómo importar un archito txt a un listbox en 3 columnas?
Envíame tu archivo de excel con el formulario y el archivo txt de ejemplo Mi correo [email protected] En el asunto del correo escribe tu nombre de usuario “nico gaspar” S a l u d o s . D a n t e A m o r
Respuesta
en
Microsoft Excel
y en 1 temas más
a
Se puede abrir un hipervínculo a una hoja oculta?
Te anexo las macros para los eventos de la hoja "CARTA" Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink) 'Por.Dante Amor rango = Target.SubAddress datos = Split(rango, "!") hoja = Replace(datos(0), "'", "") celda = datos(1)...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Excel Userform botón con macro que se realice en varias hojas.
[H o l a Te anexo el código para las 3 hojas Private Sub anular_Click() 'Act.Por.Dante Amor Set h = Sheets("BASE DE DATOS FACTURACION") h.Unprotect ("12345") Set b = h.Range("C:C").Find(Trim(TextBox1.Value), LookIn:=xlValues, lookat:=xlWhole) If Not...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Quiero macro que borre las filas que tengan en una celda un valor que se obtendrá de otra celda
¿Qué más dice el mensaje de error? Dice "no coinciden los tipos" Si en la celda donde buscas tienes una fórmula, y resultado de la fórmula es un error, entonces, prueba con lo siguiente: Dim Valor As String Valor =...
Respuesta
en
Microsoft Excel
y en 1 temas más
a
Referencia de envío de correo por gmail desde excel
Te anexo la macro con la actualización Private Sub Workbook_Open() Dim Email As CDO.Message correo = "[email protected]" passwd = "+pescado123" For i = 2 To Range("L" & Rows.Count).End(xlUp).Row If Cells(i, "M") <> "enviado" Then Set Email =...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Reconocer Ultima Fila VBA Excel
Por lo que veo, tu última fila con datos está en función de lo que se pegue en la columna P y esto depende el número (puede ser del 1 al 10), que tienes en la celda G18 Entonces lo que se debe hacer es buscar la última fila con datos de la columna P....