KNouveau venuKDDInscrit le :01/04/2013Dernière activité :02/04/2013 à 18:08Version d'Excel :2010Messages2Votes0Fichiers0Téléchargements0SujetsMessagesStatistiquesVotes reçus Messages postés par KDDDateAuteur du sujetSujetExtrait du message01/04/2013 à 23:40KDDCopier coller un nombre de feuille renommer à la suiteJ'ai ce code qui demande un nombre Z crée un nombre de feuille Z et renomme les feuilles de 1 à Z Sub Copie_feuille() Dim i, z z = InputBox("Nombre de copies ", "Copie") If z = "" Then Else If IsNumeric(z) Then For i = 2 To z Sheets("1").Copy After:=Sheets(i + 1) ActiveSheet.Name = "" & i Range("K2"...01/04/2013 à 12:42KDDCopier cellule A1 de plusieurs feuilles coller sur ligneJ'aimerais créer une boucle qui va chercher la valeur A1 dans un nombre indéterminé de feuilles et qui va coller les valeurs sur une ligne dans une autre feuille. Merci!!!...Forums