Contenu récent par Valoute

  1. Valoute

    XL 2016 Problème de .name sur Worksheets(Sheets.count).name

    Bonjour, je ne comprend pas pourquoi c'est la Sheets(5) qui se rename dans ce code je cherche depuis des heures. Sheets(5).Copy After:=Worksheets(Sheets.Count) Sheets(2).Cells(Nb_Joueur, 1).Value = Saisie_Joueur.TextBox1.Text Sheets(2).Cells(Nb_Joueur, 2).Value = Saisie_Joueur.TextBox2.Text...
  2. Valoute

    Mettre CommandButton"i"

    Comment je peux r'envoyer une constante correcte en mettant commandbuttoni comment le mettre en forme? Private Sub CommandButton1_Click() Dim Nb As Integer Nb = Worksheets(3).Cells(2, 3).Value Sheets(3).Range("$C:$C").AutoFilter Field:=3, Criteria1:="Gardien" For i = 1 To Nb...
  3. Valoute

    XL 2016 Ajout d'un CommandButton dans un userform à partir d'une macro

    Bonjour, j'aimerais savoir s'il est possible d'ajouter un CommandButton dans un Userform à partir d'une macro, créer une position aléatoire puis par la suite l'orienter grâce à "Left" et "Height". Tout ça à partir d'une boucle. Ce qui donnerais par exemple: Dim Nb As Integer Nb =...
  4. Valoute

    CommandButton et userform.

    Bonjour, j'aimerais savoir s'il est possible de capter dans quel CommandButton le UserForm est lancé. Je m'explique j'ai une 20ène de CommandButton dans ma feuil qui lance tous le même UserForm, j'aimerais savoir si c'était possible de détécter dans quel CommandButton a été lancé l'UserForm...
  5. Valoute

    XL 2016 Suppression de feuils en gardant des feuilles selon une caractéristique.

    La macro fonctionne très bien c'est super cool, mais je suis exposé à un nouveau problème auquel je n'ai aucune compétence c'est comment faire pour y ajouter une selection plus manuel exemple: ajouter l'impossibilité de supprimer Sheets(1) et Sheets(2) en plus des feuilles situés en B.
  6. Valoute

    XL 2016 Suppression de feuils en gardant des feuilles selon une caractéristique.

    Bonjour, je m'explique je cherche à supprimer toutes les feuilles correspondantes à un critère d'une cellule exemple pour garder les feuilles que j'ai besoins: Sub Supression() Dim Compteur As Integer, Nom As String Application.DisplayAlerts = False For Compteur = Worksheets.Count To 1...
  7. Valoute

    XL 2016 Insertion d'un Range ("cellule").Value dans une recherche de feuille

    Bonjour, J'aimerais savoir si cela est possible: If Not Feuille_Existe(Range("B2").Value) And Worksheets(1).Cells(2, 2).Value <> "" Then ' Teste si la feuille existe et qu'il y a bien une valeur dans la cellule Worksheets(2).Copy After:=Worksheets(Sheets.Count) ' Copie la feuille 2 (Type)...
  8. Valoute

    XL 2016 Création de page et modification de nom en fonction de la cellule.

    Merci pour ta réponse mais j'ai trouvé tout seul enfaite c'était simplement un copié coller de page avec changement de nom de la feuille rien de plus simple je me suis pris la tête pour rien.
  9. Valoute

    XL 2016 Création de page et modification de nom en fonction de la cellule.

    Bonjour, j'aimerais savoir comment pourrait on faire pour qu'avec une macro une nouvelle page s'ouvre avec des informations dedans (un doublons d'une page existante) mais avec le nom de la feuille qui correspond aux contenus d'une cellule. Exemple: Feuil1 / Richard Daniel (information de...