Rechercher un UserForm

  • Initiateur de la discussion Initiateur de la discussion basma
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

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
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Question Question
Réponses
1
Affichages
1 K
Réponses
3
Affichages
897
Compte Supprimé 979
C
Retour