Enregistre 2 textbox dans une autre feuille
Résolu
cedric0715
Messages postés
210
Date d'inscription
Statut
Membre
Dernière intervention
-
cedric0715 Messages postés 210 Date d'inscription Statut Membre Dernière intervention -
cedric0715 Messages postés 210 Date d'inscription Statut Membre Dernière intervention -
A voir également:
- Enregistre 2 textbox dans une autre feuille
- Supercopier 2 - Télécharger - Gestion de fichiers
- Comment supprimer une feuille sur word - Guide
- Feuille de pointage excel - Télécharger - Tableur
- Comment imprimer en a5 sur une feuille a4 - Guide
- Bruler une feuille de laurier - Guide
1 réponse
Bonjour,
Déjà je rectifierai ton code comme ceci :
1) Tu n'as pas besoin d'activer la feuille (chronophage)
2) si tu fais
Pour ta feuille "Donné équipement", tu fais de la même manière.
'Set' de la feuille, recherche de la ligne, documentation des rubriques.
Déjà je rectifierai ton code comme ceci :
'Application.Sheets("TABLEAU RECAP").Activate 'activer une autre feuille avant de lancer ton userform'
Set ws = Sheets("TABLEAU RECAP")
l = Ws.Range("B65536").End(xlUp).Row + 1
'A B C D E F G H
'ID EQUIPEMENT N°LOCAL ETAT DE L'EQUIPEMENT criticité Responsable DATE DE L'AMDEC DUREE DE VI
Ws.Range("B" & l).Value = ComEQUI
etc
1) Tu n'as pas besoin d'activer la feuille (chronophage)
2) si tu fais
Set Ws =il faut ensuite l'utiliser
Pour ta feuille "Donné équipement", tu fais de la même manière.
Set ws = Sheets("Donné équipement")
l = ws.Cells.Find(ComEQUI.Value, , , xlWhole).Row
ws.Range("A" & l).Value = TextRESUETAT
'Set' de la feuille, recherche de la ligne, documentation des rubriques.
merci d'abord
j'ai réaliser ce que tu ma conseiller cela marche bien pour la feuille "donnée équipement" mais cela me donne un erreur pour la feuille recap.
https://www.cjoint.com/c/FKriwtld2F5
merci de ton aide
cordialement
Oui car tu n'as pas enlevé la protection, ton code doit commencer ainsi :
Set ws = Sheets("TABLEAU RECAP") l = ws.Range("B65536").End(xlUp).Row + 1 ws.Unprotect 'desativation de la protection'et à la finbonne soiree