Manak Posted August 2, 2006 Share Posted August 2, 2006 Bonjour, Débutant en VBA, j'ai quelques soucis concernant une de mes macros Excel. Il s'agit via un bouton de Commande, de positionner les choix sélectionnés dans des Combo Box sur une feuille de calcule autre que celle où sont situés ET le bouton de Commande, ET les deux Combo Box. Avec le code suivant, après sélection des choix dans les Combo Box et pression sur le bouton, les choix sont copiés sur la feuille où est situé sur le bouton, pas sur la "Feuil1" sur laquelle j'aimerai que mes choix s'incrémentent : Private Sub CommandButton1_Click() Set cel = Sheets("Feuil1").Range("A30") Compteur = 1 'Le bloc d'instruction suivant va se répéter 'tant que la cellule n'est pas vide Do While cel.Offset(Compteur) <> "" 'Si la valeur de la cellule est "" (vide), on sort 'de la boucle x = ActiveCell.Value Compteur = Compteur + 1 Loop Cells(Compteur + 30, 1) = ComboBox1.Text 'Définir la cellule d'origine ici Cells(Compteur + 30, 6) = "x" 'Ici aussi Cells(Compteur + 30, 7) = ComboBox2.Text 'Et ici End Sub Merci pour l'aide apportée. Manak Link to comment Share on other sites More sharing options...
Recommended Posts
Archived
This topic is now archived and is closed to further replies.