Makro na zobrazenie/skrytie bodu v grafe

Dobrý deň, chcela by som vás poprosiť o radu (Excel 2016). Vytvorila som makro, ktoré skryje bod na grafe:
ActiveChart.FullSeriesCollection(1).Points(1).Select
Selection.Format.Fill.Visible = msoFalse
Selection.Format.Line.Visible = msoFalse
Teraz ale potrebujem vytvoriť makro, ktoré daný bod zobrazí. Skúšala som to nasledovne:
ActiveChart.FullSeriesCollection(1).Points(1).Select
Selection.Format.Line.Visible = msoTrue
With Selection.Format.Line
.Visible = msoTrue
.ForeColor.RGB = RGB(255, 0, 0)
.Transparency = 0
End With
Selection.Format.Fill.Visible = msoTrue
With Selection.Format.Fill
.Visible = msoTrue
.ForeColor.RGB = RGB(255, 0, 0)
.Transparency = 0
.Solid
End With
Problém je, že síce sa mi bod zobrazí, ale bez výplne, vidno akoby iba orámovanie bodu. Ako zmeniť príkaz, aby sa zobrazil plný bod? Ďakujem za každý jeden nápad. Vo VBA som začiatočník, vopred sa ospravedlňujem, ak som urobila nejakú hlúpu chybu a budem rada, ak ma opravíte.