XL 2019 VBA sélection via combobox

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 !

Katoch

XLDnaute Junior
Bonjour / Bonsoir à toutes et tous du forum !

J'ai besoin de votre aide pour me réaliser le code vba qui me permettra de faire grandement évoluer mon fichier formation.
Je vous joins un fichier explicatif.
Merci par avance de votre aide.😉
 

Pièces jointes

Sylvanu,

J'ai insérré une colonne dans la feuille de l'onglet SYNTHESE.
Je souhaite remplacer les textes de la colonne B , qui était A auparavant.
Je conserve donc les références pour votre macro en nouvelle col A.
Que faut-il modifier dans votre
Sub AnalyseSourceSYNTHESE()
pour qu'elle fonctionne à nouveau ?
merci de votre aide !



...Mais en vain... help please !

Sub AnalyseSourceSYNTHESE()
On Error GoTo Fin
Application.EnableEvents = False ' On invalide les events car on va écrire dans la page
T = [Tableau10] ' Transfert des données dans un Array pour être plus rapide
[C5:E13,C16😀22,E25:C29,B32:E36,C39:E52].ClearContents ' Effacement des données existantes
'[B5😀13,B16😀22,B25😀29,B32😀36,B39😀52].ClearContents
Application.ScreenUpdating = False
For Ligne = 4 To Range("A65500").End(xlUp).Row
If Left(Cells(Ligne, 1), 5) = "TITRE" Then 'Cells(Ligne, Colonne)
'If Left(Cells(Ligne, 1), 5) = "TITRE" Then
Titre = Trim(Cells(Ligne, 5)) ' Trim : Suppression des espaces (!)
For I = 1 To UBound(T, 2) ' Pour toutes les colonnes
If Trim(T(1, I)) = Titre Then ' Si c'est le bon Titre
ColTitre = I ' On mémorise la colonne
Exit For
End If
Next I
ExtraitDonnées ' On extrait les données et on les range
End If
Next Ligne
Fin:
Application.EnableEvents = True
End Sub
 

Pièces jointes

Bonsoir Sylvanu,

J'ai pu bien avancer mon projet grâce à vous. L'onglet PIAF fonctionne parfaitement avec vos codes.
Mais malgré vos aides précédentes , l'onglet synthèse reste inactif...

Pourriez- vous svp finaliser celui-ci selon le descriptif situé dans ce même onglet ?
J'ai bien compris que vous êtes bénévoles , mais svp donnez moi la solution.
Moi aussi je suis bénévole dans une association( caritative) et ce projet nous aidera bien à gérer ce qui est réellement de ma compétence. Effectivement le vba , ce n'est pas mon domaine , vous vous en êtes aperçu et ne m'en cache pas.
J'espère pouvoir compter sur vous.
Merci
 

Pièces jointes

- 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

Réponses
40
Affichages
1 K
  • Question Question
Autres Code VBA
Réponses
11
Affichages
256
Réponses
9
Affichages
205
Réponses
5
Affichages
272
Réponses
3
Affichages
200
Retour