Accueil > Forum > > > > >>>VRAIMENT URGENT!!!<<< Excel,MDI,Collage special
>>>VRAIMENT URGENT!!!<<< Excel,MDI,Collage special
lundi 22 avril 2002 à 08:22:19 |
>>>VRAIMENT URGENT!!!<<< Excel,MDI,Collage special

Zoz
|
Salut, Bon voila , j'ai pleins de petites questions en esperant que quelqu'un pourra m'aider: - Donc voila j'ai une variable Excel.application et une excel.workbook . La workbook pointe sur un classeur de la variable application. J'utilise une interface MDI et je voudrai afficher l'application Excel (ou encore mieux seulement le classeur) dans mon MDI , comment faire ? - Comment faire aussi pour enlever le menu et les barres d'outils D'excel ? -Au niveau de l'impression , comment faire pour que l'echelle soit respectée et que l'impression ne prenne pas 2 pags en largeur? -Comment marche le pastespecial ? J'aurais besoin de coller juste les valeurs , sans les formules . Quels sont les parametres a utiliser ? -Enfin , dans une fonction du menu (print_click()) , J'ouvre un form qui demande les feuilles a imprimer puis apres la Common dialog Box d'impression . Comment fair e pour que cette derniere ne s'affiche qu'une fois le form d'avant fermé ? Sur ce , Merci . Zoz , French AmigaZone www.multimania.com/lazoz
|
|
lundi 22 avril 2002 à 14:10:15 |
Re : >>>VRAIMENT URGENT!!!<<< Excel,MDI,Collage special

DeathAngel
|
Salut,
Bon, je vais essayer de répondre à tes questions ;)
- Donc voila j'ai une variable Excel.application et une excel.workbook . La workbook pointe sur un classeur de la variable application. J'utilise une interface MDI et je voudrai afficher l'application Excel (ou encore mieux seulement le classeur) dans mon MDI , comment faire ?
>Ben là, je vois rien d'autre qu'un contrôle OLE (là, tu ne verra que le classeur). Mais bon, je l'utilise que très rarement. Tu dois l'avoir dans la liste des contrôles (un icône avec OLE écrit dessus, tu peux pas le rater:)). Si tu as besoin d'aide là-dessus en particulier, maile-moi, je vais essayer de me remettre en tête la façon dont on l'utilise =P
- Comment faire aussi pour enlever le menu et les barres d'outils D'excel ?
>Ben si tu utilise le contrôle OLE, plus besoin de faire ça. Sinon, et pour info, tu peux faire ce que tu veux avec les menus. Seule chose à garder à l'esprit : Toujours remettre les menus et autres boutons tels qu'ils étaient au départ ! Donc, voilà comment faire : /!\ : Ce code fonctionne en VBA EXCEL, pour que cela fonctionne en VB, je pense qu'il faut rajouter le nom de ta référence au workbook (ex : CommandBars(i) -> wkbMonWorkBook.CommandBars(i))
Dans le Général :
'Tableau contenant l'état des barres d'outils visible ou non Global Etat_Barre_Outil() As Boolean
Macro à appeler à l'ouverture du workbook
Sub Masque_barre_outils() 'Cette procédureb masque les barres d'outils d'Excel 'avant de les masquer elle sauvegarde les barres d'outils 'pour les remettre avant de quitter Dim i As Integer On Error GoTo Masque_barre_outils_Err
'On redimensionne le tableau d'état des barres d'outils avec le nombre de barres d'outils ReDim Preserve Etat_Barre_Outil(CommandBars.Count) For i = 1 To CommandBars.Count On Error Resume Next 'On stocke l'état de la barre d'outil Etat_Barre_Outil(i) = CommandBars(i).Visible CommandBars(i).Visible = False Next i Application.DisplayFormulaBar = False Masque_barre_outils_End: Exit Sub
Masque_barre_outils_Err: MsgBox "Erreur " & Err.Number & " : " & Err.Description Resume Masque_barre_outils_End Resume
End Sub
Puis, sur la fermeture du workbook :
Sub Affiche_barre_outils() 'Cette procédure affiche les barres d'outils d'Excel 'qui étaient visible avant le lancement de l'application Dim i As Integer
On Error GoTo Affiche_barre_outils_Err For i = 1 To CommandBars.Count On Error Resume Next CommandBars(i).Visible = Etat_Barre_Outil(i) Next i Application.DisplayFormulaBar = True
Affiche_barre_outils_End: Exit Sub
Affiche_barre_outils_Err: MsgBox "Erreur " & Err.Number & " : " & Err.Description Resume Affiche_barre_outils_End Resume
End Sub
-Au niveau de l'impression , comment faire pour que l'echelle soit respectée et que l'impression ne prenne pas 2 pags en largeur?
>Sheets(MaFeuille).Zoom = False >Sheets(MaFeuille).FitToPagesWide = 1 >Sheets(MaFeuille).FitToPagesTall = False
-Comment marche le pastespecial ? J'aurais besoin de coller juste les valeurs , sans les formules . Quels sont les parametres a utiliser ?
>Va dans l'aide de Excel, c'est la fonction pasteSpecial.
-Enfin , dans une fonction du menu (print_click()) , J'ouvre un form qui demande les feuilles a imprimer puis apres la Common dialog Box d'impression . Comment fair e pour que cette derniere ne s'affiche qu'une fois le form d'avant fermé ?
>Là, je vois pas trop ton problème. Tu peux donner un exemple, ou un bout de ton code ?
Sur ce , Merci .
Zoz , French AmigaZone www.multimania.com/lazoz
>De rien :) Pour info, pour les newbies en VBA, il existe dans Word et Excel une barre d'outils VB (Affichage/Barres d'outils/Visual Basic). Grâce à elle, vous pouvez retrouver la majeure partie des commandes VBA. Il vous suffit de cliquer sur le bouton d'enregistrement, de choisir un nom pour la macro, puis de faire la manip' que vous voulez automatiser (ici par ex, pour forcer l'impression sur une page en largeur, il faut faire Fichier/Mise en page, cocher la case qui force l'échelle, et fermer la boîte de dialogue). Puis vous appuyez sur le bouton stop, et vous cliquez sur le bouton qui permet d'accéder au code. Et voilou =D
@peluche DA
|
|
Cette discussion est classée dans : impression, application, excel, vraiment, mdi
Répondre à ce message
Sujets en rapport avec ce message
Excel, MDI , Collage special !**Urgent**:o) [ par Zoz ]
Salut, Bon voila , j'ai pleins de petites questions en esperant que quelqu'un pourra m'aider: - Donc voila j'ai une variable Excel.application et une
Impression excel à partir d' une application [ par madmax14 ]
J ai developper une application ( VB 6 ) dont la majeure partie des impressions sont en excel (V.2000).Pour certaine impression ( 800 à 1000 lignes su
Problème urgent dans Excel [ par delph54111 ]
Excusez moi mais j'ai vraiment besoin d'une réponse la plus rapide possible s'il vous plait!!!Alors voila je voudrais savoir comment visualiser un fic
Vb 2005 et excel [ par je2fb ]
Bonjour,Je me developpe une application pour me former a l'utilisation de excel sous VB 2005 et je me demandé s'il etait possible de faire une applica
Intégrer une application externe dans un projet [ par bbujo ]
Bonjour, je suis nouveau developpeur en VB6 (depuis moins d'un an) et je bosse actuellement sur un projet qui consiste a ouvrir plusieurs sessions VN
Excel Automation sous VB.NET [ par nonoarno ]
Bonjour,Après bcp d'essais et de recherches je fais un post pour essayer d'y voir plus clair.Je développe une appli en visual basic .net (sous visual
problem avec fichier Excel [ par chanel35 ]
Bonjour,j'ai un problem avec l'ouvertur du fichier excel, il me fait des ComException. si vous avez une idé d'ou ca vien et comment on peut resoudre
vb excel [ par bobbysv ]
bonjour, en ce moment, je realise un programme pour gerer un tableau excel.J'ai quelques soucis sur des fonctions que je ne trouve pas.Je n'arrive pas
Macro Excel Impression [ par cpsfg ]
Bonjour à tous,Dire que j'ai un petit souci est une lapalissade...J'explique : Je suis en VBA sur Excel. J'ai cré des formulaires avec des boutons aux
Incrémenter une cellule excel à chaque impression [ par sylviecl ]
Bonjour,Je souhaiterais avoir un numéro sur chaque feuille que j'imprime et que celui-ci augmente de 1 à chaque fois. Est-ce possible et pouvez-vous m
Livres en rapport
|
Derniers Blogs
DéMARRONS AVEC LES TASKSDéMARRONS AVEC LES TASKS par richardc
Que vous le vouliez ou non, le développement multi-tâche est maintenant une obligation pour toute nouvelle application. Il est donc vital d'en comprendre les mécanismes et de s'y mettre le plus tôt possible.
En attendant le .NET Framework 4.5 avec le...
Cliquez pour lire la suite de l'article par richardc SLIDE & DéMO TECHDAYS 2012 - FAST & FURIOUS XAML APPSSLIDE & DéMO TECHDAYS 2012 - FAST & FURIOUS XAML APPS par Vko
Retrouvez les slides et les démo de ma session Fast & Furious XAML Apps. A ceux qui se posent la question : "est-ce que le code de la DataGrid est disponible?", je vous répondrais "pas encore". Je vais mettre en place un projet codeplex pour part...
Cliquez pour lire la suite de l'article par Vko XNA IS DEAD!XNA IS DEAD! par richardc
Depuis la semaine dernière (et grâce aux TechDays 2012), je me penche activement sur la nouvelle version de Windows, aka Windows 8. Vous me direz, il était temps puisque la première preview date de Septembre dernier.
OK. Remarquez, on n'en est qu'aux...
Cliquez pour lire la suite de l'article par richardc TECHDAYS PARIS 2012 : WINDOWS SERVER "8" QUOI DE 9 !TECHDAYS PARIS 2012 : WINDOWS SERVER "8" QUOI DE 9 ! par ROMELARD Fabrice
Speakers: Fabrice Meillon et Stanislas Quastana Cette session est basée entièrement sur celle donnée lors de la BUILD cet hiver. Il n'y a pas d'ajout d'information en rapport avec cet évènement passé. Windows 8 Server sera intégralem...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice [HTML5] AUTOUR DU W3C : NOUVEAUX STANDARDS ET WEB MOBILE (LILLE)[HTML5] AUTOUR DU W3C : NOUVEAUX STANDARDS ET WEB MOBILE (LILLE) par Gio
Je m'y prends un peu tard je sais, mais bon je suis développeur web et donc hyper fainéant ! Toujours dans le cadre des technologies émergentes, ici HTML5, parce qu'on aime HTML5 chez Wyg , nous seront présent, le vieux ( Aurélien V.) et moi, pour pr...
Cliquez pour lire la suite de l'article par Gio
Logiciels
DocTranslate (V3.1.0.0)DOCTRANSLATE (V3.1.0.0)DocTranslate est un traducteur de document Microsoft Word, PowerPoint et Excel. Il permet d'autom... Cliquez pour télécharger DocTranslate Tribler (2012)TRIBLER (2012)Tribler est un client pair à pair (P2P/Peer-to-Peer) open source avec la capacité de regarder des... Cliquez pour télécharger Tribler OneSwarm (2012)ONESWARM (2012)Le peer-to-peer qui protège votre vie privée, c'est OneSwarm.
Ce logiciel de peer-to-peer crypté... Cliquez pour télécharger OneSwarm PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA TV DEVIENS HELLLOOO FLASH
LA TV SUR VOTRE ORDINATEUR.
Toute une plateforme Multi... Cliquez pour télécharger PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO Academy System (17.2.1.0)ACADEMY SYSTEM (17.2.1.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System
|