Microsoft 365 Insérer lettre ou chiffre

[JPC33]

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.

 

[Staple1600]

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

 

[mapomme]

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 :

=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 :

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 :

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.

 

[Staple1600]

Re

@mapomme
Puisque tu es là
Est-ce que ta version est celle-ci ?
version 2309 build 16827.20130

Car j'ai l'impression que c'est lié à Microsoft Insider, or je ne suis pas inscrit à Insider

(Ps: j'ai fait la MAJ manuellement cet après-midi)

 

[mapomme]

Est-ce que ta version est celle-ci ?

Ma version :

Je ne suis pas en Insider tout comme toi. Tu es en avance sur ma pomme .

Personnellement, j'attends toujours les mises à jour automatique.

 

[Staple1600]

Re

J'ai justement écrit que je n'étais pas Insider
(cf message précédent)

PS: Comme cela n'a rien à voir avec le fil, -> MP