enregistre 2 textbox dans une autre feuille Résolu

Question

bonsoir
j ai un userformpri les donnée s'enregistre tres bien dans mon "tableau recap" 

 mais je voudrais  sois par le bouton calcul note ou valider que les données dans textresuetat et textresucrit soit enregistre dans ma feuille "Donné équipement" en face du choix que j'aurais réaliser depuis mon combox équipement du userform

merci de votre aide
le lien de mon fichier
https://www.cjoint.com/c/FKquUInvf2T

gbinforme · Answer

Bonjour, 

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.

Enregistre 2 textbox dans une autre feuille

1 réponse

Discussions similaires

Newsletters