Bonjour,
Je peux vous faire une proposition assez basique avec excel (je ne maîtrise pas suffisamment google sheet, à vous de le convertir)
une vue en vidéo:
le fichier
le code dans le module de la feuille:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$E$4" Then Jauge_cylindrique
End Sub
Sub Jauge_cylindrique()
'Le contenant
With ActiveSheet.Shapes("Can 1")
.Left = 50
.Top = 10
.Width = 90
.Height = 460
End With
'Le contenu
With ActiveSheet.Shapes("Can 2")
.Left = 51
.Top = (450 - (450 * Range("E4")) / 100) + 10
.Width = 88.5
.Height = ((450 * Range("E4")) / 100) + 10
End With
End Sub
Cdlt