Bonjour,
Un copain m'a dit qu'il était possible de faire un rapporteur sous exel avec
une macro.
Ce rapporteur doit-être gradué en mm, avez-vous une idée ?
merci
serge
Bonjour, Merci, je sais qu'un rapporteur est gradué en degrés ou en grades mais si on lui impose un diamètre de 114,591 avec PI 3,14159265358979323846 , on arrive à une circonférence de 359.99824... donc la possibilité de graduer en mm. Est ce possible ? serge
"MB" a écrit dans le message de news:d772sp$go3$
Bonjour
non un rapporteur est gradué en d° ;-)
c'est faisable avec un truc du genre
ActiveSheet.Shapes.AddShape(msoShapeOval, 100, 100, 200, 200).Select For i = 0 To 180 Step 5 ActiveSheet.Shapes.AddLine(Cos(i / 180 * 3.1415926) * 100 + 200, -Sin(i
Bonjour,
Merci, je sais qu'un rapporteur est gradué en degrés ou en grades mais si on
lui impose un diamètre de 114,591 avec PI 3,14159265358979323846 , on arrive
à une circonférence de 359.99824... donc la possibilité de graduer en mm.
Est ce possible ?
serge
"MB" <mbfac.enlever@oter.free.fr> a écrit dans le message de
news:d772sp$go3$1@news.tiscali.fr...
Bonjour
non un rapporteur est gradué en d° ;-)
c'est faisable avec un truc du genre
ActiveSheet.Shapes.AddShape(msoShapeOval, 100, 100, 200, 200).Select
For i = 0 To 180 Step 5
ActiveSheet.Shapes.AddLine(Cos(i / 180 * 3.1415926) * 100 +
200, -Sin(i
Bonjour, Merci, je sais qu'un rapporteur est gradué en degrés ou en grades mais si on lui impose un diamètre de 114,591 avec PI 3,14159265358979323846 , on arrive à une circonférence de 359.99824... donc la possibilité de graduer en mm. Est ce possible ? serge
"MB" a écrit dans le message de news:d772sp$go3$
Bonjour
non un rapporteur est gradué en d° ;-)
c'est faisable avec un truc du genre
ActiveSheet.Shapes.AddShape(msoShapeOval, 100, 100, 200, 200).Select For i = 0 To 180 Step 5 ActiveSheet.Shapes.AddLine(Cos(i / 180 * 3.1415926) * 100 + 200, -Sin(i