Ouverture d'une fenêtre avec passage d'une variableRésolu

Question

Bonjour,

sur ma feuille j'ai 5 menus qui doivent tous m'ouvrir la même page mais toujours avec un nom de table Acces différent.
la page que je dois ouvrir doit recevoir le nom de la table à partir du menu afin de changer le nom de la table.
Par exemple:
Menu1 (table = four)
sur ma page je dois affecter le nom "four" à une variable pour que je puisse exporter à excell la table "four"

Merci d'avance!

Le savoir est la lumière de nous tous, partageons le!

PCPT · Accepted Answer

salut,

tu peux utiliser les propriétés pour passer le nom de ta table

çà donne à peu près çà :

'   FORM1
Option Explicit

'   LES BOUTTONS 
1 & 2 représentent le menu de 1 à 5
Private Sub Command1_Click()
    Form2.Table = "table 1"
End Sub

Private Sub Command2_Click()
    Form2.Table = "table 2"
End Sub

'-----------------------------------------------

'   FORM 2
Option Explicit
Private mTable As String

Public Property Get Table() As String
    Table = mTable
End Property
Public Property Let Table(ByVal nValue As String)
    If Not Me.Visible Then
        mTable = nValue
        Call LoadMe
    End If
End Property

Private Sub Form_Load()
    'il ne faut rien dans le LOAD qui va se charger avec le test 
Me.Visible
End Sub

Private Sub LoadMe()
'   le code voulu....

'   
affichage source
    Me.Show
    MsgBox Me.Table
End Sub

++
PCPT  [AFCK]
<hr size="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp

PCPT · Answer

affichage source* non, affichage form ^^

Ouverture d'une fenêtre avec passage d'une variable

2 réponses

Votre réponse

Discussions similaires