Pasar datos de excel a power point

3 envíos / 0 nuevos
Último envío
Zurdo23
Imagen de Zurdo23
Offline
última acción: Hace 1 mes 3 semanas
alta: 02/10/2018 - 15:58
Puntos: 115
Pasar datos de excel a power point

 

 

Buen día.... necsito su ayuda.....

 

En al sigiente parte del codigo:

 

With diapositiva.Shapes("SueldosPUP").Table                                                                         

    Indicador = 0                                                                                                        

    For M1 = 1 To marcas                                                                                              

      .cell(M1 + 1, 1).Shape.TextFrame.TextRange.Text = Tabla_descansos(1, M1)                                                  

      .cell(M1 + 1, 2).Shape.TextFrame.TextRange.Text = Tabla_descansos(2, M1)                                                   

      .cell(M1 + 1, 3).Shape.TextFrame.TextRange.Text = Tabla_descansos(3, M1)                                                   

      .cell(M1 + 1, 4).Shape.TextFrame.TextRange.Data = Tabla_descansos(4, M1)

      .cell(M1 + 1, 5).Shape.TextFrame.TextRange.Text = Tabla_descansos(5, M1)

      Indicador = Indicador + 1                                                             

    Next M1                                                                                                                 

 

End With           

Es para pasar los datos de una tabla de Excel a una tabla ya establecida en pptx..... pero el detalle es el formato:

Ejemplo: en excel tengo 2.3% (Formato porcentaje), cuando se pasa a pptx se pasa 0.023...

¿como puedo hacer para mantener el formato de Excel y que se vean porcentajes, no decimales?

 

Ayuda!!!!!

 

AdjuntoTamaño
Image icon ayuda_excel.png6.38 KB

Etiquetas: 

pacomegia
Imagen de pacomegia
Offline
última acción: Hace 2 horas 44 mins
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntosNivel 5 - 4000 puntosadministrador
alta: 27/12/2006 - 23:26
Puntos: 9690
función Format

Si no dices nada, por defecto toma el valor numérico que hay en la celda, es decir: 100% = 1

En Excel, una cosa es lo que se ve en la celda y otra cosa es el valor de la celda

Activecell.Value  es el valor de la celda

Activecell.Text   es el texto con formato de tu celda

 

Así que una posibilidad es que cuando leas los datos de Excel tomes el texto de las celdas en vez de su valor

Otra posibilidad, es que apliques el formato. Para ello la función FORMAT permite dar formato a tu valor numérico para que tenga el aspecto que te interesa, por ejemplo:

 .cell(M1 + 1, 1).Shape.TextFrame.TextRange.Text = Format(Tabla_descansos(1, M1),"0.00%")

 

 

 

 

Data Tools Suite
datos y tablas con Excel

Zurdo23
Imagen de Zurdo23
Offline
última acción: Hace 1 mes 3 semanas
alta: 02/10/2018 - 15:58
Puntos: 115
Funcion FORMAT

Resuelto, la funcion FORMAT fue la solución muchas gracias