Fenêtres Excel côte à côte

Fermé
Victor Porée Messages postés 75 Date d'inscription mardi 11 juin 2013 Statut Membre Dernière intervention 30 mai 2017 - 17 avril 2017 à 01:41
Victor Porée Messages postés 75 Date d'inscription mardi 11 juin 2013 Statut Membre Dernière intervention 30 mai 2017 - 17 avril 2017 à 17:42
Bonjour à tous,

Je cherche une procédure VBA pour mettre deux fenêtres Excel (en l'occurrence, un classeur et l'Éditeur Visual Basic) en mode d'affichage côte à côte.

Je commence un peu à me lasser de le faire quotidiennement.

Des idées ?
A voir également:

1 réponse

cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
Modifié le 17 avril 2017 à 08:29
Bonjour,

avec un raccourci clavier:

http://www.info-3000.com/vbvba/raccourciclavier.php

Voici les macros:

Option Explicit
'http://www.info-3000.com/vbvba/raccourciclavier.php
Sub Afficher()
Dim objShell
Set objShell = CreateObject("Shell.Application")
objShell.TileVertically
Set objShell = Nothing
End Sub
Sub Retablir()
Dim objShell
Set objShell = CreateObject("Shell.Application")
objShell.UndoMinimizeALL
Set objShell = Nothing
End Sub


ATTENTION
Toutes les fenêtres ouvertes seront côte à côte!

Mais je ne pense pas que cela soit plus rapide que:

Clic droit sut la barre de tâche(en bas)
Afficher les fenêtres côte à côte

@+ Le Pivert
0
Victor Porée Messages postés 75 Date d'inscription mardi 11 juin 2013 Statut Membre Dernière intervention 30 mai 2017 2
17 avril 2017 à 11:28
Merci pour votre réponse !

Ma configuration ne s'est pas mentionnée, mais je suis sur Mac, ça ne fonctionne pas.

Pour l'instant j'arrive à le mettre en plein écran au démarrage, mais c'est tout.

Sub MettreAuTravail()

    With Application
        .DisplayFullScreen = True
    End With

End Sub
0
cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728 > Victor Porée Messages postés 75 Date d'inscription mardi 11 juin 2013 Statut Membre Dernière intervention 30 mai 2017
17 avril 2017 à 11:52
Ce n'est valable que pour Windows!

Je ne suis pas sous Mac, je ne peux donc pas t'aider.
Désolé

@+ Le Pivert
0
Victor Porée Messages postés 75 Date d'inscription mardi 11 juin 2013 Statut Membre Dernière intervention 30 mai 2017 2 > cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024
17 avril 2017 à 17:42
Pas de souci, encore merci !
0