Rechercher un UserForm

basma

XLDnaute Junior
Bonjour.
J’ai encore une question pour les super héros XLD !

J’ai créé un beau Userform en Excel 2003. Et j’exporte les différents champs ( textbox, combobox, optionbutton, etc. ) vers une table Access.

J’aimerais retrouver un Userform que j’ai encodé auparavant.
Chaque Userform a un compteur.
Le dernier n° est le 123 et je voudrais retrouver le UserForm n° 56, par ex, avec toutes ses zones remplies.
Voire pouvoir le retraiter à nouveau ( ajout ou suppression de texte ) et ré-exporter la nouvelle version.
Oui, je sais, je suis casse-pieds !!!!!!! :)

--------------
'Workbook Excel = PROJET.xls'
'Worksheet Excel = FICHE1'
'Nom UserForm = FICHE'
'Base Access = PROJET.mdb'
'Table Access = FICHE'
' il y a 55 colonnes ou données à transférer du formulaire Excel vers la table Access'


'Compteur N° requête'
Cells(2, 6).Value = Cells(2, 6).Value + 1
TextBox6 = Cells(2, 6).Value
Sheets('FICHE1').Range('F2').Value = TextBox6.Value


'transfert des données vers la table Access'
With rsT
.AddNew
.Fields('Date d'entrée').Value = TextBox1
.Fields('Nom requête').Value = TextBox2
.Fields('Département demandeur').Value = TextBox3
.Fields('N° requête').Value = TextBox6

.Update
End With

rsT.Close
Conn.Close
------------------

MERCI BEAUCOUP !!!!!!!!!!!!!!!!!!!!!!
Basma
 

Discussions similaires

Statistiques des forums

Discussions
312 571
Messages
2 089 797
Membres
104 275
dernier inscrit
Manu974