Respuesta
en
Microsoft Excel
y en 1 temas más
a
Buscar datos en hoja desde combobox
Debes revisar que los nombres del combo CmbxBnombre sean los mismos del combo Cmbxnombre y también los mismos de la hoja BD. Prueba con lo siguiente: Private Sub Btnbuscar_Click() 'Act.Por.Dante Amor Set h = Sheets("Programación") For i = 1 To...
Respuesta
en
Microsoft Excel
y en 1 temas más
a
Copiar datos asociados a un registro
H o l a : Te anexo el código para llenar la hoja programación, me faltan algunos campos pero creo que los puedes poner en la macro sin problemas. Cada que presiones el botón en automático buscará la cédula y el teléfono y los pondrá en cada uno de...
Respuesta
en
Visual Basic
y en 1 temas más
a
Error 1004 en tiempo de ejecución.
Revisa la hoja, es probable que después de la última fila con datos hacia abajo tengas espacios en blanco o fórmulas, elimina todas las filas de la última fila con datos hacia abajo.
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Crear un folio consecutivo; guardar y exportar de excel a PDF cuyo nombre tenga el folio consecutivo; limpiar celdas
H o l a : Envíame tu archivo con 2 hojas, en una hoja me pones el formato con los campos vacíos. En otra hoja me pones el formato con un ejemplo con los campos capturados, esos campos capturados los pintas de amarillo para saber cuáles son los campos...
Respuesta
en
Microsoft Excel
y en 1 temas más
a
¿Como agregar un cuerpo personalizado a las MACRO de correo masivo que has enviado?
El cuerpo del correo va en la columna F. Si quieres un cuerpo con formato, se debe ajustar en esta parte del código: dam.HTMLBody = _ "<HTML> " & _ "<BODY>" & _ "<P>" & Cuerpo & "</P>" & _ "<br>" & "<b>" & Range("I2").Value & "</b>" & _ "<br>" &...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Buscar información en un libro con más de 200 hojas
H o l a : Envíame un archivo con 3 hojas; la primera hoja en la celda combinada A3:A20 pones un código de artículo, en esa misma hoja pones el resultado que deseas de los materiales a partir de la celda C3; en la segunda hoja deberá estar el código...
Respuesta
en
Microsoft Excel
y en 1 temas más
a
¿Cómo se hace con una macro para convertir caracteres numéricos a letras, pero mostrando las cifras por separado?
H o l a: Pon la siguiente función en un módulo Function NumeroALetras(num As Range) 'Por.Dante Amor res = "" letras = Array("cero", "uno", "dos", "tres", "cuatro", "cinco", "seis", _ "siete", "ocho", "nueve") If Not IsNumeric(num) Then res = "No es...
Respuesta
en
Microsoft Excel
y en 1 temas más
a
Como sumar en una misma celda
H o l a : Te anexo un ejemplo para utilizar otras celdas Private Sub Worksheet_Change(ByVal Target As Range) 'Por.Dante Amor If Not Intersect(Target, Range("E2, H2, K2")) Is Nothing Then Application.EnableEvents = False Target.Value = Target.Value +...
Respuesta
en
Microsoft Excel
y en 1 temas más
a
Como buscar la primer fila vacía de una base de datos y darle un valor correspondiente de permiso:
H o l a : Puedes enviarme tu archivo y me explicas el funcionamiento, es decir, cuál hoja selecciono, cuál celda selecciono, qué dato pongo en la celda, y qué es lo que debería hacer la macro. Mi correo [email protected] En el asunto del correo...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Imprimir en excel una hoja repetida cambiando una celda
H o l a : Pon la siguiente macro en un botón Sub ImprimirHoja() 'Por.Dante Amor num = InputBox("Número de copias", "Imprimir") If num = "" Or Not IsNumeric(num) Or num < 1 Then Exit Sub ' For i = 1 To num Range("F3") = "'" & i & "/" & num...