diana sanchez

diana sanchez

 España @dianasanchez5 desde - visto
Preguntar

Actividad pública reciente

Voto positivo a la respuesta

Guardar datos en otro libro de Excel VBA.

respondió: Curso de macros recomendado: Excel vba dictionary parte 3 - YouTube Nota: En la descripción del vídeo está el enlace para que descargues el archivo con todos los ejercicios. -------------------------------- Prueba lo siguiente. Actualiza tus datos en...
Voto positivo a la respuesta

Macro para cambiar formato columna de una tabla

respondió: Cursos de excel: Curso de excel basico. - YouTube Cursos de Macros: Curso de macros. Macro para ocultar columnas. - YouTube Sub Macro1() Columns("A:A").NumberFormat = "m/d/yyyy" End Sub
Voto positivo a la respuesta

Código para seleccionar columnas en VBA

respondió: [Ho la y bienvenida a TodoExpertos! Visita mi canal: Cursos de Excel y Macros, donde encontrarás varios cursos de Excel y Macros. --------------------------- Prueba el siguiente código, pone el valor como hora para que lo puedas utilizar como hora....
Voto positivo a la respuesta

Insertar fila y contenido en varias hojas

respondió: Prueba la siguiente macro. Ahí te puse unos comentarios para que la adaptes a tus necesidades. Sub InsertarFila() 'Por Dante Amor ' Dim sh As Worksheet For Each sh In Sheets Select Case sh.Name Case "Resumen", "Reporte", "etc" 'en estas hojas no se...
Voto positivo a la respuesta

Como transcribir una fórmula excel a un código vb

respondió: Utiliza la grabadora de macros. Edita la fórmula, presiona enter y te genera el código. Algo como esto: Sub Macro1() ' ' Macro1 Macro ' ' ActiveCell.FormulaR1C1 = _ "=RC[-1]&TEXT(COUNTIFS(R1C5:RC[-2],RC[-2],R1C6:RC[-1],RC[-1]),""000"")"...
Voto positivo a la respuesta

Como poner en negritas parte del texto de una celda en Excel

respondió: Ejecuta la siguiente macro. Cambia en la macro "A" por la letra de la columna donde tienes los datos Sub PonerNegritas() Dim i As Long, n As Long 'recorre las filas de la columna "A" For i = 2 To Range("A" & Rows.Count).End(3).Row With Range("A" & i)...
Voto positivo a la respuesta

Función Buscarv más función MAX

respondió: Revisa el siguiente vídeo: https://youtu.be/hYr0AqPMoc8 Te invito a suscribirte a mi canal de YouTube y activar la alerta para que te lleguen los avisos de mis nuevos vídeos.
Voto positivo a la respuesta

Calcular promedio de un listado

respondió: Te muestro en el siguiente vídeo 2 maneras de obtener el promedio de los artículos: Calcular el Promedio de Artículos - YouTube Te invito a Suscribirte a mi canal de YouTube para nuevos vídeos sobre Fórmulas de Excel y Macros.
Voto positivo a la respuesta

Fórmula SI con fórmula anidada para cumplir una condición

respondió: [Ho la y bienvenido a todoexpertos! Veo que tienes datos en Tablas. Utiliza la siguiente fórmula =SI([@[Imp VENTA]]>BUSCARV([@Artículos];Tabla2;3;0);BUSCARV([@Artículos];Tabla2;2;0);0)*[@[Imp VENTA]] Cambia Tabla1 por el nombre de tu Tabla que...
Voto positivo a la respuesta

Fórmula en excel para repetidos en columna

respondió: Con fórmula: =CONTAR.SI($A$2:$A$7;A2) En una columna pon la fórmula y la copias hacia abajo. De esa manera, los que tenga mayor a 1 son los que están repetidos:
Voto positivo a la respuesta

Calcular Bonificación con función si si me dan 3 condiciones

respondió: Te paso la fórmula: =SI(B13<=$C$5;B13*$D$5;SI(B13<=$C$6;B13*$D$6;B13*$D$7))
Voto positivo a la respuesta

Sumar filas en una fórmula

respondió: Quieres sumar la fila de la celda P1, si es así, podría ser: =FILA(P1)+80 El resultado es 81 Si quieres que el resultado incluya la letra "P", entonces utiliza lo siguiente: ="P" & FILA(A1)+80 No importa la celda que pongas como referencia, en el...
Voto positivo a la respuesta

Cambiar color de textbox de acuerdo a una fecha

respondió: "Si esta fecha es un año atrás" "Si la fecha es menor al año" Puedes explicarlo con un par de ejemplos cuándo aplica un color y cuándo aplica el otro color.
Voto positivo a la respuesta

Obtener dirección completa de rango en inputbox

respondió: Revisa el siguiente ejemplo: Sub ObtenerDatos() Dim rango As Range Dim celda As String, hoja As String, libro As String ' With Application On Error Resume Next Set rango = .InputBox("Selecciona Rango", Type:=8) If rango Is Nothing Then Exit Sub On...
Voto positivo a la respuesta

Validación que no muestre Blancos

respondió: No entiendo cómo tienes los datos en las celdas J3 a J18. Tienes celdas con valor, ¿celdas con blanco y celdas con el texto "Empty"? ¿Las celdas en blanco pueden estar en cualquier parte? Puedes poner una imagen con una muestra real de lo que tienes...
Voto positivo a la respuesta

Como pasar texto a mayúsculas sin la fórmula mayusc

respondió: Puede ser con una macro: Sub Mayusculas() Dim c As Range Dim lr As Long lr = Range("B:F").Find("*", , xlValues, xlPart, , xlPrevious).Row For Each c In Range("B1", Range("F" & lr)) c.Value = UCase(c.Value) Next End Sub Comentas si es lo que necesitas.