Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 Insérer lettre ou chiffre

  • Initiateur de la discussion Initiateur de la discussion JPC33
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

JPC33

XLDnaute Junior
Bonjour. Comment insérer autant de fois X (ou autre) dans colonne A suivant valeur C1.
Ex : si C1=17 en colonne A les Cellules A1:A17 contiennent X.
 
Dernière édition:
Re

Merci pour le complément d'info, R@chid 😉

Pour le fun et parce qu'Office 365

=CAR(TABLEAU.ALEA(15;1;88;88;VRAI))
ou
=CAR(TABLEAU.ALEA(A1;1;B1;B1;VRAI))

A1= nombre de ligne
B1= un nombre entier de 65 à 90 (pour avoir une lettre
 
Mais malgré tout, il faudrait que Krosoft travaille encore sur LAMBDA() et son utilisation, car sauf erreur de ma part, je trouve encore de difficultés pour profiter des ses performances.

C'est bien ce que je disais : Krosoft développe des trucs qui semblent plutôt approximatif au moins par l’indigence de ses explications.

Le fonction Reduce(), selon moi, en est un exemple flagrant.

Avec ce que nous dit l'aide de Krosoft :
Code:
=REDUCE(ValeurInit; A1:C2 ; LAMBDA(ValeurFinale ; X ; ValeurFinale + X + X^2))

Et là, il faut comprendre d'après :
  • que ValeurInit est la valeur initiale de la valeur
  • A1:C2 est la matrice sur laquelle on travaille
  • ValeurFinale la valeur intermédiaire (et donc finale à la fin)
  • X représente chaque élément de la matrice
  • Et le dernier paramètre de Lambda est la fonction utilisée pour calculer le résultat final

=REDUCE(-99;A1:C2;LAMBDA(A;X; A+X+X^2))
Ce qui donnerait en équivalent VBA: =Reduce1(-99 ; A1:C2) avec :
VB:
Function Reduce1(ValeurInit, Plage As Range)
   Dim Valeur, x
      Valeur = ValeurInit
      For Each x In Plage.Cells
         Valeur = Valeur + x + x ^ 2
      Next x
   Reduce1 = Valeur
End Function

ou bien encore :
=REDUCE(1;A1:C2;LAMBDA(A;X; A*RACINE(ABS(X))))
Ce qui donnerait en équivalent VBA: =Reduce1(1 ; A1:C2)
avec : =Reduce2(1 ; A1:C2) avec :
VB:
Function Reduce2(ValeurInit, Plage As Range)
   Dim Valeur, x
      Valeur = ValeurInit
      For Each x In Plage.Cells
         Valeur = Valeur * Sqr(Abs(x))
      Next x
   Reduce2 = Valeur
End Function
Et là, il faut ne faut pas initialiser à 0, puisqu'on fait un produit.

Avouez que cette fonction Reduce(), il fallait aller la chercher!
Pour la comprendre, il faut un peu se creuser les méninges.
Comme si un gars de chez Krosoft en avait eu besoin pour un truc perso et c'est dit "Tiens, je vais l'intégrer en douce à Excel, on ne sait jamais, ça pourrait intéresser un quidam...". Cela expliquerait pourquoi elle n'est pas traduite et pourquoi l'aide est si miteuse. La forme est humoristique mais pas le fond.
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
10
Affichages
219
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…