Forum - Questions générale - Sujet n°440

[]
Nombre de membres 1 membre
Connectés : ( personne )
 

La Charte du Forum - La Charte du Forum

Forum - Forum
Questions générale - Questions générale


clos par 3Stone le 26/12/2010 : 13:44  Sujet n° 440  Afficher formulaire caché

le 16/12/2010 : 17:54
par dumas_blr

Anonyme



Bonjour,

Je vous contacte suite à de nombreuses recherches infructueuses.
Je n'arrive pas à réafficher un formulaire que j'ai caché auparavant
Le principe est d'afficher un aperçu avant impression d'un état lorsque des fenêtres modales ont été ouvertes.

voici le principe de l'algorithme

Ouverture du formulaire principal (mode ACmodal)
... sur bouton_imprimer_etat_clic
Ouverture du formulaire d'impression des état(mode ACmodal)
... sur bouton_afficher_apercu_clic OpenReport(nom_de_l_etat)

 
Code :
Public Sub OpenReport(ReportName As String, _
Optional View As Integer, _
Optional FilterName As String, _
Optional WhereCondition As String, _
Optional Callform As Form, _
Optional OpenArgs As String)
On Error Resume Next
'For No data Dim loFormArray() As String
Dim loform As Form
Dim intCount As Integer
Dim intX As Integer
Application.CommandBars("Menu").Visible = False
For Each loform In Forms
If loform.Visible Then
ReDim Preserve loFormArray(intCount)
loFormArray(intCount) = loform.Name
loform.Visible = False
intCount = intCount + 1
End If
Next
DoCmd.OpenReport ReportName, View, FilterName, WhereCondition, , OpenArgs
DoCmd.Maximize
SendKeys ("z")
Reports(ReportName).Tag = "Preview"
'For Log files
Do While CurrentProject.AllReports(ReportName).IsLoaded = True
DoEvents
Loop
For intX = intCount - 1 To 0 Step -1
Forms(loFormArray(intX)).Visible = True
Next
Application.CommandBars("Menu").Visible = True
If Callform.Name <> "" Then
DoCmd.SelectObject acForm, Callform.Name
End If
If Err = 2501 Then Err.Clear
'Erreur définie par l'application ou par l'objet
End Sub
 Le problème est que lorsque je souhaite réafficher le formulaire (forms.visible), il refuse de s'afficher.

Nota  :
Je fais scette manipulation car je souhaite pouvoir afficher l'aperçu avant impression d'un état alors que j'ai plusieurs
 sujet clos  Haut

[]   

DébutPrécédent [ 1 2 ] SuivantFin
Réponse n° 9
--------
le 18/12/2010 : 00:01
par dumas_blr

Anonyme

visiteur

Bonjour Pierre,

C'est une solution que je pense appliquer.

Je te remercie pour ton aide.

 

A bientôt

Jean-Yves (dumas.blr)

PS : Tes mémos sont tip-topk, je vais m'inspirer de beaucoup de tes tips

Félicitation pour la qualité de tes intervention et bon courage. Continue !n

Ecrire à dumas_blr   clos par 3Stone le 26/12/2010 : 13:44  Haut
DébutPrécédent [ 1 2 ] SuivantFin
actif sujet actif   clos sujet clos   Important! Important!   Nouveau Nouveau message   -   Rectifier Rectifier message   Clôturer Clôturer sujet   Remonter Remonter
[]
Catégories de discussion  Forum 



Haut