Nouveau venuRobertPInscrit le :31/10/2018Dernière activité :20/08/2021 à 19:35Version d'Excel :1809Messages3Votes0Fichiers0Téléchargements0SujetsMessagesStatistiquesVotes reçus Messages postés par RobertPDateAuteur du sujetSujetExtrait du message31/10/2018 à 22:15RobertPErreur 1004Voila mon code Private Sub quincaillerie_Click() Sheets("Francais").Activate Range("A15").Select Dim serie_ As String Dim larg_ As Single Dim haut_ As Single Dim numero As Integer Dim tourne_ As Boolean Dim colquinc_ As String Dim trouvequinc_ As String 'numero = ActiveCell.Row 'Numéro de départ (co...31/10/2018 à 22:00RobertPErreur 1004Merci de me donné un coup de main. je suis positionné dans une cellule sur la premier onglet de mon classeur (francais) puis j'active un second onglet (pieces) je veux me positionner sur la premiere lignes dans la bonne colonne trouvequinc_ est le numero de ligne colquinc_ est le numero de colonne q...31/10/2018 à 12:44RobertPErreur 1004Lorsque l'on arrive a (Cells(trouvequinc_, colquinc_).Select) j’obtiens erreur 1004 Worksheets("pieces").Activate trouvequinc_ = 5 While trouvequinc_ < 8 Cells(trouvequinc_, colquinc_).Select If ActiveCell > 0 Then MsgBox "trouver" End If trouvequinc_ = trouvequinc_ + 1 Wend Sheets("Francais")...Forums