HELP COPIE DE CONTROL DANS USERFORM

[stef]

Bonjour,

je souhaite pouvoir copier les controls d'une USezrform vers une autre, le code suivant ne fonctionne pas???

Workbooks.Open Filename:="C:\Mes documents\SAUV.xls"

'SAUV.xls contient une Userform SAUVEGARD
'mais SAUV.xls n'est pas le fichier principal il est voué seulement à
'l'enregistrement

For Each Control In VIERGE.Controls
If Left(Control.Name, 3) <> "Com" Then
Set masq = VIERGE.ActiveControl
VIERGE.Copy
Workbooks("SAUV.xls").Activate
Set masq1 = SAUVEGARDE
With masq1
End With

Workbooks("PCINSTALL.xls").Activate
End If
Next Control


Merci de votre aide

Tomistef

 

[stef]

Rebonjour

Je me suis apperçu que le code exposé en question est complètement farfelu

Workbooks.Open Filename:="C:\Mes documents\SAUV.xls"

For each control in VIERGE.Controls

VIERGE.Copy
SAUVEGARDE.Paste
next

SAUVEGARDE est une Userforme de SAUV.xls qui n'est pas le programme principal

Merci