• Initiateur de la discussion Initiateur de la discussion lynyrd
  • 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 !

Re : Réduire macro

Bonsoir,

Si bien compris :
Code:
Sub Affiche_Equipes()
For j = 1 To 38
    With Sheets("J" & j)
        For i = 2 To 11
            Cells(i + 10 * (j - 1), "A") = .Cells(2 + i, "A")
        Next
    End With
Next
End Sub
Cordialement
 
Dernière édition:
Re : Réduire macro

Re,
Ca fonctionne à moitié,les équipes s'affichent bien mais il faut terminer par un débugage
( erreur d'exécution "9" l'indice n'appartient pas à la sélection).
ou
ca bug lorsque j'appuie sur le bouton affecté à cette macro.
Il faudrait savoir...

Sans fichier et sans explication claire et détaillée cela va être difficile de t'aider!

Cordialement
 
- 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
17
Affichages
632
Réponses
3
Affichages
160
Réponses
7
Affichages
306
Réponses
1
Affichages
345
Réponses
9
Affichages
379
Réponses
12
Affichages
310
Retour