Excel-comment faire une boucle sous macro

Résolu
mod77 Messages postés 1320 Date d'inscription   Statut Membre Dernière intervention   -  
Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,
Je voudrais faire une boucle sous forme de macro qui mettrait les valeurs de la colonne B de ma feuil2 à 0.
J'ai écrit ceci pour l'affecter à un bouton de commande:

Private Sub CommandButton3_Click()
Dim x As Byte
x = 1
For x = 1 To 10
Sheets("feuil2").Range("Bx") = 1
Next
End Sub

mais ça plante.

Quelqu'un serait-il me dire pourquoi?

Merci
Configuration: Windows XP
Firefox 3.5.7

8 réponses

  1. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Salut,
    1/ respectes le format de l'onglet par exemple feuil2 ce doit être Feuil2

    la colonne s'identifie de cette façon dans mon exemple Cells(x, 2) le 2 correspond à la colonne B

    Sheets("Feuil2").Cells(x, 2) = 1

    si tu veux la colonne BX

    Sheets("Feuil2").Cells(x, 76) = 1
    1
  2. mod77 Messages postés 1320 Date d'inscription   Statut Membre Dernière intervention   53
     
    Merci Mike-31 !
    c'est génial ça marche!
    C'est bien la colonne B que je voulais mais j'ai compris le principe.

    Saurais-tu cependant à quel code correspond la couleur "Gris" par hasard ?
    0
  3. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Re,

    En pièce jointe tous les index couleurs qui peuvent être utilisé sous Excel, pour le gris c'est le 15, le 16 et le 48 suivant qu'il est clair ou plus foncé

    https://www.cjoint.com/?bqvRDSJq4d
    0
    1. mod77 Messages postés 1320 Date d'inscription   Statut Membre Dernière intervention   53
       
      Excuse moi Mike-31, mais M@rina m'avait donné 65 et ça correspond au rouge alors que dans ton tableau c'est 3 le rouge. Ci-bien que le gris ne correspond pas au code ?
      Aurais-tu une solution STP?
      0
  4. mod77 Messages postés 1320 Date d'inscription   Statut Membre Dernière intervention   53
     
    Merci, merci, merci Mike-31!
    J'en avais marre de tester tout les codes depuis que j'ai posté la question!

    Les nuances ne sont donc pas possible?

    Merci, j'arrete apres ça!
    0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Re,

    Ca depend, antérieur à Excel 2007, il faut se contenter des couleurs de la palette Excel, pour 2007 il est possible de personnaliser les couleurs. Quelle version Excel as-tu

    Lorsque ton problème sera résolu, n'oublis pas de mettre ton statut en résolu en haut de la discussion
    0
  7. mod77 Messages postés 1320 Date d'inscription   Statut Membre Dernière intervention   53
     
    Non c'est 2003,
    Mais je m'excuse de nouveau car j'ai oublié de préciser que c'est pour une case d'option je pense que ça a son importance. La ligne de commande est: pour le rouge
    ActiveSheet.Shapes("option button 135").Fill.ForeColor.SchemeColor = 65

    Désolé pour ce manque de présence d'esprit.

    alors je cherche encore...
    0
  8. mod77 Messages postés 1320 Date d'inscription   Statut Membre Dernière intervention   53
     
    Ca y est j'ai trouvé par la méthode empirique! c'est 22 pour le gris
    Merci beaucoup de votre aide Mike-31.

    J'arrete là.
    0
  9. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Avec plaisir à la prochaine
    0