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

Générer et figer nombre et lettre aléatoires sur une plage sélectionnée?

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion waine_99
  • 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 !

S'inscrire
W

waine_99

Guest
Bonjour,

Je souhaite générer par une macro sur une plage de cellule sélectionnée (à la souris), générer une lettre + un chiffre aléatoires du type "X1, B4..."

La formule pour les cellules est:
=CAR(ALEA.ENTRE.BORNES(65;90))&ALEA.ENTRE.BORNES(0;9)

Au niveau de la macro j'en suis à:

Sub ALEATOIRE()
With ActiveCell
.FormulaR1C1 = "=ALEA.ENTRE.BORNES(0,9)"
.Copy
.PasteSpecial Paste:=xlValues
End With
Application.CutCopyMode = False
End Sub

Les problèmes sont:
- si j'essaie de générer la lettre en plus, cela ne fonctionne plus!
- la macro ne s'effectue que sur la cellule sélectionnée et non sur l'ensemble

Merci par avance pour votre aide! 🙂
 
Trier par date Trier par votes
Re : Générer et figer nombre et lettre aléatoires sur une plage sélectionnée?

Bonjour à tous,

Peux-tu essayer :

Code: 
Option Explicit

Sub ALEATOIRE()
With ActiveCell
.FormulaLocal = "=CAR(ALEA.ENTRE.BORNES(65;90))&ALEA.ENTRE.BORNES(0;9)"
.Copy
.PasteSpecial Paste:=xlValues
End With
Application.CutCopyMode = False
End Sub

Si tu souhaites poser une formule XL passe en FormulaLocal

A+ à tous
 
Vote positif 0 Vote négatif
Re : Générer et figer nombre et lettre aléatoires sur une plage sélectionnée?

Bjr à tous


Sans utiliser l'utilitaire d'analyse.


Code: 
Sub Macro1()
Selection.FormulaR1C1 = "=CHAR(INT((26)*RAND()+65))&INT(RAND()*9)+1"
Selection.Cells.Value = Selection.Cells.Value
End Sub

A+
 
Vote positif 0 Vote négatif
Re : Générer et figer nombre et lettre aléatoires sur une plage sélectionnée?

Merci pour vos réponses, je vais conserver la méthode vbacrumble plus simple à partager à mes collaborateurs!
 
Vote positif 0 Vote négatif
Re : Générer et figer nombre et lettre aléatoires sur une plage sélectionnée?

Bonjour à tous,

Annulé car c'était une solution très semblable à celle de Vbacrumble.

A+
 
Dernière édition:
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

S
  • Résolu(e)
Microsoft 365 SI(NB;SI( ) Ne fonctionne que s'il y a une lettre dans la plage séléctionnée
Réponses
3
Affichages
515
smargot
S
E
  • Résolu(e)
Microsoft 365 Boucle sur lignes <>0
Réponses
2
Affichages
500
eric72
E
XLS : Evènements souris 'click' sur la grille & astuces
Réponses
3
Affichages
705
Lu76Fer
J
  • Question Question
XL 2019 recuperer plage de cellule sur feuille differente
Réponses
2
Affichages
733
juju91
J
V
  • Résolu(e)
Microsoft 365 Macro pour sélectionner une plage de cellules selon une couleur de remplissage donnée
Réponses
2
Affichages
1 K
vash966
V
I
  • Question Question
XL 2016 Copier vers les feuilles avec condition
Réponses
4
Affichages
664
INFINITY100
I
S
  • Résolu(e)
Microsoft 365 Effacer une même plage de cellule sélectionnée sur plusieurs feuille
Réponses
6
Affichages
1 K
ShrekL
S
  • Question Question
XL 2013 colorier cellule avec double click
Réponses
4
Affichages
957
CGU2022.
E
  • Résolu(e)
Microsoft 365 VBA pour faire une boucle
Réponses
5
Affichages
938
Emile63
E
E
  • Question Question
Microsoft 365 Couper/coller une image sur Outlook
Réponses
1
Affichages
897
ExcLnoob
E
  • Résolu(e)
Autres Excel 2007: Comment autoriser la saisie d'une seule et même lettre dans une plage de cellules.
Réponses
1
Affichages
876
R@chid
J
  • Question Question
XL 2019 Borné une extraction par date
2
Réponses
22
Affichages
3 K
jui42
J
A
  • Question Question
Microsoft 365 Problème, ma macro change la plage de cellule dans une autre feuille
Réponses
6
Affichages
2 K
akira21
A
S
  • Question Question
XL 2016 Optimiser et revoir une boucle
Réponses
1
Affichages
1 K
Diurnambul
D
B
  • Question Question
Microsoft 365 Macro: Intégrer un plage nommé dans une Formule excel
Réponses
2
Affichages
1 K
eriiic
B
  • Résolu(e)
XL 2019 Appliquer une macro à plusieurs fichiers d'un dossier - Débogage ?
Réponses
9
Affichages
2 K
Bastien43
B
M
  • Question Question
XL 2019 Positionnement sur la dernère cellule et affichage diffèrent en Manuel et en VBA :-(
Réponses
2
Affichages
2 K
Patrice33740
B
  • Question Question
ajouter une ligne automatiquement en recopiant les formules et la validation des données.
2
Réponses
16
Affichages
3 K
blancolie
B
R
  • Question Question
VBA ; recherche de valeurs mini sur une plage de façon dynamique
2 3
Réponses
30
Affichages
5 K
Raka
R
  • Question Question
Tester si une plage existe
Réponses
6
Affichages
4 K
Anthonymctm
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…