Import data from excel to powerpoint(% not showing)

[arnelgp]

you supply a 2nd parameter to the function. pass 0:

Application.Presentations(1).Slides(1).Shapes("Population").TextFrame.TextR ange.Text = FormatPercent(tbhm(6, 1), 0)