remplir un nombre de cellule en fonction de la valeur d'une autre
#1
Débutant XLPages

Inscription: 05/09/2012

Messages: 3

Système d'exploitation:
PC
Version Excel utilisée:
2007, 2010
Posté le : 05-09-2012 09h02
Bonjour,
Je tiens à remercier tous les participants à ce forums et les modérateurs.
J'aimerai avoir de l'aide sur un projet que l'on m'a demandé de créer.

Je voudrais remplir un nombre de cellule en fonction de la valeur d'une autre, je m'explique...
Admettons une ligne vide en 1 de A à F.
Je voudrais en rentrant une valeur par-exemple 3 dans B1, remplir A1, B1 et C1 d'une valeur quelconque.

J'espère m'être bien expliqué.

Merci d'avance pour votre aide.
Hors Ligne
Rapport   Haut 

Re: remplir un nombre de cellule en fonction de la valeur d'une autre
#2
Accro XLPages

Inscription: 09/05/2007
De Courcelles-les-Montbéliard

Messages: 286

Système d'exploitation:
PC & Mac
Version Excel utilisée:
Mac 2004 - 2011, et PC 2003 - 2010
Posté le : 05-09-2012 12h36
Bonjour febyce, Didier, le forum

Quelques questions pour ton projet :
      - L'action doit se faire dans toutes feuilles de ton classeur, sur une seule feuille ?
      - sur une plage de cellules bien déterminée ?
      - La ligne doit-elle être vide pour que l'action soit exécutée ?
      - si des données sont présentes que faire ?
      - Valeur quelconque, valeur entière, valeur décimale, positive, négative ?
      - valeur dans une plage définie entre A et B, définir A et B?

@+Jean-Marie



Hors Ligne
Rapport   Haut 

Re: remplir un nombre de cellule en fonction de la valeur d'une autre
#3
Débutant XLPages

Inscription: 05/09/2012

Messages: 3

Système d'exploitation:
PC
Version Excel utilisée:
2007, 2010
Posté le : 05-09-2012 13h36

Bonjour Jean-Marie,

Je me suis rendu compte que je m'étais trompé dans mon explication de départ.

"Je voudrais remplir un nombre de cellule en fonction de la valeur d'une autre, je m'explique...
Admettons une ligne vide en 1 de A à F.
Je voudrais en rentrant une valeur par-exemple 3 dans B1 A2, remplir A1, B1 et C1 d'une valeur quelconque."


Réponses à tes questions:

- L'action doit se faire dans toutes les feuilles de mon classeur, mais si c'est fait que dans une ce n'est pas compliqué pour retranscrire dans une autre feuille, je pense ...
- La ligne ne doit pas forçement être vide, en cas de modifications justement.
- Si des donnés sont présentes, il faudrait les remplacer par les nouvelles.
- Une valeur décimale et encore mieux, une valeur quelconque !

Merci d'avance.

Fabrice

Hors Ligne
Rapport   Haut 

Re: remplir un nombre de cellule en fonction de la valeur d'une autre
#4
Accro XLPages

Inscription: 09/05/2007
De Courcelles-les-Montbéliard

Messages: 286

Système d'exploitation:
PC & Mac
Version Excel utilisée:
Mac 2004 - 2011, et PC 2003 - 2010
Posté le : 08-09-2012 09h10
Bonjour febyce, Didier, le forum

Ci-joint un code que l'on place dans le thisworkBook du classeur pour une prise en compte dans toutes les feuilles du classeur
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
'Déclaration des variables
Dim I As Integer
'initialisation du générateur de nombre aléatoire
Randomize
'Supprime la prise en compte des événements
Application.EnableEvents = False
'La cellule modifiée faite elle partie des colonnes A,B,C,D,E
If Not Application.Intersect(Target, Range("A:F")) Is Nothing Then
    'la saisie dans la cellule est-elle numérique
    If IsNumeric(Target) Then
        'Boucle sur le nombre de cellule
        For I = 1 To Target
            ' "1" définie la Colonne A
            'Ecriture dans la cellule de la valeur aléatoire
            Cells(Target.Row, I) = (1000 * Rnd)
        Next I
    End If
End If
'Réactivation de la gestion des événements
Application.EnableEvents = True
End Sub
PS : je n'ai pas vu ta correction sur l'écriture sur la ligne du dessous
Je te laisse regarder ce que tu dois modifier dans la fonction Cells.

@+Jean-Marie 
Pièce jointe:
xls febyce.xls   [ Taille: 25.50 Ko - Téléchargements: 792 ]
Hors Ligne
Rapport   Haut 

Re: remplir un nombre de cellule en fonction de la valeur d'une autre
#5
Débutant XLPages

Inscription: 05/09/2012

Messages: 3

Système d'exploitation:
PC
Version Excel utilisée:
2007, 2010
Posté le : 09-09-2012 21h43
Merci pour ta réponse ! C'est parfait !!!

@ bientôt ! 
Hors Ligne
Rapport   Haut 


Vous pouvez voir les sujets.
Vous ne pouvez pas débuter de nouveaux sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.

[Recherche avancée]


Qui consulte actuellement ce sujet ?   1 Utilisateur(s) anonymes