Discussion :

[rgbrubel]

Bonjour à tous,
je suis débutant en vba excel. Dans un classeur, j'ai inséré sur une feuille, une "forme" (rectangle arrondi) . Je l'ai recopiée 3 fois. J'ai affecté à chacune des formes, une petite Macro. 3/4 fonctionnent parfaitement. Celle qui pose problème, ne contient qu'une ligne de code : Worksheets("nom de la feuille"). PrintPreview .

Problème 1 : j'arrive sur un Aperçu Avant Impression d'une ancienne version d'Excel . J'ai lu ça dans une discussion de Philippe Tulliez...

Problème 2 : Au moment du Clic , une fenêtre s'ouvre "Format de la forme", ça va très vite, je me retrouve sur L'Aperçu Avant Impression (ancien modèle). Quand je ferme l'Aperçu, je me retrouve bien sur la feuille de départ, mais cette fenêtre "Format de la Forme" est restée ouverte?
Je ne m'en sors pas. Merci de m'aider si possible .

[Zekraoui_Jakani]

Mettez un "break" (ou point d'arrêt) au début de votre code; lancer le code et procédez étape par étape avec la touche F8 jusqu'à ce que vous tombiez sur la ligne qui déclenche l'ouverture du format de l'objet, puis agissez en conséquence. Il se peut qu'une instruction "involontaire" se soit glissée dans le code; Si ça ne porte pas à conséquence, vous pouvez ignorer cette erreur via:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

On Error Resume Next 'ou On Error GoTo 0

Vous pouvez également exploiter la constante "vbCancel" pour fermer une fenêtre ouverte, mais c'est un peu plus complexe (voir documentation sur l'instruction "Application.SendKeys")

[Patrice740]

Bonjour,

Problème 1 : j'arrive sur un Aperçu Avant Impression d'une ancienne version d'Excel

Il ne s'agit pas d'une ancienne version mais de la commande "Aperçu avant impression plein écran" qui est disponible dans la personnalisation du ruban.
Actuellement lorsqu'on demande un aperçu, Excel utilise une autre commande : "Aperçu et Impression"
Tu peux la lancer avec :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

  Application.CommandBars.ExecuteMso "PrintPreviewAndPrint"

Problème 2 : Au moment du Clic , une fenêtre s'ouvre "Format de la forme"

A priori, ça n'a rien à voir avec cette macro.
- As-tu essayé de supprimer cette forme et d'utiliser une nouvelle forme ?
- N'y aurait-t'il pas une macro évènementielle qui provoque ce problème ?

[rgbrubel]

Un grand bonjour à tous les deux et Merci ! ; J'ai retenu la solution de Patrice740 parce que regardez: Mon code se résume à une seule instruction :

J'ai tout recommencé de A à Z au cas où une "crasse" se serait introduite sans que je le voie puisque je suis vraiment débutant lambda ...
1) je crée une forme avec le texte : Aperçu ; je lui affecte une macro : (TDB = nom de ma feuille)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
  Sub Apercu()
  Sheets("TDB").PrintPreview
  End Sub

J'arrive donc sur : "Aperçu avant impression plein écran" , ce que je sais maintenant être normal. Mais encore une fois, après avoir fermé l'aperçu, la fenêtre "Format de la Forme" est ouverte.

2) Je crée une seconde forme avec le texte Aperçu avant impression et je lui affecte la macro :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Sub Vue_Avant_Impression()
 
    Application.CommandBars.ExecuteMso "PrintPreviewAndPrint"
 
End Sub

Et voilà ! J'arrive bien sur "L'Aperçu habituel" d'Excel et plus de fenêtre "Format de la Forme" .

En attendant, vous m'avez bien dépanné et je vous en remercie. Cette histoire de fenêtre est peut-être due à une configuration perso d'Excel...Qui sait ? Mais j'ai bien d'autres choses à apprendre dans l'immédiat ! Une bonne journée à vous et...une meilleure année que l'année passée !