Alberto Jimenez Cabrera

Teniendo en cuenta que solo se ingresa un dato en una sola celda puedes crear una macro en la hoja donde se insertan los datos. Private Sub Worksheet_Change(ByVal Target As Range) Dim RangoOrigen As Excel.Range Dim PosicionFecha As Integer Set...

Primero hay que encontrar los ángulos del triangulo que va de la punta del poste a la punta de la sombra y de la punta de la sombra al lugar donde esta sembrado el poste. 1)La elevación del Sol es de 64 grados, entonces el primer angulo que es el que...

La macro que grabaste esta bien, solo hay que agregar la fecha actual(date) ActiveSheet.PivotTables("Tabla dinámica3").PivotCache.Refresh ActiveSheet.PivotTables("Tabla dinámica3").PivotFields("Date").CurrentPage = Date La Variable Date es una...

Esta macro hace lo que necesitas, nota que para guardar el archivo en una carpeta especifica debes agregar la ruta completa al nombre del archivo. Sub savepdf() Dim Nombre As String Dim Carpeta As String Dim RutaCompleta As String Dim RangoExportar...

Con esta macro puedes hacer lo que dices, ten en cuenta que los valores deben ir separados con una coma. Sub ExtraerValores() Dim Texto As String Dim Valores() As String Texto = Range("A1") Valores() = Split(Texto, ",") If UBound(Valores) >= 0 Then...

¿Podrías mostrar una imagen de la tabla dinámica? Es difícil decirte como hacer la macro si no se como esta estructurada la tabla dinámica, no se si los meses están como encabezados de columna o de fila. ¿Los ingresos por mes es con año o sin año?...