Microsoft 365 bug sur macro

Bonjour jalaba, le Forum,
Bonne journée à toutes et à tous 🙂
@ jalaba : bienvenue 🙂

Peut-être comme àa :
Dans votre "Sub Schema", j'ai neutralisé le code 'Application.CommandBars("Selection and Visibility").Visible = False
Voir fichier en retour,
Amicalement,
lionel,

merci beaucoup bonne journée

Usine à gaz à dit:

Bonjour jalaba, le Forum,
Bonne journée à toutes et à tous 🙂
@ jalaba : bienvenue 🙂

Peut-être comme àa :
Dans votre "Sub Schema", j'ai neutralisé le code 'Application.CommandBars("Selection and Visibility").Visible = False
Voir fichier en retour,
Amicalement,
lionel,

Cliquez pour agrandir...

le beug persiste
Sub Schema()

Range("I11").Select
Sheets("Schema").Select
'Application.CommandBars("Selection and Visibility").Visible = False
ActiveSheet.DrawingObjects.Select
Selection.ShapeRange.Group.Select
Selection.ShapeRange.IncrementRotation 90
Selection.ShapeRange.ScaleHeight 2.2747807708, msoFalse, _
msoScaleFromBottomRight
Selection.ShapeRange.ScaleHeight 1.2479514048, msoFalse, msoScaleFromTopLeft
Selection.ShapeRange.TextFrame2.Orientation = msoTextOrientationUpward
Selection.ShapeRange.TextFrame2.VerticalAnchor = msoAnchorMiddle
Selection.ShapeRange.TextFrame2.TextRange.ParagraphFormat.Alignment = _
msoAlignCenter
Rows(1).Insert
Rows(2).Insert

Selection.ShapeRange.ScaleWidth 0.5999999067, msoFalse, msoScaleFromTopLeft
Selection.ShapeRange.ScaleHeight 0.749699556, msoFalse, msoScaleFromBottomRight
ActiveWindow.SmallScroll Down:=-60
End Sub

Re-Bonjour,

Chez moi il n'y a plus de beug.
Si j'ai bien compris :
1 - clic sur Click ici dans un premier temps dans la feuille Tableau,
2 - retour sur la Feuille tableau et clic sur Click ici après !!! qui renvoie à la feuille Schema et l'affichage ci-dessous apparait

sans beug chez moi 🙂

oui mais quand je renseignes d'autres donnés il y a un message qui apparait débeug

Curieux, j'ai modifié et renseigné mais ... pas de beug chez moi.
Désolé, je ne sais pas t'aider 🙂

Si tu veux que quelqu'un t'aide, postes ton fichier qui beug en expliquant ce que tu as modifié 🙂