Saludos. Deseo acceder a una celda concreta en una Tabla a traves de su cabecera como Columna, la cual se ha definido como rango, y no se si se puede hacer. He probado de acceder mediante el siguiente codigo pero obtengo un error. Tabla_Trabajo.Range("Dia-Semana" & i). La objetivo final es poder, en un momento dado intercalar una nueva columna en la tabla, y mediante la deficion del rango de esa columna, acceder a cualquier celda de ella. Con eso evitaria reescribir el codigo existente modificando las letras de las columna que hicieran referencia a las columnas desplazadas a la derecha por la inserción de la nueva columna, en las macros asociadas a esa…

Buenas a todos tengo un problema de error, Que es lo que hace mis 2 códigos:1.- Al momento de escribir las letras transforma en mayúsculas automáticamente.2.- En determinadas celdas al cambiar la nota notifica mediante un un mensaje la modificación de la nota. Archivo: https://www.mediafire.com/file/1oteeptzmzv0spk/Modificación+de+notas.xlsm/file Ambas funcionan bien de manera independiente pero al momento de ambas me sale un error, como este: Acá se los dejo el código:--------------------------------------------------------------------------------------------------------------------------------------------Private Sub Worksheet_Change(ByVal T…

Buen dia. Tengo esta pequeña macro, que al ejecutarla en windows 7; me corre sin ningun problema. El tema es que cambie de computadora a windows 11, y al hacer correr la macro; esta se detiene en la línea escrita, no sé el porque y la solución. With CreateObject("System.Collections.ArrayList") con el siguiente mensaje RUN-TIME ERROR '-2146232576 (80131700)': AUTOMATION ERROR AZAR.xlsm

Buenas, estoy haciendo un pequeño videojuego de piedra papel tijeras, por ahora tengo las 3 opciones y al hacer click en esas te sale la opcion en foto, pero quiero que en el intervalo que pones la opcion y sale el resultado haga una animacion de agitar la mano pero no se como hacerlo using Piedra_Papel_Tijeras.Properties; using System.Security.Policy; namespace Piedra_Papel_Tijeras { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void PBPiedra_Click(object sender, EventArgs e) { PBPlayer.Image = PBPiedra.Image; } …

tengo varios archivos, lo que necesito es que cada uno de ellos contenga el nombre del mismo en la primer fila y que esta abarque desde la columna A hasta la Q, a continuación les paso un ejemplo de lo que tengo: Como verán el nombre del archivo no aparece por ningún lado solo en la ventana arriba, lo que quisiera es que quedará de la siguiente forma: Como pueden ver en la segunda imagen el nombre del archivo aparece en la primer fila, como son muchos archivos necesitaría una macro que inserte esta fila con el nombre de cada archivo y con el formato combinado en cada archivo correspondiente es decir que al archivo que se llama Mis Comprobantes E…

Hola colegas, Buenos días, espero se encuentren bien de salud. Hoy desde mi móvil. Necesito con VBA extraer el nombre o cadena de texto que más se repite en una columna. No tengo archivo, solo es una consulta para un futuro proyecto. Gracias mil a todos. Saludos. Pino

Hola, estoy queriendo exportar una hoja del archivo como pdf pero al querer guardarlo en un disco compartido (server) me da error. Aclaro que al querer hacerlo en mi disco local C si me lo permite y tambien puedo exportar la hoja como xlsx en el disco compartido pero al querer hacerlo como pdf me lo impide. La linea que utilizo es Hoja2.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:=RutaEnDiscoCompartido & "\" & NombreArchivo & ".pdf", Cuando remplazo la RutaEnDiscoCompartido por una en el disco local si me permite exportarla Muchas gracias

Hola a todos, encontré hace unos días un ejemplo de código que adapté para crear una imagen .jpg de un rango de celdas y funciona correctamente a excepción de que cuando visualizas la imagen creada se ven columnas y datos como si en la parte tras la imagen se ven columnas similares a un gráfico de excel y datos que no están en el rango de celdas del que se extrae la imagen, pongo el código para ver si me podéis echar una mano. Sub CrearImagenRango() Dim she As Worksheet Application.ScreenUpdating = False Application.DisplayAlerts = False On Error Resume Next Set a = Sheets("LisCOMPRAS") 'myfile = "C:\Users\conse\Desktop\Lista COMPRAS\…

Hola buenos dias estoy comenzando en la programacion de macros, pero aun no soy muy bueno por lo que trabajo con la opcion grabar de macro y en este caso la macro que grabe fue copiar el formato de una fila a otra lo cual me genero el siguiente codigo: Rows("6:6").Copy Rows("5:5").PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False Application.CutCopyMode = False aunque cuando ejecuto la macro esta tiende a demorarse y he visto que es debido a esta parte de la grabacion, por lo cual me gustaria contar con su ayuda para poder hacer este codigo mas simple y que se ejecute mas rapido, gracias.

buenos dias, necesito vuestra ayuda. tengo un formulario en el que tiene dos option button dos textbox y un command. la idea es que el usuario cuando quiera saber una edad dependiendo el option button que elija le dara una edad real o actuarial. me explico. optionbutton1. Alta de asegurados en poliza. (este codigo ya lo tengo creado) es la edad real con la que el asegurado contrata calculando la edad a fecha de hoy. optionbutton2. Asegurados en vigor. (necesito codigo porque no soy capaz) esta edad se calcula restando la fecha de nacimiento y el 31/12/2022. adjunto fichero con el formulario hecho. gracias! Calcular_Edad.xlsm

Saludos cordiales, necesito un archivo con un listbox de mas de treinta columnas, también necesito filtrar el mismo listbox con ciertos parámetros, meses, items de diferentes columnas

Hola a todos; Rehago de nuevo la consulta de ayer, a ver si es más fácil. En el formulario he puesto dos listBox que alimento con registros usando los botones Examinar y Examinar2 Una vez cargados los registros, ¿se puede crear un procedimiento para que nos indique los items que no se repiten en ambos listbox?, usando para ello el botón "Buscar <>". Adjunto imagen de ejemplo Una vez detectados deben quedar seleccionados. Los listBox tienen establecida la propiedad Multiselect. Imagino que tendrá que ser con algún tipo de bucle y comparar pero me pierdo un poco. Saludos. MDir.xlsm

File Excel Tengo problema una vez que hago "actualizar todo" no se que problemas tengo en la tablas. He puesto una imagen para que vea que pasa? lo otro es que seria con el los botones de Calcular 30. que tenga esta condición de pegado = AHORA()-30

Hola queridos foristas. Cuanta alegría volver a asistir a este formidable Foro. Espero se encuentren bien de Salud y muchas felicidades y próspero año nuevo para ustedes, su familia y amistades. Un amigo me prestó su internet (gracias mil a él) para poder hacer esta consulta. Qué alegría siento volver con ustedes. Tengo este archivo que no es más que un Cronograma de Vacaciones que quiero anexar (en el futuro) a otro Proyecto. Consiste en declarar con una equis (X) la quincena de determinado mes que cada trabajador desea disfrutar de las vacaciones. ¿Pero que quiero hacer? Quiero ver si se pueden que cuando escoja un determinado trabajador, el mes en cue…

Buenas tardes, en un UserForm tengo una lista desplegable (ComboBox) y, obviamente, para desplegarla tengo que clicar en la flecha que tiene a la derecha. Sin embargo, me gustaría saber si hay alguna forma de hacer que se despliegue clicando en cualquier lado de la lista, sin tener que darle justo a la flecha. ¿Es posible hacer esto? Gracias.

Hola @Antoni Gusto en saludarte. En un Post anterior vi esto tuyo que lo pasa a JPG Sub Export() Dim oWs As Worksheet Dim oRng As Range Dim oChrtO As ChartObject Dim lWidth As Long, lHeight As Long Set oWs = ActiveSheet Set oRng = oWs.Range("B2:H11") oRng.CopyPicture xlScreen, xlPicture lWidth = oRng.Width lHeight = oRng.Height Set oChrtO = oWs.ChartObjects.Add(Left:=0, Top:=0, Width:=lWidth, Height:=lHeight) oChrtO.Activate With oChrtO.Chart .Paste .Export Filename:="Case.jpg", Filtername:="JPG" End With oChrtO.Delete End Sub Existe la manera de hacer lo mismo pero a PDF? Gracias.

Existe algún método para identificar la pestaña activa de la barra Ribbon ?

Saludos apreciados; Estoy realizando un codigo, donde tengo dos hojas En la Hoja "Relación", los datos que a partir del rango b4:c4 hasta abajo dentro de esas dos columnas (estos rangos varian, pueden ser 25 filas o 60 filas). se copien en la hoja denominada Bd_Bingo, en la ultima fila vacia, de la de la columna "A". De antemano gracias bingo ayuda 1.zip

Una buen día, les cuento que estoy diseñando un libro en excel con nómina de estudiantes y sus respectivas calificaciones, calificaciones y datos que extrae de las diferentes hojas del libro en excel. Tengo un problema al aplicar el código de Vba en excel para ordenar las calificaciones de acuerdo al nombre del estudiante, se ordena sin ningun problema, pero las formulas que se encuentran en las celdas también se mueven, cómo puedo ordenar los datos sin que se modifiquen las fórmulas y funciones que se encuentran en cada celda. Gracias

Estimados, buenas tardes y feliz año para todos Estoy lanzando un calendario desde un commandbutton y pasando la fecha seleccionada a un textbox. Se hace sin problema cuando están ambos controles en el cuerpo del formulario. El problema surge cuando los controles están dentro de un frame o multipage dentro de frame, en estos casos el control que toma es el frame Probé recorriendo los controles dentro del frame y también me da el error. La idea es que el calendario emergente se abra juntoal txt y no programar coordenadas independientes para c/u de los controles que puede traer problemas con distintas resoluciones de pantalla Tambien aqui dejo el a…

Buenas tardes familia Necesito ayuda en una data como puedo usar filtros en vba para que siempre me filtre el dia en curso. En la data quiero que la macro vaya para la columna CN y me filtre la fecha del dia en curso.

Buenos dias familia nuevamente necesito su ayuda. Tengo un reporte el cual consiste en una tabla lo que quiero es que me oculte la ultima columna y me desoculte la penultima columna como pueden ver en la imagen esta oculta de la colunma B hasta las Ti pero al dia siguiente cuando se carge la nueva data debe ocultarse la TI la cual tiene la fecha 12/24/2022 Y desocultarse la Vn 01/01/2023 que es la que sigue y que siga asi ocultando y desocultando columnas segun vayan pasando la fecha no se si me doy a entender recorte el archivo excel ya que solo se puede subir 100kb muchas gracias familia nuevamente y feliz año nuevo data foro.xlsx

Buenas noches amigos, Por favor, alguien podría ayudarme con esta duda. Este código que envía mensajes de información que esta en excel, a través de WhastApp, me funciona correctamente en windows, pero necesito adaptarlo para que funciones en un Excel de un ordenador MAC. Creo entender que el problema lo tengo en la ejecución de la función SHELL que inicializa la aplicación, pero no se que adaptación debo hacer para que sea operativo en MAC. De antemano agradezco su valiosa ayuda. Declare PtrSafe Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As St…

Hola a todos! tengo una consulta que pareciera ser imposible... vengo investigando hace mas de un mes y no encuentro la forma de resolverlo.... Tengo una rutina que me crea una serie de shapes rectangulares como si fueran boton de un indice... la rutina recorre cada hoja, y crea en la hoja1 un shape por cada hoja que encuentre en el libro, ... logre que le ponga el nombre de cada hoja como texto al shape... pero lo que necesito agregar el action para cada shape, , ejemplo: si existe una hoja "X" creo el shape con texto "X" en la hoja 1. y el action debe ser : ir a la hoja X , si esta oculta, mostrarla. For Each Worksheet In ThisWorkbook.Wor…

Buenas noches estimados, Recurro nuevamente a ustedes para solicitar amablemente su ayuda, diseñé un formulario en Excel de consulta, que importa la información de una base de datos en Access, el cual tiene filtros que funcionan individuales o combinados, el problema es que el código que realiza la búsqueda se tiene que repetir en total 25 veces, todo exactamente igual, lo único que varía son las condicionales para la búsqueda, creen que se pueda reducir las líneas o hacerlo de otro modo que no requiera un código tan extenso?, esta es la imagen del formulario: Como pueden observar es sencillo, solamente los filtros de búsqueda son los que hacen que se repi…