Dante Amor

Dante Amor

Se fue un gran Padre. Te amo Papá!
 2.210K puntos  Estado de México, México @aprendemos desde - visto
Preguntar

Preguntas y respuestas en Microsoft Excel

Respuesta en a

Macro para localizar números y su posicion en una columna

H o l a: Te anexo la macro. Si los números de tu columna B está con alguna fórmula entonces pon esta línea al principio de la macro: Application.Calculation = xlManual Sub NumerosFilas() 'Por.Dante Amor For j = Columns("D").Column To...
Respuesta en y en 1 temas más a

Un MsgBox me arroja error no se por que

H o l a: Falta un & después de "tiene: " MsgBox "La última vez que este paciente nos visitó fue:" & vbCr & vbCr & _ h.Cells(b.Row, "Q") & " - " & h.Cells(b.Row, "P") & vbCr & vbCr & _ "La edad tiene: " & h.Cells(b.Row, "F"), vbInformation s a l u d o s
Respuesta en y en 2 temas más a

Macro para rellenar con secuencia de fechas hacia atrás y hacia adelante

H o l a: ¿Hay qué retroceder desde F28 hasta F20 y también retroceder desde B27 y hasta B20? ¿Y hacia adelante desde K20 y hasta K29?
Respuesta en y en 1 temas más a

Botón en excel que busque filas y las copie en otro libro de excel.

H o l a: Puede ser con un solo botón y qué busque en todas las hojas. Para desarrollar el código me puedes comentar: Dices: "En resumen, es un excel con datos, si se pone la cantidad de un producto o de varios, al finalizar se le da al botón, este...
Respuesta en y en 2 temas más a

Cómo modificar el formato a solo una parte del texto dentro de una misma celda, que es producto de la aplicación de una fórmula?

H o l a: Tendría que hacerse con una macro. Si quieres que te prepare la macro dime, ¿en la celda A7 quieres el resultado? En las celdas A1 a A5 pondrías los textos y de B1 a B5 pondrías el formato que requieres, ¿o explícame cómo pondrías los datos...
Respuesta en y en 2 temas más a

Adicionar instrucción a macro según nueva condición

H o l a: Te anexo la macro actualizada Sub Buscar4() Set h2 = Sheets("AGENDA") Set h3 = Sheets("REAGENDAR") Set h4 = Sheets("HISTORIA") h3.[D6:D22].ClearContents ' If h3.[D4] = "" Then MsgBox "Número de Registro Único (RU) de la cita está VACIO." &...
Respuesta en a

Macro que grabe el archivo en una carpeta oculta

Prueba así y me comentas Sub x() ActiveWorkbook.Save Dim FileWsh As Object Set FileWsh = CreateObject("Scripting.FileSystemObject") MiVolumen = Hex$(FileWsh.Drives("C").SerialNumber) Select Case MiVolumen Case "3297E471" Application.ScreenUpdating =...

Asignar días de manera aleatoria en excel

H o l a: No entiendo, en tu imagen cuáles 2 personas van a faltar el Lunes, ¿la persona 4 y la persona 8? ¿La 4 y la 8 van a faltar el lunes porque la macro les puso la palabra "Lunes"? Pero puede ser que en cualquier semana, solamente salga un...
Respuesta en y en 2 temas más a

En excel. Ocultar columnas por medio de MACRO, luego de filtrar tabla

H o l a: Disculpa, pero no entendí esto: "ocultar las columnas que son falsas" Quieres que de las columnas 1 a la 20, después que haces un filtro, ¿si en alguna de las filas está la palabra "falso" que se oculte toda la columna? Si es algo diferente,...
Respuesta en y en 2 temas más a

Tamaño de letra en msgbox personalizar un UseForm

H o l a: Para cambiar el tamaño de la letra tendría que se en un userform. En un formulario pon los siguientes controles: Dos Label, Label1 y Label2 Un command button En un módulo pon el siguiente código: Sub MostrarMensaje() 'Por.Dante Amor valor =...